[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Q about occur buffer/point

From: Mike Ballard
Subject: Re: Q about occur buffer/point
Date: Thu, 29 May 2003 23:08:54 GMT
User-agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.1

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


> 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....


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

reply via email to

[Prev in Thread] Current Thread [Next in Thread]