diff options
| -rw-r--r-- | lisp/progmodes/perl-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el index 0772d565a88..2ae0f6b8575 100644 --- a/lisp/progmodes/perl-mode.el +++ b/lisp/progmodes/perl-mode.el | |||
| @@ -488,7 +488,7 @@ changed by, or (parse-state) if line starts in a quoted string." | |||
| 488 | ((looking-at (or nochange perl-nochange)) 0) | 488 | ((looking-at (or nochange perl-nochange)) 0) |
| 489 | (t | 489 | (t |
| 490 | (skip-chars-forward " \t\f") | 490 | (skip-chars-forward " \t\f") |
| 491 | (cond ((looking-at "\\(\\w\\|\\s_\\)+:") | 491 | (cond ((looking-at "\\(\\w\\|\\s_\\)+:[^:]") |
| 492 | (setq indent (max 1 (+ indent perl-label-offset)))) | 492 | (setq indent (max 1 (+ indent perl-label-offset)))) |
| 493 | ((= (following-char) ?}) | 493 | ((= (following-char) ?}) |
| 494 | (setq indent (- indent perl-indent-level))) | 494 | (setq indent (- indent perl-indent-level))) |