public
Last active

Push mark when using ido-imenu

  • Download Gist
gistfile1.el
Emacs Lisp
1 2 3 4 5 6 7 8 9 10 11 12
;; Push mark when using ido-imenu
 
(defvar push-mark-before-goto-char nil)
 
(defadvice goto-char (before push-mark-first activate)
(when push-mark-before-goto-char
(push-mark)))
 
(defun ido-imenu-push-mark ()
(interactive)
(let ((push-mark-before-goto-char t))
(ido-imenu)))

It turns out that the ido-imenu command in use in the screencast is not in Emacs 24. I have no idea where it came from either, but here's the code for that aswell: https://gist.github.com/2360578

Why not just advice ido-imenu?


  (defadvice ido-imenu (before push-mark activate)
    (push-mark))

Please sign in to comment on this gist.

Something went wrong with that request. Please try again.