changeset 80731:0b6e7c19f082

(set-version): Set version in nt/emacsclient.rc
author Jason Rumney <jasonr@gnu.org>
date Sat, 16 Aug 2008 04:15:12 +0000
parents 548fc19ce253
children ff108ff68535
files admin/ChangeLog admin/admin.el
diffstat 2 files changed, 18 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/admin/ChangeLog	Sat Aug 16 03:41:26 2008 +0000
+++ b/admin/ChangeLog	Sat Aug 16 04:15:12 2008 +0000
@@ -1,3 +1,7 @@
+2008-08-16  Jason Rumney  <jasonr@gnu.org>
+
+	* admin.el (set-version): Set version in nt/emacsclient.rc
+
 2008-03-26  Chong Yidong  <cyd@stupidchicken.com>
 
 	* Version 22.2 released.
--- a/admin/admin.el	Sat Aug 16 03:41:26 2008 +0000
+++ b/admin/admin.el	Sat Aug 16 04:15:12 2008 +0000
@@ -121,6 +121,20 @@
 			 (rx (and "\"ProductVersion\"" (0+ space) ?,
 				  (0+ space) ?\" (submatch (1+ (in "0-9, ")))
 				  "\\0\"")))
+    ;; Likewise for emacsclient.rc
+    (set-version-in-file root "nt/emacsclient.rc" comma-version
+			 (rx (and "FILEVERSION" (1+ space)
+				  (submatch (1+ (in "0-9,"))))))
+    (set-version-in-file root "nt/emacsclient.rc" comma-version
+			 (rx (and "PRODUCTVERSION" (1+ space)
+				  (submatch (1+ (in "0-9,"))))))
+    (set-version-in-file root "nt/emacsclient.rc" comma-space-version
+			 (rx (and "\"FileVersion\"" (0+ space) ?, (0+ space)
+				  ?\" (submatch (1+ (in "0-9, "))) "\\0\"")))
+    (set-version-in-file root "nt/emacsclient.rc" comma-space-version
+			 (rx (and "\"ProductVersion\"" (0+ space) ?,
+				  (0+ space) ?\" (submatch (1+ (in "0-9, ")))
+				  "\\0\"")))
     ;; Some files in the "mac" subdirectory also contain the version
     ;; number.
     (set-version-in-file