aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2005-06-10 14:03:52 +0000
committerJuanma Barranquero2005-06-10 14:03:52 +0000
commit85fcb67105916af00f2bf3c8aed6aceb005767ab (patch)
tree37afec480d09eb4b246b08b60ad0186e331ab7cb
parent4f955a15c5870ce75f14e7152fb3db052120a944 (diff)
downloademacs-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.el18
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'.
245The newest rotated change will be displayed in the first element of this list, 245The newest rotated change will be displayed in the first element of this list,
246the next older will be in the second element etc. 246the next older will be in the second element etc.
247 247
248This list is used if `highlight-changes-face-list' is nil, otherwise that 248This list is used if `highlight-changes-face-list' is nil, otherwise that
249variable overrides this list. If you only care about foreground 249variable overrides this list. If you only care about foreground
250colours then use this, if you want fancier faces then set 250colors 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."
383Normally the variable is initialized to nil and the list is created from 383Normally 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
385to any list of faces. You will have to do this if you want faces which 385to any list of faces. You will have to do this if you want faces which
386don't just differ from the `highlight-changes' face by the foreground colour. 386don't just differ from the `highlight-changes' face by the foreground color.
387Otherwise, this list will be constructed when needed from 387Otherwise, 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
778face described by the second element, and so on. Very old changes remain 778face described by the second element, and so on. Very old changes remain
779shown in the last face in the list. 779shown in the last face in the list.
780 780
781You can automatically rotate colours when the buffer is saved 781You can automatically rotate colors when the buffer is saved
782by adding the following to `local-write-file-hooks', by evaling it in the 782by adding the following to `local-write-file-hooks', by evaling it in the
783buffer to be saved): 783buffer 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
890changes are made, so \\[highlight-changes-next-change] and 890changes 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))))