comparison lisp/vc.el @ 94510:6bcc84306589

(vc-dir-mode-map): Don't bind "r".
author Dan Nicolaescu <dann@ics.uci.edu>
date Thu, 01 May 2008 06:33:24 +0000
parents c7dd1427c429
children 7bd70b5b8bda
comparison
equal deleted inserted replaced
94509:b24d68e95e4e 94510:6bcc84306589
669 ;; - do not default to RCS anymore when the current directory is not 669 ;; - do not default to RCS anymore when the current directory is not
670 ;; controlled by any VCS and the user does C-x v v 670 ;; controlled by any VCS and the user does C-x v v
671 ;; 671 ;;
672 ;; - vc-cvs-delete-file should not do a "cvs commit" immediately after 672 ;; - vc-cvs-delete-file should not do a "cvs commit" immediately after
673 ;; removing the file. 673 ;; removing the file.
674 ;;
675 ;; - vc-delete-file should check if the file contains non-checked in
676 ;; changes and warn about losing them.
674 ;; 677 ;;
675 ;; - vc-create-snapshot and vc-retrieve-snapshot should update the 678 ;; - vc-create-snapshot and vc-retrieve-snapshot should update the
676 ;; buffers that might be visiting the affected files. 679 ;; buffers that might be visiting the affected files.
677 680
678 ;;; Code: 681 ;;; Code:
2983 (define-key map "\C-m" 'vc-dir-find-file) 2986 (define-key map "\C-m" 'vc-dir-find-file)
2984 (define-key map "o" 'vc-dir-find-file-other-window) 2987 (define-key map "o" 'vc-dir-find-file-other-window)
2985 (define-key map "x" 'vc-dir-hide-up-to-date) 2988 (define-key map "x" 'vc-dir-hide-up-to-date)
2986 (define-key map "q" 'quit-window) 2989 (define-key map "q" 'quit-window)
2987 (define-key map "g" 'vc-dir-refresh) 2990 (define-key map "g" 'vc-dir-refresh)
2988 (define-key map "r" 'vc-dir-delete-file) ; like in PCL-CVS
2989 (define-key map "\C-c\C-c" 'vc-dir-kill-dir-status-process) 2991 (define-key map "\C-c\C-c" 'vc-dir-kill-dir-status-process)
2990 ;; Does not work unless mouse sets point. Functions like vc-dir-find-file 2992 ;; Does not work unless mouse sets point. Functions like vc-dir-find-file
2991 ;; need to find the file from the mouse position, not `point'. 2993 ;; need to find the file from the mouse position, not `point'.
2992 ;; (define-key map [(down-mouse-3)] 'vc-dir-menu) 2994 ;; (define-key map [(down-mouse-3)] 'vc-dir-menu)
2993 ;; (define-key map [(mouse-2)] 'vc-dir-toggle-mark) 2995 ;; (define-key map [(mouse-2)] 'vc-dir-toggle-mark)