aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorDan Gudmundsson <[email protected]>2016-05-24 08:01:34 +0200
committerDan Gudmundsson <[email protected]>2016-05-24 08:01:34 +0200
commit83b3007c6776be6e35ad8909af1a9d0707baa4d9 (patch)
tree7bf646d62123872097f5a3bda13dba39f604c618 /lib
parent07aea2c4ef22eb5eb7205027665d65596828ec69 (diff)
parent8e91ce7cde8b426354f3adcedefc3ce9ffb40117 (diff)
downloadotp-83b3007c6776be6e35ad8909af1a9d0707baa4d9.tar.gz
otp-83b3007c6776be6e35ad8909af1a9d0707baa4d9.tar.bz2
otp-83b3007c6776be6e35ad8909af1a9d0707baa4d9.zip
Merge branch 'dgud/tools/emacs/improve-tags-def-function'
* dgud/tools/emacs/improve-tags-def-function: emacs: Improve default tag search
Diffstat (limited to 'lib')
-rw-r--r--lib/tools/emacs/erlang.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/tools/emacs/erlang.el b/lib/tools/emacs/erlang.el
index b808987e6e..3d20d86f43 100644
--- a/lib/tools/emacs/erlang.el
+++ b/lib/tools/emacs/erlang.el
@@ -3760,6 +3760,12 @@ In the future the list may contain more elements."
(if (assoc fk (cdr (car imports)))
(setq mod (car (car imports)))
(setq imports (cdr imports))))
+ (cond ((eq (preceding-char) ?#)
+ (setq fk (concat "-record(" fk)))
+ ((eq (preceding-char) ??)
+ (setq fk (concat "-define(" fk)))
+ ((and (null mod) (not (member fk erlang-int-bifs)))
+ (setq mod (erlang-get-module))))
(setq res (list mod fk)))))
(store-match-data md)
res)))