From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: Mike Ballard <dont_w@nt_spam.org>
Newsgroups: gmane.emacs.help
Subject: Re: Q about occur buffer/point
Date: Thu, 29 May 2003 23:08:54 GMT
Organization: EarthLink Inc. -- http://www.EarthLink.net
Sender: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org
Message-ID: <m23cixpcz0.fsf@west_f1.net>
References: <m2r86ixx60.fsf@west_f1.net>
	<84y90qma14.fsf@lucy.is.informatik.uni-duisburg.de>
	<m2r86ighgl.fsf@clarinde.localdomain>
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1054249926 26633 80.91.224.249 (29 May 2003 23:12:06 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Thu, 29 May 2003 23:12:06 +0000 (UTC)
Original-X-From: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Fri May 30 01:12:03 2003
Return-path: <help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org>
Original-Received: from monty-python.gnu.org ([199.232.76.173])
	by main.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 19LWYU-0006uF-00
	for <gnu-help-gnu-emacs@m.gmane.org>; Fri, 30 May 2003 01:11:30 +0200
Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.20)
	id 19LWYS-0001Nd-Fl
	for gnu-help-gnu-emacs@m.gmane.org; Thu, 29 May 2003 19:11:28 -0400
Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!headwall.stanford.edu!newshub.sdsu.edu!newsfeed2.earthlink.net!newsfeed.earthlink.net!stamper.news.pas.earthlink.net!newsread1.prod.itd.earthlink.net.POSTED!not-for-mail
Original-Newsgroups: gnu.emacs.help
X-Newsreader: Gnus/5.09 (Gnus v5.9.0) Emacs/21.1
Original-Lines: 31
User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.1
Original-NNTP-Posting-Host: 67.75.7.218
Original-X-Complaints-To: abuse@earthlink.net
Original-X-Trace: newsread1.prod.itd.earthlink.net 1054249734 67.75.7.218 (Thu, 29 May
	2003 16:08:54 PDT)
Original-NNTP-Posting-Date: Thu, 29 May 2003 16:08:54 PDT
Original-Xref: shelby.stanford.edu gnu.emacs.help:113867
Original-To: help-gnu-emacs@gnu.org
X-BeenThere: help-gnu-emacs@gnu.org
X-Mailman-Version: 2.1b5
Precedence: list
List-Id: Users list for the GNU Emacs text editor <help-gnu-emacs.gnu.org>
List-Help: <mailto:help-gnu-emacs-request@gnu.org?subject=help>
List-Post: <mailto:help-gnu-emacs@gnu.org>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=subscribe>
List-Archive: <http://mail.gnu.org/pipermail/help-gnu-emacs>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=unsubscribe>
Errors-To: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org
Xref: main.gmane.org gmane.emacs.help:10361
X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:10361


On Thu May 29, Matthias Meulien woke me from a deep sleep when he said:

<snip>

> From my init file :
> 
> (defun alt-occur-mode-view-occurrence ()
>   "View the occurrence the current line describes."
>   (interactive)
>   (let ((pos (occur-mode-find-occurrence)))
>     (pop-to-buffer occur-buffer)
>     (goto-char (marker-position pos))
>     (pop-to-buffer "*Occur*")))
> 
> (add-hook 'occur-mode-hook
> 	  '(lambda ()
> 	     (setq truncate-lines t)
> 	     (hl-line-mode 1)
> 	     (define-key occur-mode-map "v" 'alt-occur-mode-view-occurrence)
> 	     (define-key occur-mode-map "q" 'delete-window)))
> 

Perfect!!  Thanks so much....

Mike
-- 

mike.ballard--at--earthlink.net

  "Play an accordion, go to jail.  It's the law!"