Mercurial > emacs
changeset 23382:55b2ea28932a
Comment fix.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Tue, 06 Oct 1998 23:22:48 +0000 |
| parents | 4f20b9ddbea6 |
| children | 7af3fdca3189 |
| files | lisp/completion.el lisp/files.el lisp/forms.el lisp/mail/sendmail.el |
| diffstat | 4 files changed, 7 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/completion.el Tue Oct 06 23:21:47 1998 +0000 +++ b/lisp/completion.el Tue Oct 06 23:22:48 1998 +0000 @@ -2346,14 +2346,14 @@ (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.
--- a/lisp/files.el Tue Oct 06 23:21:47 1998 +0000 +++ b/lisp/files.el Tue Oct 06 23:22:48 1998 +0000 @@ -2859,7 +2859,7 @@ (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))))
--- a/lisp/forms.el Tue Oct 06 23:21:47 1998 +0000 +++ b/lisp/forms.el Tue Oct 06 23:22:48 1998 +0000 @@ -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 @@ ;; 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.
--- a/lisp/mail/sendmail.el Tue Oct 06 23:21:47 1998 +0000 +++ b/lisp/mail/sendmail.el Tue Oct 06 23:22:48 1998 +0000 @@ -701,7 +701,7 @@ (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)