/[emacs]/emacs/lisp/vc.el
ViewVC logotype

Diff of /emacs/lisp/vc.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.322 by spiegel, Mon Nov 26 16:07:50 2001 UTC revision 1.323 by pj, Mon Nov 26 16:17:17 2001 UTC
# Line 1201  If VERBOSE is non-nil, query the user ra Line 1201  If VERBOSE is non-nil, query the user ra
1201                (vc-version-diff file (vc-workfile-version file) nil)                (vc-version-diff file (vc-workfile-version file) nil)
1202                (goto-char (point-min))                (goto-char (point-min))
1203                (let ((inhibit-read-only t))                (let ((inhibit-read-only t))
1204                  (insert-string                  (insert
1205                   (format "Changes to %s since last lock:\n\n" file)))                   (format "Changes to %s since last lock:\n\n" file)))
1206                (not (beep))                (not (beep))
1207                (yes-or-no-p (concat "File has unlocked changes.  "                (yes-or-no-p (concat "File has unlocked changes.  "
# Line 2152  There is a special command, `*l', to mar Line 2152  There is a special command, `*l', to mar
2152    ;; We do it here because dired might not be loaded yet    ;; We do it here because dired might not be loaded yet
2153    ;; when vc-dired-mode-map is initialized.    ;; when vc-dired-mode-map is initialized.
2154    (set-keymap-parent vc-dired-mode-map dired-mode-map)    (set-keymap-parent vc-dired-mode-map dired-mode-map)
   (make-local-hook 'dired-after-readin-hook)  
2155    (add-hook 'dired-after-readin-hook 'vc-dired-hook nil t)    (add-hook 'dired-after-readin-hook 'vc-dired-hook nil t)
2156    ;; The following is slightly modified from dired.el,    ;; The following is slightly modified from dired.el,
2157    ;; because file lines look a bit different in vc-dired-mode.    ;; because file lines look a bit different in vc-dired-mode.

Legend:
Removed from v.1.322  
changed lines
  Added in v.1.323

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26