Re: Q about occur buffer/point

[Matthias Meulien <cimosque@free.fr>]

kai.grossjohann@gmx.net (Kai Großjohann) wrote:

> (...) Hit C-h b in the *Occur* buffer for the key bindings. You'll
> find C-o, 

Only on recent version of emacs I guess... 

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

Bye,
-- 
Matthias