aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorStefan Monnier2014-07-08 12:51:35 -0400
committerStefan Monnier2014-07-08 12:51:35 -0400
commit5e799349fde90ef1ad9c73261ecdac0a11ef57ff (patch)
treeefc7bb2f0e2a63b74f3d3fbfcb1723c6316d6e4e /test
parenta897d1b1febb05b7d45d51351356f25e3c0c0b89 (diff)
downloademacs-5e799349fde90ef1ad9c73261ecdac0a11ef57ff.tar.gz
emacs-5e799349fde90ef1ad9c73261ecdac0a11ef57ff.zip
* lisp/progmodes/perl-mode.el: Use syntax-ppss; fix one indentation case.
(perl-indent-line): Use syntax-ppss to detect we're in a doc-section. (perl-continuation-line-p): Don't skip over anything else than labels. Return the previous char. (perl-calculate-indent): Use syntax-ppss instead of parse-start and update callers accordingly. For continuation lines, check the the case of array hashes. (perl-backward-to-noncomment): Make it non-interactive. (perl-backward-to-start-of-continued-exp): Rewrite. * test/indent/perl.perl: Add indentation pattern for hash-table entries.
Diffstat (limited to 'test')
-rw-r--r--test/ChangeLog4
-rwxr-xr-xtest/indent/perl.perl7
2 files changed, 11 insertions, 0 deletions
diff --git a/test/ChangeLog b/test/ChangeLog
index 029360f5664..d4e7f818f1c 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,7 @@
12014-07-08 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * indent/perl.perl: Add indentation pattern for hash-table entries.
4
12014-07-04 Michael Albinus <michael.albinus@gmx.de> 52014-07-04 Michael Albinus <michael.albinus@gmx.de>
2 6
3 * automated/dbus-tests.el (dbus-test02-register-service-session) 7 * automated/dbus-tests.el (dbus-test02-register-service-session)
diff --git a/test/indent/perl.perl b/test/indent/perl.perl
index 34cd4af1125..6b05a5f1d07 100755
--- a/test/indent/perl.perl
+++ b/test/indent/perl.perl
@@ -24,6 +24,13 @@ EOF2
24bar 24bar
25EOF1 25EOF1
26 26
27$config = {
28 b =>
29 [
30 "123",
31 ],
32 c => "123",
33};
27 34
28print <<"EOF1" . <<\EOF2 . s/he"llo/th'ere/; 35print <<"EOF1" . <<\EOF2 . s/he"llo/th'ere/;
29foo 36foo