GNU bug report logs -
#5064
23.1.50; perl mode coloring gone if subroutine name is one letter long
Previous Next
Reported by: jidanni <at> jidanni.org
Date: Sat, 28 Nov 2009 02:50:03 UTC
Severity: normal
Fixed in version perl-doc/5.10.1-8
Done: jidanni <at> jidanni.org
Bug is archived. No further changes may be made.
Full log
View this message in rfc822 format
[Message part 1 (text/plain, inline)]
This is an automatic notification regarding your bug report
which was filed against the emacs package:
#5064: 23.1.50; perl mode coloring gone if subroutine name is one letter long
It has been closed by jidanni <at> jidanni.org (reply to jidanni <at> jidanni.org, 558428 <at> bugs.debian.org).
Their explanation is attached below along with your original report.
If this explanation is unsatisfactory and you have not received a
better one in a separate message then please contact jidanni <at> jidanni.org (reply to jidanni <at> jidanni.org, 558428 <at> bugs.debian.org) by
replying to this email.
--
5064: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=5064
Emacs Bug Tracking System
Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
X-debbugs-cc: 5064-close <at> debbugs.gnu.org, monnier <at> iro.umontreal.ca
Package: perl-doc
Version: 5.10.1-8
Severity: wishlist
File: /usr/share/man/man1/perlsub.1.gz
Tags: upstream
Dear Perl guys: On the perlsub man page, please mention near:
Subroutines whose names are in all upper case are reserved to the
Perl core, as are modules whose names are in all lower case.
that sub m {...}
won't work too.
SM> Actually, the problem is not really that it's only one letter, but that
SM> it's the "keyword" m, used for matching (as in "m/regexp/"). Of course
SM> the same can happen with other keywords like "s", "tr", "y", "q", "qx",
SM> and various others.
[Message part 3 (message/rfc822, inline)]
Gentlemen, consider the following perl subroutines.
Notice how the latter has all its coloring gone, just because it starts
with one letter. (perl-mode)^X^E
sub max {
my $max = shift(@_);
foreach $foo (@_) {
$max = $foo if $max < $foo;
}
return $max;
}
sub m {
my $max = shift(@_);
foreach $foo (@_) {
$max = $foo if $max < $foo;
}
return $max;
}
This bug report was last modified 15 years and 183 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.