nobu	2010-05-25 16:37:41 +0900 (Tue, 25 May 2010)

  New Revision: 28010

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=28010

  Log:
    * misc/ruby-style.el (ruby-style-version): take revision if
      keyword is expanded. [ruby-dev:41408]

  Modified files:
    branches/ruby_1_9_2/ChangeLog
    branches/ruby_1_9_2/misc/ruby-style.el
    trunk/ChangeLog
    trunk/misc/ruby-style.el

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 28009)
+++ ChangeLog	(revision 28010)
@@ -1,3 +1,8 @@
+Tue May 25 16:37:39 2010  Nobuyoshi Nakada  <nobu@r...>
+
+	* misc/ruby-style.el (ruby-style-version): take revision if
+	  keyword is expanded. [ruby-dev:41408]
+
 Tue May 25 13:26:49 2010  Nobuyoshi Nakada  <nobu@r...>
 
 	* include/ruby/vm.h, include/ruby/encoding.h: add external
Index: misc/ruby-style.el
===================================================================
--- misc/ruby-style.el	(revision 28009)
+++ misc/ruby-style.el	(revision 28010)
@@ -21,7 +21,7 @@
   "Ruby style revision string.")
 
 (defconst ruby-style-version
-  (progn
+  (and
    (string-match "[0-9.]+" ruby-style-revision)
    (substring ruby-style-revision (match-beginning 0) (match-end 0)))
   "Ruby style version number.")
Index: ruby_1_9_2/ChangeLog
===================================================================
--- ruby_1_9_2/ChangeLog	(revision 28009)
+++ ruby_1_9_2/ChangeLog	(revision 28010)
@@ -1,3 +1,8 @@
+Tue May 25 16:37:39 2010  Nobuyoshi Nakada  <nobu@r...>
+
+	* misc/ruby-style.el (ruby-style-version): take revision if
+	  keyword is expanded. [ruby-dev:41408]
+
 Tue May 25 13:26:49 2010  Nobuyoshi Nakada  <nobu@r...>
 
 	* include/ruby/vm.h, include/ruby/encoding.h: add external
Index: ruby_1_9_2/misc/ruby-style.el
===================================================================
--- ruby_1_9_2/misc/ruby-style.el	(revision 28009)
+++ ruby_1_9_2/misc/ruby-style.el	(revision 28010)
@@ -21,7 +21,7 @@
   "Ruby style revision string.")
 
 (defconst ruby-style-version
-  (progn
+  (and
    (string-match "[0-9.]+" ruby-style-revision)
    (substring ruby-style-revision (match-beginning 0) (match-end 0)))
   "Ruby style version number.")

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/