Recenter the screen after goto-symbol

This commit is contained in:
toctan 2013-04-29 16:38:26 +08:00
parent 3996597b44
commit cca24f3bb9

View file

@ -63,7 +63,8 @@
((overlayp position)
(goto-char (overlay-start position)))
(t
(goto-char position)))))
(goto-char position)))
(recenter)))
((listp symbol-list)
(dolist (symbol symbol-list)
(let (name position)