diff options
| -rw-r--r-- | lisp/vc.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc.el b/lisp/vc.el index a2ac1ee7208..a6c5b47e7fd 100644 --- a/lisp/vc.el +++ b/lisp/vc.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Maintainer: Andre Spiegel <spiegel@gnu.org> | 6 | ;; Maintainer: Andre Spiegel <spiegel@gnu.org> |
| 7 | ;; Keywords: tools | 7 | ;; Keywords: tools |
| 8 | 8 | ||
| 9 | ;; $Id: vc.el,v 1.325 2002/01/05 17:15:20 spiegel Exp $ | 9 | ;; $Id: vc.el,v 1.326 2002/02/21 21:00:35 spiegel Exp $ |
| 10 | 10 | ||
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | 12 | ||
| @@ -1877,7 +1877,7 @@ actually call the backend, but performs a local diff." | |||
| 1877 | (if (listp diff-switches) diff-switches (list diff-switches)) | 1877 | (if (listp diff-switches) diff-switches (list diff-switches)) |
| 1878 | (if (listp vc-diff-switches) vc-diff-switches (list vc-diff-switches)) | 1878 | (if (listp vc-diff-switches) vc-diff-switches (list vc-diff-switches)) |
| 1879 | (let* ((backend-switches-symbol | 1879 | (let* ((backend-switches-symbol |
| 1880 | (intern (concat "vc-" (symbol-name ,backend) | 1880 | (intern (concat "vc-" (downcase (symbol-name ,backend)) |
| 1881 | "-diff-switches"))) | 1881 | "-diff-switches"))) |
| 1882 | (backend-switches | 1882 | (backend-switches |
| 1883 | (if (boundp backend-switches-symbol) | 1883 | (if (boundp backend-switches-symbol) |