.emacs-my
changeset 610 9af87adeed3c
parent 609 f397a4d2a697
child 611 49c993d41d3f
equal deleted inserted replaced
609:f397a4d2a697 610:9af87adeed3c
  1319 (message "lisp, elisp")
  1319 (message "lisp, elisp")
  1320 
  1320 
  1321 (setq list-command-history-max 256)
  1321 (setq list-command-history-max 256)
  1322 
  1322 
  1323 (add-hook 'emacs-lisp-mode-hook 'turn-on-eldoc-mode)
  1323 (add-hook 'emacs-lisp-mode-hook 'turn-on-eldoc-mode)
       
  1324 
       
  1325 (defun my-elisp-find-tag ()
       
  1326   (interactive)
       
  1327   (unless (find-variable-at-point)
       
  1328     (find-function-at-point)
       
  1329     ))
  1324 ;; Goto elisp definition.
  1330 ;; Goto elisp definition.
  1325 (define-key emacs-lisp-mode-map (kbd "M-.") 'find-function-at-point)
  1331 (define-key emacs-lisp-mode-map (kbd "M-.") 'my-elisp-find-tag)
  1326 
  1332 
  1327 ;; http://www.emacswiki.org/emacs/PrettyLambda
  1333 ;; http://www.emacswiki.org/emacs/PrettyLambda
  1328 (font-lock-add-keywords
  1334 (font-lock-add-keywords
  1329  'emacs-lisp-mode
  1335  'emacs-lisp-mode
  1330  `(
  1336  `(