diff options
| author | Juanma Barranquero | 2005-06-10 14:03:52 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2005-06-10 14:03:52 +0000 |
| commit | 85fcb67105916af00f2bf3c8aed6aceb005767ab (patch) | |
| tree | 37afec480d09eb4b246b08b60ad0186e331ab7cb | |
| parent | 4f955a15c5870ce75f14e7152fb3db052120a944 (diff) | |
| download | emacs-85fcb67105916af00f2bf3c8aed6aceb005767ab.tar.gz emacs-85fcb67105916af00f2bf3c8aed6aceb005767ab.zip | |
(highlight-changes-colours highlight-changes-face-list,
highlight-changes-rotate-faces): Fix spellings in docstrings.
| -rw-r--r-- | lisp/hilit-chg.el | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/lisp/hilit-chg.el b/lisp/hilit-chg.el index 4e9fbeb53f6..11898c13f00 100644 --- a/lisp/hilit-chg.el +++ b/lisp/hilit-chg.el | |||
| @@ -241,13 +241,13 @@ | |||
| 241 | '( "magenta" "blue" "darkgreen" "chocolate" "sienna4" "NavyBlue") | 241 | '( "magenta" "blue" "darkgreen" "chocolate" "sienna4" "NavyBlue") |
| 242 | ;; defaults for dark background: | 242 | ;; defaults for dark background: |
| 243 | '("yellow" "magenta" "blue" "maroon" "firebrick" "green4" "DarkOrchid")) | 243 | '("yellow" "magenta" "blue" "maroon" "firebrick" "green4" "DarkOrchid")) |
| 244 | "*Colours used by `highlight-changes-rotate-faces'. | 244 | "*Colors used by `highlight-changes-rotate-faces'. |
| 245 | The newest rotated change will be displayed in the first element of this list, | 245 | The newest rotated change will be displayed in the first element of this list, |
| 246 | the next older will be in the second element etc. | 246 | the next older will be in the second element etc. |
| 247 | 247 | ||
| 248 | This list is used if `highlight-changes-face-list' is nil, otherwise that | 248 | This list is used if `highlight-changes-face-list' is nil, otherwise that |
| 249 | variable overrides this list. If you only care about foreground | 249 | variable overrides this list. If you only care about foreground |
| 250 | colours then use this, if you want fancier faces then set | 250 | colors then use this, if you want fancier faces then set |
| 251 | `highlight-changes-face-list'." | 251 | `highlight-changes-face-list'." |
| 252 | :type '(repeat color) | 252 | :type '(repeat color) |
| 253 | :group 'highlight-changes) | 253 | :group 'highlight-changes) |
| @@ -383,7 +383,7 @@ remove it from existing buffers." | |||
| 383 | Normally the variable is initialized to nil and the list is created from | 383 | Normally the variable is initialized to nil and the list is created from |
| 384 | `highlight-changes-colours' when needed. However, you can set this variable | 384 | `highlight-changes-colours' when needed. However, you can set this variable |
| 385 | to any list of faces. You will have to do this if you want faces which | 385 | to any list of faces. You will have to do this if you want faces which |
| 386 | don't just differ from the `highlight-changes' face by the foreground colour. | 386 | don't just differ from the `highlight-changes' face by the foreground color. |
| 387 | Otherwise, this list will be constructed when needed from | 387 | Otherwise, this list will be constructed when needed from |
| 388 | `highlight-changes-colours'." | 388 | `highlight-changes-colours'." |
| 389 | :type '(choice | 389 | :type '(choice |
| @@ -778,7 +778,7 @@ of `highlight-changes-face-list', one level older changes are shown in | |||
| 778 | face described by the second element, and so on. Very old changes remain | 778 | face described by the second element, and so on. Very old changes remain |
| 779 | shown in the last face in the list. | 779 | shown in the last face in the list. |
| 780 | 780 | ||
| 781 | You can automatically rotate colours when the buffer is saved | 781 | You can automatically rotate colors when the buffer is saved |
| 782 | by adding the following to `local-write-file-hooks', by evaling it in the | 782 | by adding the following to `local-write-file-hooks', by evaling it in the |
| 783 | buffer to be saved): | 783 | buffer to be saved): |
| 784 | 784 | ||
| @@ -846,7 +846,7 @@ is non-nil." | |||
| 846 | 846 | ||
| 847 | (setq change-a (car change-info)) | 847 | (setq change-a (car change-info)) |
| 848 | (setq change-b (car (cdr change-info))) | 848 | (setq change-b (car (cdr change-info))) |
| 849 | 849 | ||
| 850 | (hilit-chg-make-list) | 850 | (hilit-chg-make-list) |
| 851 | (while change-a | 851 | (while change-a |
| 852 | (setq a-start (nth 0 (car change-a))) | 852 | (setq a-start (nth 0 (car change-a))) |
| @@ -890,11 +890,11 @@ If a buffer is read-only, differences will be highlighted but no property | |||
| 890 | changes are made, so \\[highlight-changes-next-change] and | 890 | changes are made, so \\[highlight-changes-next-change] and |
| 891 | \\[highlight-changes-previous-change] will not work." | 891 | \\[highlight-changes-previous-change] will not work." |
| 892 | (interactive | 892 | (interactive |
| 893 | (list | 893 | (list |
| 894 | (get-buffer (read-buffer "buffer-a " (current-buffer) t)) | 894 | (get-buffer (read-buffer "buffer-a " (current-buffer) t)) |
| 895 | (get-buffer | 895 | (get-buffer |
| 896 | (read-buffer "buffer-b " | 896 | (read-buffer "buffer-b " |
| 897 | (window-buffer (next-window (selected-window))) t)))) | 897 | (window-buffer (next-window (selected-window))) t)))) |
| 898 | (let ((file-a (buffer-file-name buf-a)) | 898 | (let ((file-a (buffer-file-name buf-a)) |
| 899 | (file-b (buffer-file-name buf-b))) | 899 | (file-b (buffer-file-name buf-b))) |
| 900 | (highlight-markup-buffers buf-a file-a buf-b file-b) | 900 | (highlight-markup-buffers buf-a file-a buf-b file-b) |
| @@ -921,10 +921,10 @@ changes are made, so \\[highlight-changes-next-change] and | |||
| 921 | nil ;; default | 921 | nil ;; default |
| 922 | 'yes ;; must exist | 922 | 'yes ;; must exist |
| 923 | (let ((f (buffer-file-name (current-buffer)))) | 923 | (let ((f (buffer-file-name (current-buffer)))) |
| 924 | (if f | 924 | (if f |
| 925 | (progn | 925 | (progn |
| 926 | (setq f (make-backup-file-name f)) | 926 | (setq f (make-backup-file-name f)) |
| 927 | (or (file-exists-p f) | 927 | (or (file-exists-p f) |
| 928 | (setq f nil))) | 928 | (setq f nil))) |
| 929 | ) | 929 | ) |
| 930 | f)))) | 930 | f)))) |