Dear developers -
On Thu, Dec 22, 2011 at 10:00 AM, Vin Shelton wrote:
Does that mean you're in favor of manually expanding the
keywords
where appropriate and leaving them fossilized in amber? (I'd guess
that "where appropriate" means wherever they are used in code.) If
so, I'll download the pre-built packages and extract the current
values of '$Revision$' and update the affected packages. Manually
updating those keywords will " 'ardly hever 'appen " (to coin a
phrase).
Included is the modest list of references to $Revision$ used in code
in the packages. I have updated the version numbers to the most
recent ones from the released packages. I left out erc because there
were too many occurrences and I was too lazy.
I'll commit these changes sometime over the weekend unless I hear any
objections.
By the way, working with the packages in the current repo structure is
less than ideal. Here's how I generated this diff:
cd ~/scmroot/xemacs-packages
for d in *-packages/*(/); do
cd $d
hg diff
cd -
done
This results in diffs that don't actually say what repository they are
against! For instance the first chunk of diffs come from edit-utils,
but that is not obvious from the diff.
Suggestions welcome.
- Vin
diff -r 6809d81c434e ChangeLog
--- a/ChangeLog Sat Sep 03 14:45:06 2011 +0200
+++ b/ChangeLog Thu Dec 22 15:11:49 2011 -0500
@@ -1,3 +1,9 @@
+2011-12-22 Vin Shelton <acs(a)xemacs.org>
+
+ * allout.el (outline-version):
+ * winring.el (winring-version): Set $Revision to the most recent
+ CVS revision number.
+
2011-05-11 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 2.44 released.
diff -r 6809d81c434e allout.el
--- a/allout.el Sat Sep 03 14:45:06 2011 +0200
+++ b/allout.el Thu Dec 22 15:11:49 2011 -0500
@@ -509,7 +509,7 @@
;;;_ : Version
;;;_ = outline-version
(defvar outline-version
- (let ((rcs-rev "$Revision$"))
+ (let ((rcs-rev "$Revision: 1.1 $"))
(condition-case err
(save-match-data
(string-match "Revision: \\([0-9]+\\.[0-9]+\\)" rcs-rev)
diff -r 6809d81c434e winring.el
--- a/winring.el Sat Sep 03 14:45:06 2011 +0200
+++ b/winring.el Thu Dec 22 15:11:49 2011 -0500
@@ -8,7 +8,7 @@
;; Created: March 1997
;; Keywords: frames tools
-(defconst winring-version "$Revision$"
+(defconst winring-version "$Revision: 1.2 $"
"winring version number.")
;; This file is part of GNU Emacs.
diff -r 689c9d91c5de ChangeLog
--- a/ChangeLog Sat Sep 03 14:45:55 2011 +0200
+++ b/ChangeLog Thu Dec 22 15:11:50 2011 -0500
@@ -1,3 +1,8 @@
+2011-12-22 Vin Shelton <acs(a)xemacs.org>
+
+ * forms.el (forms-version): Set $Revision to the most recent CVS
+ revision number.
+
2003-10-31 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 1.15 released.
diff -r 689c9d91c5de forms.el
--- a/forms.el Sat Sep 03 14:45:55 2011 +0200
+++ b/forms.el Thu Dec 22 15:11:50 2011 -0500
@@ -302,7 +302,7 @@
(provide 'forms) ;;; official
(provide 'forms-mode) ;;; for compatibility
-(defconst forms-version (substring "$Revision$" 11 -2)
+(defconst forms-version (substring "$Revision: 1.3 $" 11 -2)
"The version number of forms-mode (as string). The complete RCS id is:
$Id$")
diff -r c149ad62c874 ChangeLog
--- a/ChangeLog Sat Sep 03 14:49:34 2011 +0200
+++ b/ChangeLog Thu Dec 22 15:11:52 2011 -0500
@@ -1,3 +1,8 @@
+2011-12-22 Vin Shelton <acs(a)xemacs.org>
+
+ * net-utils.el (net-utils-version): Set $Revision to the most
+ recent CVS revision number.
+
2008-04-07 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 1.56 released.
diff -r c149ad62c874 net-utils.el
--- a/net-utils.el Sat Sep 03 14:49:34 2011 +0200
+++ b/net-utils.el Thu Dec 22 15:11:52 2011 -0500
@@ -71,7 +71,7 @@
(require 'font-lock)
(autoload 'ffap-string-at-point "ffap"))
-(defconst net-utils-version (substring "$Revision$" 11 -2)
+(defconst net-utils-version (substring "$Revision: 1.5 $" 11 -2)
"The version number of net-utils (as string). The complete RCS id is:
$Id$")
diff -r be87a7f039ff ChangeLog
--- a/ChangeLog Sat Sep 03 14:50:00 2011 +0200
+++ b/ChangeLog Thu Dec 22 15:11:53 2011 -0500
@@ -1,3 +1,8 @@
+2011-12-21 Vin Shelton <acs(a)xemacs.org>
+
+ * cperl-mode.el (cperl-version): Since mercurial is not doing
+ keyword expansion, fill the revision in manually.
+
2008-04-20 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 1.14 released.
diff -r be87a7f039ff cperl-mode.el
--- a/cperl-mode.el Sat Sep 03 14:50:00 2011 +0200
+++ b/cperl-mode.el Thu Dec 22 15:11:53 2011 -0500
@@ -10629,7 +10629,7 @@
(cperl-fontify-syntaxically to)))))
(defvar cperl-version
- (let ((v "$Revision$"))
+ (let ((v "$Revision: 6.2 $"))
(string-match ":\\s *\\([0-9.]+\\)" v)
(substring v (match-beginning 1) (match-end 1)))
"Version of IZ-supported CPerl package this file is based on.")
diff -r af4ec0ea580f ChangeLog
--- a/ChangeLog Sat Sep 03 14:50:20 2011 +0200
+++ b/ChangeLog Thu Dec 22 15:11:53 2011 -0500
@@ -1,3 +1,9 @@
+2011-12-22 Vin Shelton <acs(a)xemacs.org>
+
+ * verilog-mode.el (verilog-mode-version):
+ * ksh-mode.el (ksh-mode): Set $Revision to the most recent CVS
+ revision number.
+
2011-05-16 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 2.25 released.
diff -r af4ec0ea580f ksh-mode.el
--- a/ksh-mode.el Sat Sep 03 14:50:20 2011 +0200
+++ b/ksh-mode.el Thu Dec 22 15:11:53 2011 -0500
@@ -237,7 +237,7 @@
;; Conception of this mode.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(defconst ksh-mode-version "$Revision$"
+(defconst ksh-mode-version "$Revision: 1.4 $"
"*Version numbers of this version of ksh-mode")
;;
@@ -505,7 +505,7 @@
;;;###autoload
(defun ksh-mode ()
- "ksh-mode $Revision$ - Major mode for editing (Bourne, Korn or Bourne again)
+ "ksh-mode $Revision: 1.4 $ - Major mode for editing (Bourne, Korn
or Bourne again)
shell scripts.
Special key bindings and commands:
\\{ksh-mode-map}
diff -r af4ec0ea580f verilog-mode.el
--- a/verilog-mode.el Sat Sep 03 14:50:20 2011 +0200
+++ b/verilog-mode.el Thu Dec 22 15:11:53 2011 -0500
@@ -120,7 +120,7 @@
;;;###autoload(add-to-list 'auto-mode-alist
'("\\.\\(vh?\\|svh?\\|dv\\)\\'" . verilog-mode))
;; This variable will always hold the version number of the mode
-(defconst verilog-mode-version (substring "$$Revision$$" 12 -3)
+(defconst verilog-mode-version (substring "$$Revision: 463 $$" 12 -3)
"Version of this Verilog mode.")
(defconst verilog-mode-release-date (substring "$$Date$$" 8 -3)
"Release date of this Verilog mode.")
diff -r a7ab7206d8fa ChangeLog
--- a/ChangeLog Sat Sep 03 14:51:46 2011 +0200
+++ b/ChangeLog Thu Dec 22 15:11:55 2011 -0500
@@ -1,3 +1,8 @@
+2011-12-22 Vin Shelton <acs(a)xemacs.org>
+
+ * folding.el (folding-version): Set $Revision to the most recent
+ CVS revision number.
+
2010-10-19 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 2.00 released.
diff -r a7ab7206d8fa folding.el
--- a/folding.el Sat Sep 03 14:51:46 2011 +0200
+++ b/folding.el Thu Dec 22 15:11:55 2011 -0500
@@ -1810,7 +1810,7 @@
(defvar folding-stack nil
"Internal. A list of marker pairs representing folds entered so far.")
-(defvar folding-version (substring "$Revision$" 11 15)
+(defvar folding-version (substring "$Revision: 1.25 $" 11 15)
"Version number of folding.el.")
;;}}}
diff -r 9c8d90ff0183 ChangeLog
--- a/ChangeLog Sat Sep 03 14:54:05 2011 +0200
+++ b/ChangeLog Thu Dec 22 15:11:56 2011 -0500
@@ -1,3 +1,8 @@
+2011-12-22 Vin Shelton <acs(a)xemacs.org>
+
+ * bench.el (bench-version): Set $Revision to the most recent CVS
+ revision number.
+
2011-02-27 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 1.82 released.
diff -r 9c8d90ff0183 bench.el
--- a/bench.el Sat Sep 03 14:54:05 2011 +0200
+++ b/bench.el Thu Dec 22 15:11:56 2011 -0500
@@ -340,7 +340,7 @@
)
;=============================================================================
-(defconst bench-version (let ((rcsvers "$Revision$"))
+(defconst bench-version (let ((rcsvers "$Revision: 1.4 $"))
(substring rcsvers 11 (- (length rcsvers) 2)))
"*Version number of bench.el")
IMO, at some point soon, all the packages need to be re-released just
so we can build from the latest sources and track down problems like
this.
- Vin
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta