User: scop
Date: 05/12/05 11:37:58
Modified: packages/unsupported/scop/vc ChangeLog log-edit.el
Log:
Sync log-edit.el with upstream.
Revision Changes Path
1.51 +1 -1 XEmacs/packages/unsupported/scop/STATUS
Index: STATUS
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/unsupported/scop/STATUS,v
retrieving revision 1.50
retrieving revision 1.51
diff -u -p -r1.50 -r1.51
--- STATUS 2005/11/28 21:08:19 1.50
+++ STATUS 2005/12/05 10:37:53 1.51
@@ -17,5 +17,5 @@ generic-modes: generic.el and generic-x.
- Compiles, seems to work, auto-mode-alist and autoloads may need spanking.
vc: vc*.el and a few other related files from GNU Emacs
-- Up to date with GNU Emacs CVS HEAD as of 2005-11-28.
+- Up to date with GNU Emacs CVS HEAD as of 2005-12-05.
- Compiles, something even works.
1.37 +4 -0 XEmacs/packages/unsupported/scop/vc/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/unsupported/scop/vc/ChangeLog,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -p -r1.36 -r1.37
--- ChangeLog 2005/11/28 21:08:22 1.36
+++ ChangeLog 2005/12/05 10:37:57 1.37
@@ -1,3 +1,7 @@
+2005-12-05 Ville Skyttä <scop(a)xemacs.org>
+
+ * log-edit.el: Sync with upstream.
+
2005-11-28 Ville Skyttä <scop(a)xemacs.org>
* log-edit.el: Sync with upstream.
1.8 +4 -2 XEmacs/packages/unsupported/scop/vc/log-edit.el
Index: log-edit.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/unsupported/scop/vc/log-edit.el,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -p -r1.7 -r1.8
--- log-edit.el 2005/11/28 21:08:23 1.7
+++ log-edit.el 2005/12/05 10:37:58 1.8
@@ -449,8 +449,10 @@ This contacts the repository to get the
can thus take some time."
(interactive)
(when (or (interactive-p) (= (point-min) (point-max)))
- (when (file-readable-p "CVS/Entries")
- (call-process "cvs" nil t nil "checkout" "-p"
"CVSROOT/rcstemplate"))))
+ (when (file-readable-p "CVS/Root")
+ ;; Ignore the stderr stuff, even if it's an error.
+ (call-process "cvs" nil '(t nil) nil
+ "checkout" "-p"
"CVSROOT/rcstemplate"))))
(defun log-edit-insert-filenames ()
"Insert the list of files that are to be committed."
Show replies by date