diff options
author | Karl Fogel <kfogel@red-bean.com> | 2004-06-04 04:37:10 +0000 |
---|---|---|
committer | Karl Fogel <kfogel@red-bean.com> | 2004-06-04 04:37:10 +0000 |
commit | 5129f10c94db38789a92f396f568f993d726e7bd (patch) | |
tree | a249aaf3a7f662896eead6591f5c27a134efac62 | |
parent | 7e07a66d8514df69a4061e6c6fa6dfd8650c12fc (diff) | |
download | emacs-5129f10c94db38789a92f396f568f993d726e7bd.tar.gz |
2004-06-03 Karl Fogel <kfogel@red-bean.com>
* vc-svn.el (vc-svn-checkin): Use 'nconc' instead of 'list*',
because the latter is a CL-ism. This fixes the bug reported by
Shawn Boyette <mdxi@collapsar.net> in
http://lists.gnu.org/archive/html/emacs-devel/2004-05/msg00442.html.
-rw-r--r-- | lisp/ChangeLog | 7 | ||||
-rw-r--r-- | lisp/vc-svn.el | 5 |
2 files changed, 10 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 70c3d9d8942..8d4381a6961 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2004-06-03 Karl Fogel <kfogel@red-bean.com> + + * vc-svn.el (vc-svn-checkin): Use 'nconc' instead of 'list*', + because the latter is a CL-ism. This fixes the bug reported by + Shawn Boyette <mdxi@collapsar.net> in + http://lists.gnu.org/archive/html/emacs-devel/2004-05/msg00442.html. + 2004-06-04 Miles Bader <miles@gnu.org> * faces.el (face-differs-from-default-p): Use a different diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el index 4db9788cc3b..82c09cbd435 100644 --- a/lisp/vc-svn.el +++ b/lisp/vc-svn.el @@ -195,8 +195,9 @@ This is only possible if SVN is responsible for FILE's directory.") (defun vc-svn-checkin (file rev comment) "SVN-specific version of `vc-backend-checkin'." - (let ((status (apply 'vc-svn-command nil 1 file - "ci" (list* "-m" comment (vc-switches 'SVN 'checkin))))) + (let ((status (apply + 'vc-svn-command nil 1 file "ci" + (nconc (list "-m" comment) (vc-switches 'SVN 'checkin))))) (set-buffer "*vc*") (goto-char (point-min)) (unless (equal status 0) |