diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/vc-svn.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fc938a89929..dbba47e0883 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2008-01-10 Dan Nicolaescu <dann@ics.uci.edu> | ||
| 2 | |||
| 3 | * vc-svn.el (vc-svn-registered): Return the correct value for | ||
| 4 | ignored and unregistered files. | ||
| 5 | |||
| 1 | 2008-01-10 Tassilo Horn <tassilo@member.fsf.org> | 6 | 2008-01-10 Tassilo Horn <tassilo@member.fsf.org> |
| 2 | 7 | ||
| 3 | * doc-view.el (tramp): Require tramp because we use | 8 | * doc-view.el (tramp): Require tramp because we use |
diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el index f50d5ab5dee..e387b57d4fe 100644 --- a/lisp/vc-svn.el +++ b/lisp/vc-svn.el | |||
| @@ -132,7 +132,8 @@ If you want to force an empty list of arguments, use t." | |||
| 132 | ;; an `error' by vc-do-command. | 132 | ;; an `error' by vc-do-command. |
| 133 | (error nil)))) | 133 | (error nil)))) |
| 134 | (when (eq 0 status) | 134 | (when (eq 0 status) |
| 135 | (vc-svn-parse-status file)))))) | 135 | (not (memq (vc-svn-parse-status file) |
| 136 | '(ignored unregistered)))))))) | ||
| 136 | 137 | ||
| 137 | (defun vc-svn-state (file &optional localp) | 138 | (defun vc-svn-state (file &optional localp) |
| 138 | "SVN-specific version of `vc-state'." | 139 | "SVN-specific version of `vc-state'." |