aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1996-10-12 02:42:58 +0000
committerRichard M. Stallman1996-10-12 02:42:58 +0000
commit7a8f27dbe6b3bbc0cde23a04b81ce9347fb9dfaa (patch)
tree110b7a3f0e366f9064069bd3a901d2fc81544fff
parent5d137be3bda08ac9851785309f59455c314b2493 (diff)
downloademacs-7a8f27dbe6b3bbc0cde23a04b81ce9347fb9dfaa.tar.gz
emacs-7a8f27dbe6b3bbc0cde23a04b81ce9347fb9dfaa.zip
Comment change.
-rw-r--r--lisp/ange-ftp.el2
-rw-r--r--lisp/gnus-kill.el2
-rw-r--r--lisp/hilit19.el10
-rw-r--r--lisp/progmodes/cplus-md.el4
-rw-r--r--lisp/rcompile.el2
-rw-r--r--lisp/skeleton.el2
-rw-r--r--lisp/textmodes/ispell.el2
-rw-r--r--lisp/thingatpt.el2
8 files changed, 13 insertions, 13 deletions
diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el
index 77f799f2a04..2e4d0193496 100644
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -559,7 +559,7 @@
559;; Think nil as in "not a remote host". This value is used by 559;; Think nil as in "not a remote host". This value is used by
560;; ange-ftp-dired-host-type for local buffers. 560;; ange-ftp-dired-host-type for local buffers.
561;; 561;;
562;; t = a remote host of unknown type. Think t is in true, it's remote. 562;; t = a remote host of unknown type. Think t as in true, it's remote.
563;; Currently, 'unix is used as the default remote host type. 563;; Currently, 'unix is used as the default remote host type.
564;; Maybe we should use t. 564;; Maybe we should use t.
565;; 565;;
diff --git a/lisp/gnus-kill.el b/lisp/gnus-kill.el
index ac76cd201d0..8c88c2347b8 100644
--- a/lisp/gnus-kill.el
+++ b/lisp/gnus-kill.el
@@ -504,7 +504,7 @@ COMMAND must be a lisp expression or a string representing a key sequence."
504 (if (listp kill-list) 504 (if (listp kill-list)
505 ;; It is a list. 505 ;; It is a list.
506 (if (not (consp (cdr kill-list))) 506 (if (not (consp (cdr kill-list)))
507 ;; It's on the form (regexp . date). 507 ;; It's of the form (regexp . date).
508 (if (zerop (gnus-execute field (car kill-list) 508 (if (zerop (gnus-execute field (car kill-list)
509 command nil (not all))) 509 command nil (not all)))
510 (if (> (gnus-days-between date (cdr kill-list)) 510 (if (> (gnus-days-between date (cdr kill-list))
diff --git a/lisp/hilit19.el b/lisp/hilit19.el
index 56edb62a1e6..9694d7dd0c3 100644
--- a/lisp/hilit19.el
+++ b/lisp/hilit19.el
@@ -149,7 +149,7 @@
149;; 149;;
150;; * Moved hilit-wysiwyg-replace here from my version of man.el, this is not 150;; * Moved hilit-wysiwyg-replace here from my version of man.el, this is not
151;; a bug. The bug is that I don't have a reverse operation yet...just a 151;; a bug. The bug is that I don't have a reverse operation yet...just a
152;; stub Wysiwyg-anything really belongs in a package of it's own. 152;; stub Wysiwyg-anything really belongs in a package of its own.
153;; 153;;
154;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 154;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
155;; 155;;
@@ -204,7 +204,7 @@
204;; changed references to default-bold-italic to just bold-italic because the 204;; changed references to default-bold-italic to just bold-italic because the
205;; font for that face is maintained by emacs. 205;; font for that face is maintained by emacs.
206;; 206;;
207;; the pattern matcher now starts it's searches from the end of the most 207;; the pattern matcher now starts its searches from the end of the most
208;; recently highlighted region (which is not necessarily the end of the most 208;; recently highlighted region (which is not necessarily the end of the most
209;; recently matched regex). 209;; recently matched regex).
210;; 210;;
@@ -265,7 +265,7 @@
265;; documented another "known problem" to "head off gripe mail at the pass." 265;; documented another "known problem" to "head off gripe mail at the pass."
266;; 266;;
267;; Revision 2.3 1993/07/27 02:15:49 stig 267;; Revision 2.3 1993/07/27 02:15:49 stig
268;; (hilit-lookup-face-create) incorporated patch which improves it's behavior 268;; (hilit-lookup-face-create) incorporated patch which improves its behavior
269;; with more than one frame... Still can't have bold on the same face in two 269;; with more than one frame... Still can't have bold on the same face in two
270;; different fonts sizes at the same time... 270;; different fonts sizes at the same time...
271;; 271;;
@@ -287,7 +287,7 @@
287;; added hilit-parser-alist which can be used to apply different patterns to 287;; added hilit-parser-alist which can be used to apply different patterns to
288;; different parts of a buffer. This could be integrated in a far more 288;; different parts of a buffer. This could be integrated in a far more
289;; elegant manner, but it presently serves the purpose of not applying 289;; elegant manner, but it presently serves the purpose of not applying
290;; message header patterns to message bodies in mail-mode and it's kin. 290;; message header patterns to message bodies in mail-mode and its kin.
291;; hilit-set-mode-patterns now takes a list of modes and an optional parse-fn 291;; hilit-set-mode-patterns now takes a list of modes and an optional parse-fn
292;; 292;;
293 293
@@ -921,7 +921,7 @@ the entire buffer is forced."
921;; (message "*sigh* hilit-wysiwyg-write-repair not implemented yet") 921;; (message "*sigh* hilit-wysiwyg-write-repair not implemented yet")
922;; 922;;
923;; For efficiency, this hook should copy the current buffer to a scratch 923;; For efficiency, this hook should copy the current buffer to a scratch
924;; buffer and do it's overstriking there. Overlays are not copied, so it'll 924;; buffer and do its overstriking there. Overlays are not copied, so it'll
925;; be necessary to hop back and forth. This is OK since you're not fiddling 925;; be necessary to hop back and forth. This is OK since you're not fiddling
926;; with--making or deleting--any overlays. THEN write the new buffer, 926;; with--making or deleting--any overlays. THEN write the new buffer,
927;; delete it, and RETURN T. << important 927;; delete it, and RETURN T. << important
diff --git a/lisp/progmodes/cplus-md.el b/lisp/progmodes/cplus-md.el
index 555f5a44d18..9848adcf40b 100644
--- a/lisp/progmodes/cplus-md.el
+++ b/lisp/progmodes/cplus-md.el
@@ -353,11 +353,11 @@ no args if that value is non-nil."
353 (save-excursion 353 (save-excursion
354 (skip-chars-backward " \t") 354 (skip-chars-backward " \t")
355 (max 355 (max
356 ;; leave at least one space on non-empty lines. 356 ;; Leave at least one space on non-empty lines.
357 (if (zerop (current-column)) 0 (1+ (current-column))) 357 (if (zerop (current-column)) 0 (1+ (current-column)))
358 (let ((cur-pt (point))) 358 (let ((cur-pt (point)))
359 (beginning-of-line 0) 359 (beginning-of-line 0)
360 ;; If previous line had a comment, use it's indent 360 ;; If previous line had a comment, use its indentation.
361 (if (re-search-forward comment-start-skip cur-pt t) 361 (if (re-search-forward comment-start-skip cur-pt t)
362 (progn 362 (progn
363 (goto-char (match-beginning 0)) 363 (goto-char (match-beginning 0))
diff --git a/lisp/rcompile.el b/lisp/rcompile.el
index c8aef3fba21..c2d5b3f62de 100644
--- a/lisp/rcompile.el
+++ b/lisp/rcompile.el
@@ -34,7 +34,7 @@
34;; by the calling ange-ftp-ftp-name on the current directory. In this case the 34;; by the calling ange-ftp-ftp-name on the current directory. In this case the
35;; next-error command will also ange-ftp the files over. This is achieved 35;; next-error command will also ange-ftp the files over. This is achieved
36;; automatically because the compilation-parse-errors function uses 36;; automatically because the compilation-parse-errors function uses
37;; default-directory to build it's file names. If however the file visited was 37;; default-directory to build its file names. If however the file visited was
38;; loaded locally, remote-compile prompts for a host and user and assumes the 38;; loaded locally, remote-compile prompts for a host and user and assumes the
39;; files mounted locally (otherwise, how was the visited file loaded). 39;; files mounted locally (otherwise, how was the visited file loaded).
40 40
diff --git a/lisp/skeleton.el b/lisp/skeleton.el
index a488dbdf540..9a1ec8d16de 100644
--- a/lisp/skeleton.el
+++ b/lisp/skeleton.el
@@ -170,7 +170,7 @@ ignored."
170 (setq skeleton-abbrev-cleanup (point)) 170 (setq skeleton-abbrev-cleanup (point))
171 (add-hook 'post-command-hook 'skeleton-abbrev-cleanup nil t)))) 171 (add-hook 'post-command-hook 'skeleton-abbrev-cleanup nil t))))
172 172
173;; This command isn't meant to be called, only it's aliases with meaningful 173;; This command isn't meant to be called, only its aliases with meaningful
174;; names are. 174;; names are.
175;;;###autoload 175;;;###autoload
176(defun skeleton-proxy (&optional str arg) 176(defun skeleton-proxy (&optional str arg)
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 9a29c1c95ed..79f81ad4df2 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -212,7 +212,7 @@
212;; lookup-words rehacked to use call-process (Jamie). 212;; lookup-words rehacked to use call-process (Jamie).
213;; ispell-complete-word rehacked to be compatible with the rest of the 213;; ispell-complete-word rehacked to be compatible with the rest of the
214;; system for word searching and to include multiple wildcards, 214;; system for word searching and to include multiple wildcards,
215;; and it's own dictionary. 215;; and its own dictionary.
216;; query-replace capability added. New options 'X', 'R', and 'A'. 216;; query-replace capability added. New options 'X', 'R', and 'A'.
217;; buffer-local modes for dictionary, word-spelling, and formatter-parsing. 217;; buffer-local modes for dictionary, word-spelling, and formatter-parsing.
218;; Many random bugs, like commented comments being skipped, fix to 218;; Many random bugs, like commented comments being skipped, fix to
diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el
index 0596f8b5bff..c33ae58e7e7 100644
--- a/lisp/thingatpt.el
+++ b/lisp/thingatpt.el
@@ -22,7 +22,7 @@
22 22
23;; This file provides routines for getting the `thing' at the location of 23;; This file provides routines for getting the `thing' at the location of
24;; point, whatever that `thing' happens to be. The `thing' is defined by 24;; point, whatever that `thing' happens to be. The `thing' is defined by
25;; it's beginning and end positions in the buffer. 25;; its beginning and end positions in the buffer.
26;; 26;;
27;; The function bounds-of-thing-at-point finds the beginning and end 27;; The function bounds-of-thing-at-point finds the beginning and end
28;; positions by moving first forward to the end of the `thing', and then 28;; positions by moving first forward to the end of the `thing', and then