Commit c0868451 authored by Stefan Monnier's avatar Stefan Monnier

* lisp/progmodes/perl-mode.el (perl-syntax-propertize-function): Slash after

&, |, +, - and * can't be a division.

Fixes: debbugs:17317
parent f7e0450a
2014-04-23 Stefan Monnier <monnier@iro.umontreal.ca>
* progmodes/perl-mode.el (perl-syntax-propertize-function): Slash after
&, |, +, - and * can't be a division (bug#17317).
2014-04-22 Stefan Monnier <monnier@iro.umontreal.ca>
* term/xterm.el (xterm--version-handler): Don't use modern xterm
......
......@@ -281,7 +281,7 @@
((concat "\\(?:\\(?:^\\|[^$@&%[:word:]]\\)"
(regexp-opt '("split" "if" "unless" "until" "while" "split"
"grep" "map" "not" "or" "and" "for" "foreach"))
"\\|[?:.,;=!~({[]\\|\\(^\\)\\)[ \t\n]*\\(/\\)")
"\\|[-?:.,;|&+*=!~({[]\\|\\(^\\)\\)[ \t\n]*\\(/\\)")
(2 (ignore
(if (and (match-end 1) ; / at BOL.
(save-excursion
......
#!/usr/bin/perl
# -*- eval: (bug-reference-mode 1) -*-
if ($c && /====/){xyz;}
print <<"EOF1" . s/he"llo/th'ere/;
foo
EOF2
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment