summaryrefslogtreecommitdiff
path: root/lisp/forms.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2004-04-10 05:55:49 +0000
committerMiles Bader <miles@gnu.org>2004-04-10 05:55:49 +0000
commit1f3ddf11e81c4c707fe2f231d05012185b842403 (patch)
treeadac996fb52c2cb641f3938e4372dbdbd995cc2f /lisp/forms.el
parent28082746298b033e823123e2252a8c73e9ca43c0 (diff)
downloademacs-1f3ddf11e81c4c707fe2f231d05012185b842403.tar.gz
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-196
Remove RCS keywords 2004-04-10 Miles Bader <miles@gnu.org> RCS keyword removal (only non-comment changes are enumerated here): * lisp/emacs-lisp/bytecomp.el (byte-compile-version): Variable removed. (byte-compile-insert-header): Don't use `byte-compile-version'. * lisp/url/url-vars.el (url-version): Use the constant string "Emacs" instead of calculating something from the RCS `State' keyword [the latter is almost entirely useless anyway]. * lisp/forms.el (forms-version): Variable removed. (forms-mode): Don't use `forms-version'. * lisp/recentf.el (recentf-version): Variable removed. * lisp/progmodes/delphi.el (delphi-version): Variable removed. * lisp/progmodes/ada-mode.el (ada-mode): RCS keyword removed from docstring.
Diffstat (limited to 'lisp/forms.el')
-rw-r--r--lisp/forms.el7
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/forms.el b/lisp/forms.el
index 76d4bc48c4d..aa0582c918a 100644
--- a/lisp/forms.el
+++ b/lisp/forms.el
@@ -301,11 +301,6 @@
(provide 'forms) ;;; official
(provide 'forms-mode) ;;; for compatibility
-(defconst forms-version (substring "$Revision: 2.48 $" 11 -2)
- "The version number of forms-mode (as string). The complete RCS id is:
-
- $Id: forms.el,v 2.48 2003/05/29 23:53:21 monnier Exp $")
-
(defcustom forms-mode-hook nil
"Hook run upon entering Forms mode."
:group 'forms
@@ -694,7 +689,7 @@ Commands: Equivalent keys in read-only mode:
;;(message "forms: proceeding setup (new file)...")
(progn
(insert
- "GNU Emacs Forms Mode version " forms-version "\n\n"
+ "GNU Emacs Forms Mode\n\n"
(if (file-exists-p forms-file)
(concat "No records available in file `" forms-file "'\n\n")
(format "Creating new file `%s'\nwith %d field%s per record\n\n"