summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1998-10-06 23:22:48 +0000
committerKarl Heuer <kwzh@gnu.org>1998-10-06 23:22:48 +0000
commit4e0c86509db6ba0a4d1154e639a94413889f28b5 (patch)
tree99757c32d0b9897f5bf5dba5b5ec07ec52aa72cb
parent4a08d192a7672cda2ebe690dac82018e77fc36f2 (diff)
downloademacs-4e0c86509db6ba0a4d1154e639a94413889f28b5.tar.gz
Comment fix.
-rw-r--r--lisp/completion.el4
-rw-r--r--lisp/files.el2
-rw-r--r--lisp/forms.el6
-rw-r--r--lisp/mail/sendmail.el2
4 files changed, 7 insertions, 7 deletions
diff --git a/lisp/completion.el b/lisp/completion.el
index e17b01d4379..297184e99bb 100644
--- a/lisp/completion.el
+++ b/lisp/completion.el
@@ -2346,14 +2346,14 @@ If file name is not specified, use `save-completions-file-name'."
(record-save-completions total-in-db total-perm total-saved))
))))
-;;(defun autosave-completions ()
+;;(defun auto-save-completions ()
;; (if (and save-completions-flag enable-completion cmpl-initialized-p
;; *completion-auto-save-period*
;; (> cmpl-emacs-idle-time *completion-auto-save-period*)
;; cmpl-completions-accepted-p)
;; (save-completions-to-file)))
-;;(add-hook 'cmpl-emacs-idle-time-hooks 'autosave-completions)
+;;(add-hook 'cmpl-emacs-idle-time-hooks 'auto-save-completions)
(defun load-completions-from-file (&optional filename no-message-p)
"Loads a completion init file FILENAME.
diff --git a/lisp/files.el b/lisp/files.el
index 7e3a01c1d65..bb1667eb502 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2859,7 +2859,7 @@ With prefix argument ARG, turn auto-saving on if positive, else off."
(setq buffer-auto-save-file-name
(and (if (null arg)
(or (not buffer-auto-save-file-name)
- ;; If autosave is off because buffer has shrunk,
+ ;; If auto-save is off because buffer has shrunk,
;; then toggling should turn it on.
(< buffer-saved-size 0))
(or (eq arg t) (listp arg) (and (integerp arg) (> arg 0))))
diff --git a/lisp/forms.el b/lisp/forms.el
index f42ccdd6f1b..ab34fda4f34 100644
--- a/lisp/forms.el
+++ b/lisp/forms.el
@@ -296,10 +296,10 @@
(provide 'forms) ;;; official
(provide 'forms-mode) ;;; for compatibility
-(defconst forms-version (substring "$Revision: 2.34 $" 11 -2)
+(defconst forms-version (substring "$Revision: 2.35 $" 11 -2)
"The version number of forms-mode (as string). The complete RCS id is:
- $Id: forms.el,v 2.34 1997/08/27 23:10:59 rms Exp stephen $")
+ $Id: forms.el,v 2.35 1998/07/17 14:01:15 stephen Exp kwzh $")
(defcustom forms-mode-hooks nil
"Hook functions to be run upon entering Forms mode."
@@ -589,7 +589,7 @@ Commands: Equivalent keys in read-only mode:
;; Dynamic text support.
(make-local-variable 'forms--dynamic-text)
- ;; Prevent accidental overwrite of the control file and autosave.
+ ;; Prevent accidental overwrite of the control file and auto-save.
(set-visited-file-name nil)
;; Prepare this buffer for further processing.
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index c5ebe297914..90e4b2b4588 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -701,7 +701,7 @@ the user from the mailer."
(error))
(setq mail-send-actions (cdr mail-send-actions)))
(message "Sending...done")
- ;; If buffer has no file, mark it as unmodified and delete autosave.
+ ;; If buffer has no file, mark it as unmodified and delete auto-save.
(if (not buffer-file-name)
(progn
(set-buffer-modified-p nil)