diff options
author | Miles Bader <miles@gnu.org> | 2004-04-10 05:55:49 +0000 |
---|---|---|
committer | Miles Bader <miles@gnu.org> | 2004-04-10 05:55:49 +0000 |
commit | 1f3ddf11e81c4c707fe2f231d05012185b842403 (patch) | |
tree | adac996fb52c2cb641f3938e4372dbdbd995cc2f /lisp/emacs-lisp/bytecomp.el | |
parent | 28082746298b033e823123e2252a8c73e9ca43c0 (diff) | |
download | emacs-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/emacs-lisp/bytecomp.el')
-rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index e2a228c0d79..220a7d8d92d 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -8,10 +8,6 @@ ;; Maintainer: FSF ;; Keywords: lisp -;;; This version incorporates changes up to version 2.10 of the -;;; Zawinski-Furuseth compiler. -(defconst byte-compile-version "$Revision: 2.143 $") - ;; This file is part of GNU Emacs. ;; GNU Emacs is free software; you can redistribute it and/or modify @@ -1860,10 +1856,7 @@ With argument, insert value in current buffer after the form." " on " (current-time-string) "\n;;; from file " filename "\n") (insert ";;; in Emacs version " emacs-version "\n") - (insert ";;; with bytecomp version " - (progn (string-match "[0-9.]+" byte-compile-version) - (match-string 0 byte-compile-version)) - "\n;;; " + (insert ";;; " (cond ((eq byte-optimize 'source) "with source-level optimization only") ((eq byte-optimize 'byte) "with byte-level optimization only") |