From: Bob Rogers <rogers-emacs@rgrjr.dyndns.org>
Date: Sat, 12 Jun 2010 07:34:36 +0000 (-0700)
Subject: Close bug#6361.
X-Git-Tag: emacs-pretest-23.2.90~139^2~130
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a9de35feef40cef53f6205628cf8a8ebe9b0c99b;p=emacs.git

Close bug#6361.

* lisp/vc-svn.el (vc-svn-after-dir-status): Fix regexp for Subversions
older than version 1.6.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1de8e4af69b..903c0d46f86 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-06-12  Bob Rogers  <rogers-emacs@rgrjr.dyndns.org>  (tiny change)
+
+	* vc-svn.el (vc-svn-after-dir-status): Fix regexp for Subversions
+	older than version 1.6.  (Bug#6361)
+
 2010-06-12  Helmut Eller  <eller.helmut@gmail.com>
 
 	* emacs-lisp/cl-macs.el (destructuring-bind): Bind `bind-enquote',
diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el
index 6883556f249..34ebc3bb949 100644
--- a/lisp/vc-svn.el
+++ b/lisp/vc-svn.el
@@ -170,7 +170,7 @@ want to force an empty list of arguments, use t."
                      (?? . unregistered)
                      ;; This is what vc-svn-parse-status does.
                      (?~ . edited)))
-	(re (if remote "^\\(.\\)...... \\([ *]\\) +\\(?:[-0-9]+\\)?   \\(.*\\)$"
+	(re (if remote "^\\(.\\)......? \\([ *]\\) +\\(?:[-0-9]+\\)?   \\(.*\\)$"
 	      ;; Subexp 2 is a dummy in this case, so the numbers match.
 	      "^\\(.\\)....\\(.\\) \\(.*\\)$"))
        result)