diff options
author | David Maus <dmaus@ictsoc.de> | 2011-09-25 21:21:40 +0000 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2011-10-06 10:14:19 +0200 |
commit | 384c50238549aee95e9e3a8ac6b1a3e085e8d7e2 (patch) | |
tree | eef107942dbf68f03efb7e4129729eddba1fd3d8 | |
parent | 1d65423da8317ff24785e3edc9984ccfd68a7745 (diff) | |
download | org-mode-384c50238549aee95e9e3a8ac6b1a3e085e8d7e2.tar.gz |
contrib/lisp/org-elisp-symbol: Set type if symbol is defuned but not fbound
Another small patch for org-elisp-symbol: Set the symbol type to
"Function or command" if it is defuned but not fbound when
`org-elisp-symbol-store-link' is called.
Best,
-- David
-rw-r--r-- | contrib/lisp/org-elisp-symbol.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/contrib/lisp/org-elisp-symbol.el b/contrib/lisp/org-elisp-symbol.el index 6eb8114..340272b 100644 --- a/contrib/lisp/org-elisp-symbol.el +++ b/contrib/lisp/org-elisp-symbol.el @@ -106,6 +106,7 @@ ((user-variable-p sym-name) "User variable") ((string= def "defvar") "Variable") ((string= def "defmacro") "Macro") + ((string= def "defun") "Function or command") (t "Symbol"))) (args (if (match-string 3) (mapconcat (lambda (a) (unless (string-match "^&" a) a)) |