# HG changeset patch # User Thien-Thi Nguyen # Date 1203419936 0 # Node ID 97acdba31c63d1e393bb13f4f430f8038b6a0180 # Parent b05f0b99514a49bcd07546fde958a5c20e65859a Kill eol whitespace; nfc. diff -r b05f0b99514a -r 97acdba31c63 lisp/vc-hooks.el --- a/lisp/vc-hooks.el Tue Feb 19 09:40:16 2008 +0000 +++ b/lisp/vc-hooks.el Tue Feb 19 11:18:56 2008 +0000 @@ -984,28 +984,28 @@ (define-key map [vc-create-snapshot] '(menu-item "Create Snapshot" vc-create-snapshot :help "Create Snapshot")) - (define-key map [vc-directory] + (define-key map [vc-directory] '(menu-item "VC Directory Listing" vc-directory :help "Show the VC status of files in a directory")) ;; `vc-status' is a not-quite-ready replacement for `vc-directory' ;; (define-key map [vc-status] '("VC Status" . vc-status)) (define-key map [separator1] '("----")) - (define-key map [vc-annotate] + (define-key map [vc-annotate] '(menu-item "Annotate" vc-annotate :help "Display the edit history of the current file using colors")) - (define-key map [vc-rename-file] + (define-key map [vc-rename-file] '(menu-item "Rename File" vc-rename-file :help "Rename file")) (define-key map [vc-revision-other-window] '(menu-item "Show Other Version" vc-revision-other-window :help "Visit another version of the current file in another window")) - (define-key map [vc-diff] + (define-key map [vc-diff] '(menu-item "Compare with Base Version" vc-diff :help "Compare file set with the base version")) (define-key map [vc-update-change-log] '(menu-item "Update ChangeLog" vc-update-change-log :help "Find change log file and add entries from recent version control logs")) - (define-key map [vc-print-log] + (define-key map [vc-print-log] '(menu-item "Show History" vc-print-log :help "List the change log of the current file set in a window")) (define-key map [separator2] '("----")) @@ -1013,7 +1013,7 @@ '(menu-item "Insert Header" vc-insert-headers :help "Insert headers into a file for use with a version control system. ")) - (define-key map [undo] + (define-key map [undo] '(menu-item "Undo Last Check-In" vc-rollback :help "Remove the most recent changeset committed to the repository")) (define-key map [vc-revert] @@ -1022,10 +1022,10 @@ (define-key map [vc-update] '(menu-item "Update to Latest Version" vc-update :help "Update the current fileset's files to their tip revisions")) - (define-key map [vc-next-action] + (define-key map [vc-next-action] '(menu-item "Check In/Out" vc-next-action :help "Do the next logical version control operation on the current fileset")) - (define-key map [vc-register] + (define-key map [vc-register] '(menu-item "Register" vc-register :help "Register file set into a version control system")) map))