summaryrefslogtreecommitdiff
path: root/test/lisp/progmodes/cperl-mode-resources/cperl-indent-styles.pl
diff options
context:
space:
mode:
authorHarald Jörg <haj@posteo.de>2020-11-09 15:25:47 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2020-11-09 15:25:47 +0100
commit8dc237270f88a6abce4df9a1235b38288792ab71 (patch)
tree443b513cc749f5920b43939ce92122819043b931 /test/lisp/progmodes/cperl-mode-resources/cperl-indent-styles.pl
parenta05810b2d5f1a87ad1b20c4e61adc464a31e315d (diff)
downloademacs-8dc237270f88a6abce4df9a1235b38288792ab71.tar.gz
emacs-8dc237270f88a6abce4df9a1235b38288792ab71.tar.bz2
emacs-8dc237270f88a6abce4df9a1235b38288792ab71.zip
cperl-mode: Indentation of ')' follows customisation
* lisp/progmodes/cperl-mode.el (cperl-style-alist): Add cperl-close-paren-offset to the settings for PBP style. * test/lisp/progmodes/cperl-mode-tests.el (cperl-bug19709): New test to verify correct indentation of closing parentheses (Bug#19709). * test/lisp/progmodes/cperl-mode-resources/cperl-bug-19709.pl: New test case with code from the bug report. * test/lisp/progmodes/cperl-mode-resources/cperl-indent-styles.pl: Add a new test clause for cperl-close-paren-offset.
Diffstat (limited to 'test/lisp/progmodes/cperl-mode-resources/cperl-indent-styles.pl')
-rw-r--r--test/lisp/progmodes/cperl-mode-resources/cperl-indent-styles.pl10
1 files changed, 10 insertions, 0 deletions
diff --git a/test/lisp/progmodes/cperl-mode-resources/cperl-indent-styles.pl b/test/lisp/progmodes/cperl-mode-resources/cperl-indent-styles.pl
index 0832f868288..371b19b7309 100644
--- a/test/lisp/progmodes/cperl-mode-resources/cperl-indent-styles.pl
+++ b/test/lisp/progmodes/cperl-mode-resources/cperl-indent-styles.pl
@@ -42,3 +42,13 @@ die "This world is backwards";
}
}
# -------- PBP uncuddle else: end --------
+
+# -------- PBP closing paren offset: input --------
+my $a = func1(
+ Module::test()
+ );
+# -------- PBP closing paren offset: expected output --------
+my $a = func1(
+ Module::test()
+);
+# -------- PBP closing paren offset: end --------