Mercurial > hg > xemacs-beta

comparison lisp/packages/vc.el @ 48:56c54cf7c5b6 r19-16b90

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-16b90
author cvs
date Mon, 13 Aug 2007 08:56:04 +0200
parents e04119814345
children 131b0175ea99
comparison
equal deleted inserted replaced
47:11c6df210d7f 48:56c54cf7c5b6
1158 (let ((default-directory dir)) 1158 (let ((default-directory dir))
1159 (if nested 1159 (if nested
1160 (vc-file-tree-walk subfunction) 1160 (vc-file-tree-walk subfunction)
1161 (vc-dir-all-files subfunction))) 1161 (vc-dir-all-files subfunction)))
1162 (save-excursion 1162 (save-excursion
1163 (dired (make-string-stringlist (cons dir (nreverse filelist))) 1163 (dired (cons dir (nreverse filelist))
1164 dired-listing-switches) 1164 dired-listing-switches)
1165 (rename-buffer (generate-new-buffer-name "VC-DIRED")) 1165 (rename-buffer (generate-new-buffer-name "VC-DIRED"))
1166 (setq dired-buf (current-buffer)) 1166 (setq dired-buf (current-buffer))
1167 (setq nonempty (not (zerop (buffer-size))))) 1167 (setq nonempty (not (zerop (buffer-size)))))
1168 (if nonempty 1168 (if nonempty
1169 (progn 1169 (progn