More Minibuffer menu items

[Juri Linkov <juri@jurta.org>]

Currently the Minibuffer menu has only two items (besides three
completion items when they are available) and misses other useful
minibuffer commands.  The following patch adds more items to this menu:

Index: lisp/menu-bar.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/menu-bar.el,v
retrieving revision 1.318
diff -c -r1.318 menu-bar.el
*** lisp/menu-bar.el	8 Jan 2008 20:44:39 -0000	1.318
--- lisp/menu-bar.el	24 Feb 2008 20:35:20 -0000
***************
*** 1733,1739 ****
  	  :help "Abort input and exit minibuffer"))
    (define-key map [menu-bar minibuf return]
      (list 'menu-item "Enter" 'exit-minibuffer
! 	  :help "Terminate input and exit minibuffer")))
  \f
  ;;;###autoload
  ;; This comment is taken from tool-bar.el near
--- 1733,1751 ----
  	  :help "Abort input and exit minibuffer"))
    (define-key map [menu-bar minibuf return]
      (list 'menu-item "Enter" 'exit-minibuffer
! 	  :help "Terminate input and exit minibuffer"))
!   (define-key map [menu-bar minibuf next]
!     (list 'menu-item "Next history item" 'next-history-element
! 	  :help "Put next minibuffer history element in the minibuffer"))
!   (define-key map [menu-bar minibuf previous]
!     (list 'menu-item "Previous history item" 'previous-history-element
! 	  :help "Put previous minibuffer history element in the minibuffer"))
!   (define-key map [menu-bar minibuf isearch-forward]
!     (list 'menu-item "Search history forward" 'isearch-forward
! 	  :help "Search minibuffer history forward"))
!   (define-key map [menu-bar minibuf isearch-backward]
!     (list 'menu-item "Search history backward" 'isearch-backward
! 	  :help "Search minibuffer history backward")))
  \f
  ;;;###autoload
  ;; This comment is taken from tool-bar.el near

-- 
Juri Linkov
http://www.jurta.org/emacs/