mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00
Code Issues Releases Activity

2004-06-03 Karl Fogel <kfogel@red-bean.com>

Browse Source 
* 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.
This commit is contained in:
Karl Fogel 2004-06-04 04:37:10 +00:00
parent 7e07a66d85
commit 5129f10c94
2 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/ChangeLog
View File

@ -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

5
lisp/vc-svn.el
View File

@ -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)