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/url/url-vars.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/url/url-vars.el')
| -rw-r--r-- | lisp/url/url-vars.el | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/lisp/url/url-vars.el b/lisp/url/url-vars.el index 54698d33273..27b83541504 100644 --- a/lisp/url/url-vars.el +++ b/lisp/url/url-vars.el @@ -1,7 +1,4 @@ ;;; url-vars.el --- Variables for Uniform Resource Locator tool -;; Author: $Author: monnier $ -;; Created: $Date: 2004/04/04 01:21:46 $ -;; Version: $Revision: 1.1.1.1 $ ;; Keywords: comm, data, processes, hypermedia ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -29,10 +26,7 @@ (require 'mm-util) (eval-when-compile (require 'cl)) -(defconst url-version (let ((x "$State: Exp $")) - (if (string-match "State: \\([^ \t\n]+\\)" x) - (substring x (match-beginning 1) (match-end 1)) - x)) +(defconst url-version "Emacs" "Version number of URL package.") (defgroup url nil |