User: scop Date: 05/09/11 17:48:17 Modified: packages/unsupported/scop/vc ChangeLog vc.el Log: Sync vc with upstream. Revision Changes Path 1.45 +1 -1 XEmacs/packages/unsupported/scop/STATUS Index: STATUS =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/unsupported/scop/STATUS,v retrieving revision 1.44 retrieving revision 1.45 diff -u -p -r1.44 -r1.45 --- STATUS 2005/08/16 18:38:09 1.44 +++ STATUS 2005/09/11 15:48:14 1.45 ＠＠ -17,5 +17,5 ＠＠ generic-modes: generic.el and generic-x. - Compiles, seems to work, auto-mode-alist and autoloads 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-08-16. +- Up to date with GNU Emacs CVS HEAD as of 2005-09-11. - Compiles, something even works. 1.29 +4 -0 XEmacs/packages/unsupported/scop/vc/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/unsupported/scop/vc/ChangeLog,v retrieving revision 1.28 retrieving revision 1.29 diff -u -p -r1.28 -r1.29 --- ChangeLog 2005/08/16 18:38:12 1.28 +++ ChangeLog 2005/09/11 15:48:17 1.29 ＠＠ -1,3 +1,7 ＠＠ +2005-09-11 Ville Skyttä <scop(a)xemacs.org&gt; + + * vc.el: Sync with upstream. + 2005-08-16 Ville Skyttä <scop(a)xemacs.org&gt; * *.el: Sync with upstream. 1.17 +5 -0 XEmacs/packages/unsupported/scop/vc/vc.el Index: vc.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/unsupported/scop/vc/vc.el,v retrieving revision 1.16 retrieving revision 1.17 diff -u -p -r1.16 -r1.17 --- vc.el 2005/08/16 18:38:14 1.16 +++ vc.el 2005/09/11 15:48:17 1.17 ＠＠ -2277,6 +2277,8 ＠＠ With prefix arg READ-SWITCHES, specify a (interactive "DDired under VC (directory): \nP") (let ((vc-dired-switches (concat vc-dired-listing-switches (if vc-dired-recurse "R" "")))) + (if (eq (string-match tramp-file-name-regexp dir) 0) + (error "Sorry, vc-directory does not work over Tramp")) (if read-switches (setq vc-dired-switches (read-string "Dired listing switches: " ＠＠ -2828,6 +2830,9 ＠＠ log entries should be gathered." ;; it should find all relevant files relative to ;; the default-directory. nil))) + (dolist (file (or args (list default-directory))) + (if (eq (string-match tramp-file-name-regexp file) 0) + (error "Sorry, vc-update-change-log does not work over Tramp"))) (vc-call-backend (vc-responsible-backend default-directory) 'update-changelog args))