* lisp/progmodes/perl-mode.el (perl-syntax-propertize-function): Handle $'

[bpt/emacs.git] / test / indent / perl.perl

diff --git a/test/indent/perl.perl b/test/indent/perl.perl
index 69c1f90..7cb877b 100755 (executable)
--- a/test/indent/perl.perl
+++ b/test/indent/perl.perl
@@ -16,5 +16,9 @@ EOF1
 bar
 EOF2
 
+print $'; # This should not start a string!
+
+print "hello" for /./;
+
 $fileType_filesButNot           # bug#12373?
     = join( '|', map { quotemeta($_).'$' } @{$fileType->{filesButNot}} );