(cvs-menu): Improve cvs-mode-find-file, cvs-mode-find-file-other-window.

Add cvs-mode-diff-yesterday and manual entry.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 35cf2d449c44094dd07425235ff48599df91e648..5045c30b3e4b29f4334770dfdfd768ec55f81dee 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2008-01-21  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * pcvs-defs.el (cvs-menu): Improve cvs-mode-find-file,
+       cvs-mode-find-file-other-window.  Add cvs-mode-diff-yesterday and
+       manual entry.
+
 2008-01-21  Michael Albinus  <michael.albinus@gmx.de>
 
        * net/dbus.el (dbus-ignore-errors): New macro.

diff --git a/lisp/pcvs-defs.el b/lisp/pcvs-defs.el
index fa6f2b1c050cb69288df75e78ea80fe5ea41b06a..a4e7fde0f51a3cdf4e25915aac3a981165e040a5 100644 (file)
--- a/lisp/pcvs-defs.el
+++ b/lisp/pcvs-defs.el
@@ -404,8 +404,8 @@ This variable is buffer local and only used in the *cvs* buffer.")
 
 (easy-menu-define cvs-menu cvs-mode-map "Menu used in `cvs-mode'."
   '("CVS"
-    ["Open file.."             cvs-mode-find-file      t]
-    [" ..other window"         cvs-mode-find-file-other-window t]
+    ["Open file"               cvs-mode-find-file      t]
+    ["Open in other window"    cvs-mode-find-file-other-window t]
     ["Display in other window"  cvs-mode-display-file   t]
     ["Interactive merge"       cvs-mode-imerge         t]
     ("View diff"
@@ -413,6 +413,7 @@ This variable is buffer local and only used in the *cvs* buffer.")
      ["Current diff"           cvs-mode-diff           t]
      ["Diff with head"         cvs-mode-diff-head      t]
      ["Diff with vendor"       cvs-mode-diff-vendor    t]
+     ["Diff against yesterday" cvs-mode-diff-yesterday t]
      ["Diff with backup"       cvs-mode-diff-backup    t])
     ["View log"                        cvs-mode-log            t]
     ["View status"             cvs-mode-status         t]
@@ -437,6 +438,9 @@ This variable is buffer local and only used in the *cvs* buffer.")
     ["Unmark all"              cvs-mode-unmark-all-files t]
     ["Hide handled"            cvs-mode-remove-handled t]
     "----"
+    ["PCL-CVS Manual"          (lambda () (interactive)
+                                 (info "(pcl-cvs)Top")) t]
+    "----"
     ["Quit"                    cvs-mode-quit           t]))
 
 ;;;;