aboutsummaryrefslogtreecommitdiffstats
path: root/lib/tools/emacs/erlang.el
diff options
context:
space:
mode:
authorDan Gudmundsson <[email protected]>2009-12-15 13:38:58 +0100
committerDan Gudmundsson <[email protected]>2009-12-15 13:38:58 +0100
commit889208661105bf2e296c168ed0afa7452db137df (patch)
tree94bcecf2440f0eae6a367efd5d00e062e80129ea /lib/tools/emacs/erlang.el
parent5b0418e2f5e70d9eeadcfc2009bd7c69e336c939 (diff)
downloadotp-889208661105bf2e296c168ed0afa7452db137df.tar.gz
otp-889208661105bf2e296c168ed0afa7452db137df.tar.bz2
otp-889208661105bf2e296c168ed0afa7452db137df.zip
Fixed indentation of -spec() -> Var :: type();
Diffstat (limited to 'lib/tools/emacs/erlang.el')
-rw-r--r--lib/tools/emacs/erlang.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/tools/emacs/erlang.el b/lib/tools/emacs/erlang.el
index 6d6f9e24f4..b352ae7cce 100644
--- a/lib/tools/emacs/erlang.el
+++ b/lib/tools/emacs/erlang.el
@@ -72,7 +72,7 @@
;; Variables:
-(defconst erlang-version "2.6.1"
+(defconst erlang-version "2.6.2"
"The version number of Erlang mode.")
(defvar erlang-root-dir nil
@@ -3792,9 +3792,9 @@ Value is list (stack token-start token-type in-what)."
;; Clause end
((= (following-char) ?\;)
- (if (and stack (and (eq (car (car stack)) 'when)
- (eq (car (car (cdr (cdr stack)))) 'spec)))
- (erlang-pop stack))
+ (if (eq (car (car (last stack))) 'spec)
+ (while (memq (car (car stack)) '(when ::))
+ (erlang-pop stack)))
(if (and stack (eq (car (car stack)) '->))
(erlang-pop stack))
(forward-char 1))