Permalink
Browse files

Merge pull request #12 from schwern/master

Patch continued statement indentation when inside a block.
  • Loading branch information...
2 parents b78cb83 + f06bd14 commit 5451306ebe666571187ec831cf5aa69dc4812099 @jrockway committed Jan 18, 2013
Showing with 3 additions and 1 deletion.
  1. +3 −1 cperl-mode.el
View
@@ -3146,7 +3146,9 @@ and closing parentheses and brackets."
((eq 'continuation (elt i 0))
;; [continuation statement-start char-after is-block is-brace]
(goto-char (elt i 1)) ; statement-start
- (+ (if (memq (elt i 2) (append "}])" nil)) ; char-after
+ (+ (if (or (memq (elt i 2) (append "}])" nil)) ; char-after
+ (eq 'continuation ; do not repeat cperl-close-paren-offset
+ (elt (cperl-sniff-for-indent parse-data) 0)))
0 ; Closing parenth
cperl-continued-statement-offset)
(if (or (elt i 3) ; is-block

0 comments on commit 5451306

Please sign in to comment.