diff options
| author | Glenn Morris <rgm@gnu.org> | 2008-07-01 03:05:49 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2008-07-01 03:05:49 +0000 |
| commit | a7c29764d9dd1df1e77be02001b5bcc838dd561e (patch) | |
| tree | c5177667ab7068e9357827394993afa94f1f65b9 /lisp/play/bubbles.el | |
| parent | f838179402f8cc11610180c166258a607b2b6709 (diff) | |
| download | emacs-a7c29764d9dd1df1e77be02001b5bcc838dd561e.tar.gz emacs-a7c29764d9dd1df1e77be02001b5bcc838dd561e.tar.bz2 emacs-a7c29764d9dd1df1e77be02001b5bcc838dd561e.zip | |
American English spelling fixes.
Diffstat (limited to 'lisp/play/bubbles.el')
| -rw-r--r-- | lisp/play/bubbles.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/play/bubbles.el b/lisp/play/bubbles.el index 80aaf6b4a7e..290a43c0a7e 100644 --- a/lisp/play/bubbles.el +++ b/lisp/play/bubbles.el @@ -233,7 +233,7 @@ Available modes are `shift-default' and`shift-always'." "Current Bubbles score.") (defvar bubbles--neighbourhood-score 0 - "Score of active bubbles neighbourhood.") + "Score of active bubbles neighborhood.") (defvar bubbles--faces nil "List of currently used faces.") @@ -1083,7 +1083,7 @@ Set `bubbles--col-offset' and `bubbles--row-offset'." nil))) (defun bubbles--mark-direct-neighbours (row col char) - "Mark direct neighbours of bubble at ROW COL with same CHAR." + "Mark direct neighbors of bubble at ROW COL with same CHAR." (save-excursion (let ((count 0)) (when (and (bubbles--goto row col) @@ -1099,7 +1099,7 @@ Set `bubbles--col-offset' and `bubbles--row-offset'." count))) (defun bubbles--mark-neighbourhood (&optional pos) - "Mark neighbourhood of point. + "Mark neighborhood of point. Use optional parameter POS instead of point if given." (when bubbles--playing (unless pos (setq pos (point))) @@ -1124,7 +1124,7 @@ Use optional parameter POS instead of point if given." (error (message "Bubbles: Internal error %s" err))))) (defun bubbles--neighbourhood-available () - "Return t if another valid neighbourhood is available." + "Return t if another valid neighborhood is available." (catch 'found (save-excursion (dotimes (i (bubbles--grid-height)) @@ -1159,7 +1159,7 @@ Use optional parameter POS instead of point if given." (bubbles--show-scores)) (defun bubbles--update-neighbourhood-score (size) - "Calculate and display score of active neighbourhood from its SIZE." + "Calculate and display score of active neighborhood from its SIZE." (if (> size 1) (setq bubbles--neighbourhood-score (expt (- size 1) 2)) (setq bubbles--neighbourhood-score 0)) |