diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2017-07-24 18:10:02 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2017-07-24 18:10:02 -0400 |
commit | 3d847fa9fd68592c50ea5e18c86b9f3eb5030654 (patch) | |
tree | 1f7f061eccffd3cf04c862b62c4d3e2cdb921ea2 /test/manual/indent/perl.perl | |
parent | 69fb12a66b3d6b9bfb55d8bcd58bec2a8e7ca55b (diff) | |
download | emacs-3d847fa9fd68592c50ea5e18c86b9f3eb5030654.tar.gz emacs-3d847fa9fd68592c50ea5e18c86b9f3eb5030654.tar.bz2 emacs-3d847fa9fd68592c50ea5e18c86b9f3eb5030654.zip |
* lisp/progmodes/perl-mode.el: Add support for indented here docs
* lisp/progmodes/perl-mode.el (perl-syntax-propertize-function):
Recognize the new <<~ syntax for indented here docs.
(perl-syntax-propertize-special-constructs): Adjust search of the
end of here docs accordingly.
* test/manual/indent/perl.perl: Add test for indented here docs.
Diffstat (limited to 'test/manual/indent/perl.perl')
-rwxr-xr-x | test/manual/indent/perl.perl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test/manual/indent/perl.perl b/test/manual/indent/perl.perl index f86a09b2733..06f32e7f090 100755 --- a/test/manual/indent/perl.perl +++ b/test/manual/indent/perl.perl @@ -53,6 +53,14 @@ EOF1 bar EOF2 +print <<~"EOF1" . <<\EOF2 . s/he"llo/th'ere/; +foo +EOF2 + bar + EOF1 +bar +EOF2 + print $'; # This should not start a string! print "hello" for /./; |