Mercurial > emacs
diff lisp/forms.el @ 38436:b174db545cfd
Some fixes to follow coding conventions.
| author | Pavel Jan?k <Pavel@Janik.cz> |
|---|---|
| date | Mon, 16 Jul 2001 12:23:00 +0000 |
| parents | 6a592962088a |
| children | cd732a6001ea |
line wrap: on
line diff
--- a/lisp/forms.el Mon Jul 16 12:22:17 2001 +0000 +++ b/lisp/forms.el Mon Jul 16 12:23:00 2001 +0000 @@ -301,10 +301,10 @@ (provide 'forms) ;;; official (provide 'forms-mode) ;;; for compatibility -(defconst forms-version (substring "$Revision: 2.40 $" 11 -2) +(defconst forms-version (substring "$Revision: 2.41 $" 11 -2) "The version number of forms-mode (as string). The complete RCS id is: - $Id: forms.el,v 2.40 1999/11/13 22:05:56 gerd Exp $") + $Id: forms.el,v 2.41 2001/02/07 23:40:52 fx Exp $") (defcustom forms-mode-hooks nil "Hook run upon entering Forms mode." @@ -1219,7 +1219,7 @@ ;; Need a file to do this. (if (not (file-exists-p forms-file)) - (error "Need existing file or explicit 'forms-number-of-records'.") + (error "Need existing file or explicit 'forms-number-of-records'") ;; Visit the file and extract the first record. (setq forms--file-buffer (find-file-noselect forms-file)) @@ -2090,4 +2090,4 @@ (goto-char (point-max)) (insert ret))))) -;;; forms.el ends here. +;;; forms.el ends here
