diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2007-06-11 18:41:09 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2007-06-11 18:41:09 +0000 |
| commit | e4cc3f57aa79387e1ef550bef9e971a66a6cc27f (patch) | |
| tree | 749d276f165d007fb6acd8ef5aca480340b0067f /lisp | |
| parent | 29d696617974c2ae878e5c2e3f5604459889c8e2 (diff) | |
| download | emacs-e4cc3f57aa79387e1ef550bef9e971a66a6cc27f.tar.gz | |
(vc-svn-program): New var.
(vc-svn-command): Use it.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/vc-svn.el | 7 |
2 files changed, 11 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7ab55f730a3..a9fefcfce89 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2007-06-11 Stefan Monnier <monnier@iro.umontreal.ca> + + * vc-svn.el (vc-svn-program): New var. + (vc-svn-command): Use it. + 2007-06-11 Juanma Barranquero <lekktu@gmail.com> * server.el (server-switch-buffer): Remove redundant check. diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el index 1538a2a1ab3..b109f48d91d 100644 --- a/lisp/vc-svn.el +++ b/lisp/vc-svn.el @@ -464,11 +464,16 @@ NAME is assumed to be a URL." ;;; Internal functions ;;; +(defcustom vc-svn-program "svn" + "Name of the svn executable." + :type 'string + :group 'vc) + (defun vc-svn-command (buffer okstatus file &rest flags) "A wrapper around `vc-do-command' for use in vc-svn.el. The difference to vc-do-command is that this function always invokes `svn', and that it passes `vc-svn-global-switches' to it before FLAGS." - (apply 'vc-do-command buffer okstatus "svn" file + (apply 'vc-do-command buffer okstatus vc-svn-program file (if (stringp vc-svn-global-switches) (cons vc-svn-global-switches flags) (append vc-svn-global-switches |