From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: "Marshall, Simon" Newsgroups: gmane.emacs.devel Subject: Add M-x occur to the menu-bar Date: Thu, 11 Sep 2003 17:11:24 +0100 Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="----_=_NextPart_000_01C3787F.5939DD50" X-Trace: sea.gmane.org 1063296889 10539 80.91.224.253 (11 Sep 2003 16:14:49 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 11 Sep 2003 16:14:49 +0000 (UTC) Original-X-From: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Thu Sep 11 18:14:48 2003 Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 19xU5o-0004C3-00 for ; Thu, 11 Sep 2003 18:14:48 +0200 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian)) id 19xU6h-00053N-00 for ; Thu, 11 Sep 2003 18:15:43 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.22) id 19xU3O-0000dh-3I for emacs-devel@quimby.gnus.org; Thu, 11 Sep 2003 12:12:18 -0400 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.22) id 19xU2l-0000cw-2D for emacs-devel@gnu.org; Thu, 11 Sep 2003 12:11:39 -0400 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.22) id 19xU2h-0000cS-Vb for emacs-devel@gnu.org; Thu, 11 Sep 2003 12:11:36 -0400 Original-Received: from [212.125.75.19] (helo=mail14.messagelabs.com) by monty-python.gnu.org with smtp (Exim 4.22) id 19xU2h-0000c9-GE for emacs-devel@gnu.org; Thu, 11 Sep 2003 12:11:35 -0400 X-VirusChecked: Checked X-Env-Sender: simon.marshall@misys.com X-Msg-Ref: server-7.tower-14.messagelabs.com!1063296688!667363 X-StarScan-Version: 5.0.7; banners=-,-,- Original-Received: (qmail 23108 invoked from network); 11 Sep 2003 16:11:28 -0000 Original-Received: from unknown (HELO pigeon.misys.com) (217.196.235.2) by server-7.tower-14.messagelabs.com with SMTP; 11 Sep 2003 16:11:28 -0000 Original-Received: From gull.misys.com ([10.80.48.7]) by pigeon.misys.com (WebShield SMTP v4.5 MR1a); id 1063296905781; Thu, 11 Sep 2003 17:15:05 +0100 Original-Received: by gull.midas-kapiti.com with Internet Mail Service (5.5.2653.19) id ; Thu, 11 Sep 2003 17:14:19 +0100 Original-To: 'Emacs Developers' X-Mailer: Internet Mail Service (5.5.2653.19) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.2 Precedence: list List-Id: Emacs development discussions. List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:16300 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:16300 This message is in MIME format. Since your mail reader does not understand this format, some or all of this message may not be legible. ------_=_NextPart_000_01C3787F.5939DD50 Content-Type: text/plain; charset="iso-8859-1" It seems useful to add an entry for M-x occur to the Tools menu-bar, alongside the entry for M-x grep. While I was at it, it seemed a good idea to change the use of the word "search" for the entry for M-x grep, since that word is used for entries (under the Edit menu-bar) that move point. M-x occur and M-x grep are different; they list matching lines rather than moving point. So here's a patch. <> <> ------_=_NextPart_000_01C3787F.5939DD50 Content-Type: application/octet-stream; name="menu-bar.diff2" Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename="menu-bar.diff2" *** menu-bar.el.~3~ Mon Feb 17 10:30:04 2003=0A= --- menu-bar.el Thu Sep 11 17:04:05 2003=0A= ***************=0A= *** 802,810 ****=0A= '(menu-item "Compile..." compile=0A= :help "Invoke compiler or Make, view compilation errors"))=0A= (define-key menu-bar-tools-menu [grep]=0A= ! '(menu-item "Search Files (Grep)..." grep=0A= ! :help "Search files for strings or regexps (with Grep)"))=0A= ! =0A= =0C=0A= ;; The "Help" menu items=0A= =0A= --- 802,812 ----=0A= '(menu-item "Compile..." compile=0A= :help "Invoke compiler or Make, view compilation errors"))=0A= (define-key menu-bar-tools-menu [grep]=0A= ! '(menu-item "List Matches in Files (Grep)..." grep=0A= ! :help "List lines in files matching string or regular = expression"))=0A= ! (define-key menu-bar-tools-menu [occur]=0A= ! '(menu-item "List Matches in Buffer (Occur)..." occur=0A= ! :help "List lines in buffer matching regular expression"))=0A= =0C=0A= ;; The "Help" menu items=0A= =0A= ------_=_NextPart_000_01C3787F.5939DD50 Content-Type: application/octet-stream; name="menu-bar.cl2" Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename="menu-bar.cl2" 2003-09-11 Simon Marshall =0A= =0A= * menu-bar.el (menu-bar-tools-menu) : New entry.=0A= (menu-bar-tools-menu) : Change "search" to "list lines".=0A= =0A= ------_=_NextPart_000_01C3787F.5939DD50 Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://mail.gnu.org/mailman/listinfo/emacs-devel ------_=_NextPart_000_01C3787F.5939DD50--