(diff-mode-menu): Add :help.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 90866ba21e83ba7a30a453cdf7cab957ceb9c4f6..0ff2d02f61978d49a8ce43c1e213ea354d9e8b0d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-03-09  Dan Nicolaescu  <dann@ics.uci.edu>
+
+       * diff-mode.el (diff-mode-menu): Add :help.
+
 2008-03-09  Glenn Morris  <rgm@gnu.org>
 
        * calendar/diary-lib.el (nongregorian-diary-marking-hook)

diff --git a/lisp/diff-mode.el b/lisp/diff-mode.el
index d2b0ee84e17c67602e33e83be3e2da18c734e003..88270b2b3f426af98cbe6dca6073ec97ba00fb47 100644 (file)
--- 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="