# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1199974626 0
# Node ID 5947c9dc7f6bb747979861beedfbeac98554a319
# Parent  f468b5e13da224bf7532f7ba6ab6a7c547d9c4c9
(vc-svn-registered): Return the correct value for
ignored and unregistered files.

diff -r f468b5e13da2 -r 5947c9dc7f6b lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Jan 10 11:29:41 2008 +0000
+++ b/lisp/ChangeLog	Thu Jan 10 14:17:06 2008 +0000
@@ -1,3 +1,8 @@
+2008-01-10  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* vc-svn.el (vc-svn-registered): Return the correct value for
+	ignored and unregistered files.
+
 2008-01-10  Tassilo Horn  <tassilo@member.fsf.org>
 
 	* doc-view.el (tramp): Require tramp because we use
diff -r f468b5e13da2 -r 5947c9dc7f6b lisp/vc-svn.el
--- a/lisp/vc-svn.el	Thu Jan 10 11:29:41 2008 +0000
+++ b/lisp/vc-svn.el	Thu Jan 10 14:17:06 2008 +0000
@@ -132,7 +132,8 @@
                ;; an `error' by vc-do-command.
                (error nil))))
         (when (eq 0 status)
-          (vc-svn-parse-status file))))))
+	  (not (memq (vc-svn-parse-status file) 
+		     '(ignored unregistered))))))))
 
 (defun vc-svn-state (file &optional localp)
   "SVN-specific version of `vc-state'."