* vc-svn.el (vc-svn-parse-status): Set the 'unregisted property correctly.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 582cfb115fcf75f721858553317aa3762c4d1364..bf1b6f91811651e2f6719b117385b20da0ec6371 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2008-01-01  Eric S. Raymond  <esr@snark.thyrsus.com>
 
+       * vc-svn.el (vc-svn-parse-status): Set the 'unregisted property 
+       correctly.
+
        * vc.el (vc-dired-hook):  Speed tuning.  Replace a vc-backend call
        with vc-state.
 

diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el
index 96bc1284f767ee0a9d378fb39d2766c5d0de1ddc..6fcc1239fb334420288dce81a2b5c362cbcac7da 100644 (file)
--- a/lisp/vc-svn.el
+++ b/lisp/vc-svn.el
@@ -548,7 +548,7 @@ information about FILENAME and return its status."
     (goto-char (point-min))
     (while (re-search-forward
             ;; Ignore the files with status X.
-           "^\\? +|^[ ACDGIMR!~][ MC][ L][ +][ S]..\\([ *]\\) +\\([-0-9]+\\) +\\([0-9?]+\\) +\\([^ ]+\\) +" nil t)
+           "^\\(\\?\\|[ ACDGIMR!~][ MC][ L][ +][ S]..\\([ *]\\) +\\([-0-9]+\\) +\\([0-9?]+\\) +\\([^ ]+\\)\\) +" nil t)
       ;; If the username contains spaces, the output format is ambiguous,
       ;; so don't trust the output's filename unless we have to.
       (setq file (or filename