[Emacs-diffs] /srv/bzr/emacs/trunk r110217: * admin/admin.el (set-version): Set msdos.c's Vwindow_system_version.

[Glenn Morris]

------------------------------------------------------------
revno: 110217
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Wed 2012-09-26 23:45:38 -0700
message:
  * admin/admin.el (set-version): Set msdos.c's Vwindow_system_version.
modified:
  admin/ChangeLog
  admin/admin.el

=== modified file 'admin/ChangeLog'
--- a/admin/ChangeLog   2012-09-27 01:06:23 +0000
+++ b/admin/ChangeLog   2012-09-27 06:45:38 +0000
@@ -1,3 +1,7 @@
+2012-09-27  Glenn Morris  <address@hidden>
+
+       * admin.el (set-version): Set msdos.c's Vwindow_system_version.
+
 2012-09-27  Paul Eggert  <address@hidden>
 
        Check more robustly for timer_settime.

=== modified file 'admin/admin.el'
--- a/admin/admin.el    2012-09-17 07:35:17 +0000
+++ b/admin/admin.el    2012-09-27 06:45:38 +0000
@@ -129,8 +129,12 @@
                         (rx (and "\"ProductVersion\"" (0+ space) ?,
                                  (0+ space) ?\" (submatch (1+ (in "0-9, ")))
                                  "\\0\"")))
+    ;; Major version only.
     (when (string-match "\\([0-9]\\{2,\\}\\)" version)
       (setq version (match-string 1 version))
+      (set-version-in-file root "src/msdos.c" version
+                          (rx (and "Vwindow_system_version" (1+ not-newline)
+                                   ?\( (submatch (1+ (in "0-9"))) ?\))))
       (set-version-in-file root "etc/refcards/ru-refcard.tex" version
                           "\\\\newcommand{\\\\versionemacs}\\[0\\]\
 {\\([0-9]\\{2,\\}\\)}.+%.+version of Emacs")