diff options
| author | Anders Lindgren | 2015-12-11 07:16:02 +0100 |
|---|---|---|
| committer | Anders Lindgren | 2015-12-11 07:16:02 +0100 |
| commit | 1143016d04d8a0c5df467022d7208b71d593fd90 (patch) | |
| tree | 47da867c3c0b9ee472a9a1c30e9ed0ca13ab9034 | |
| parent | 0284660f272a51d17a6f67389a7fa92abf8dec7a (diff) | |
| download | emacs-1143016d04d8a0c5df467022d7208b71d593fd90.tar.gz emacs-1143016d04d8a0c5df467022d7208b71d593fd90.zip | |
Fixed subversion vc error when opening file in new directory (bug#21984).
* lisp/vc/vc-svn.el (vc-svn-registered): Check if directory exists.
| -rw-r--r-- | lisp/vc/vc-svn.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/vc/vc-svn.el b/lisp/vc/vc-svn.el index 62689a38423..a15f3413a8d 100644 --- a/lisp/vc/vc-svn.el +++ b/lisp/vc/vc-svn.el | |||
| @@ -147,7 +147,8 @@ switches." | |||
| 147 | (defun vc-svn-registered (file) | 147 | (defun vc-svn-registered (file) |
| 148 | "Check if FILE is SVN registered." | 148 | "Check if FILE is SVN registered." |
| 149 | (setq file (expand-file-name file)) | 149 | (setq file (expand-file-name file)) |
| 150 | (when (vc-svn-root file) | 150 | (when (and (vc-svn-root file) |
| 151 | (file-directory-p (file-name-directory file))) | ||
| 151 | (with-temp-buffer | 152 | (with-temp-buffer |
| 152 | (cd (file-name-directory file)) | 153 | (cd (file-name-directory file)) |
| 153 | (let* (process-file-side-effects | 154 | (let* (process-file-side-effects |