diff options
| -rw-r--r-- | lisp/vc-svn.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el index 780b71746ce..3117a0a33bd 100644 --- a/lisp/vc-svn.el +++ b/lisp/vc-svn.el | |||
| @@ -131,7 +131,7 @@ by these regular expressions." | |||
| 131 | (condition-case nil | 131 | (condition-case nil |
| 132 | (vc-svn-command t 0 file "status" "-v") | 132 | (vc-svn-command t 0 file "status" "-v") |
| 133 | ;; We can't find an `svn' executable. We could also deregister SVN. | 133 | ;; We can't find an `svn' executable. We could also deregister SVN. |
| 134 | (file-error nil) | 134 | (file-error nil)) |
| 135 | (vc-svn-parse-status t) | 135 | (vc-svn-parse-status t) |
| 136 | (eq 'SVN (vc-file-getprop file 'vc-backend))))) | 136 | (eq 'SVN (vc-file-getprop file 'vc-backend))))) |
| 137 | 137 | ||
| @@ -454,7 +454,7 @@ The changes are between FIRST-VERSION and SECOND-VERSION." | |||
| 454 | (diff-switches-list (vc-diff-switches-list 'SVN))) | 454 | (diff-switches-list (vc-diff-switches-list 'SVN))) |
| 455 | (apply 'vc-svn-command "*vc-diff*" 1 nil "diff" | 455 | (apply 'vc-svn-command "*vc-diff*" 1 nil "diff" |
| 456 | (append | 456 | (append |
| 457 | (when oldvers | 457 | (when rev1 |
| 458 | (list "-r" | 458 | (list "-r" |
| 459 | (if rev2 (concat rev1 ":" rev2) rev1))) | 459 | (if rev2 (concat rev1 ":" rev2) rev1))) |
| 460 | (when diff-switches-list | 460 | (when diff-switches-list |