From fb4dfdd28ed34f7a67715f68d6a09c4dfd0f8074 Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Sun, 9 Mar 2008 15:39:48 +0000 Subject: [PATCH] (diff-mode-menu): Add :help. --- lisp/ChangeLog | 4 ++++ lisp/diff-mode.el | 49 +++++++++++++++++++++++++++++++---------------- 2 files changed, 37 insertions(+), 16 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 90866ba21e8..0ff2d02f619 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2008-03-09 Dan Nicolaescu + + * diff-mode.el (diff-mode-menu): Add :help. + 2008-03-09 Glenn Morris * calendar/diary-lib.el (nongregorian-diary-marking-hook) diff --git a/lisp/diff-mode.el b/lisp/diff-mode.el index d2b0ee84e17..88270b2b3f4 100644 --- a/lisp/diff-mode.el +++ b/lisp/diff-mode.el @@ -172,28 +172,45 @@ when editing big diffs)." (easy-menu-define diff-mode-menu diff-mode-map "Menu for `diff-mode'." '("Diff" - ["Jump to Source" diff-goto-source t] - ["Apply hunk" diff-apply-hunk t] - ["Test applying hunk" diff-test-hunk t] - ["Apply diff with Ediff" diff-ediff-patch t] + ["Jump to Source" diff-goto-source + :help "Jump to the corresponding source line"] + ["Apply hunk" diff-apply-hunk + :help "Apply the current hunk to the source file and go to the next"] + ["Test applying hunk" diff-test-hunk + :help "See whether it's possible to apply the current hunk"] + ["Apply diff with Ediff" diff-ediff-patch + :help "Call `ediff-patch-file' on the current buffer"] ["Create Change Log entries" diff-add-change-log-entries-other-window :help "Create ChangeLog entries for the changes in the diff buffer"] "-----" - ["Reverse direction" diff-reverse-direction t] - ["Context -> Unified" diff-context->unified t] - ["Unified -> Context" diff-unified->context t] + ["Reverse direction" diff-reverse-direction + :help "Reverse the direction of the diffs"] + ["Context -> Unified" diff-context->unified + :help "Convert context diffs to unified diffs"] + ["Unified -> Context" diff-unified->context + :help "Convert unified diffs to context diffs"] ;;["Fixup Headers" diff-fixup-modifs (not buffer-read-only)] "-----" - ["Split hunk" diff-split-hunk (diff-splittable-p)] - ["Ignore whitespace changes" diff-ignore-whitespace-hunk t] - ["Highlight fine changes" diff-refine-hunk t] - ["Kill current hunk" diff-hunk-kill t] - ["Kill current file's hunks" diff-file-kill t] + ["Split hunk" diff-split-hunk + :active (diff-splittable-p) + :help "Split the current (unified diff) hunk at point into two hunks"] + ["Ignore whitespace changes" diff-ignore-whitespace-hunk + :help "Re-diff the current hunk, ignoring whitespace differences"] + ["Highlight fine changes" diff-refine-hunk + :help "Highlight changes of hunk at point at a finer granularity"] + ["Kill current hunk" diff-hunk-kill + :help "Kill current hunk"] + ["Kill current file's hunks" diff-file-kill + :help "Kill all current file's hunks"] "-----" - ["Previous Hunk" diff-hunk-prev t] - ["Next Hunk" diff-hunk-next t] - ["Previous File" diff-file-prev t] - ["Next File" diff-file-next t] + ["Previous Hunk" diff-hunk-prev + :help "Go to the previous count'th hunk"] + ["Next Hunk" diff-hunk-next + :help "Go to the next count'th hunk"] + ["Previous File" diff-file-prev + :help "Go to the previous count'th file"] + ["Next File" diff-file-next + :help "Go to the next count'th file"] )) (defcustom diff-minor-mode-prefix "\C-c=" -- 2.39.2