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