details: https://anonhg.NetBSD.org/pkgsrc/rev/1fd532fd490a
branches: trunk
changeset: 530348:1fd532fd490a
user: rillig <rillig%pkgsrc.org@localhost>
date: Tue Jun 26 06:08:11 2007 +0000
description:
Fixed the regular expression for detecting the use of the shell variable
$$ (the PID).
diffstat:
pkgtools/pkglint/files/pkglint.pl | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diffs (19 lines):
diff -r 4c21f43ef463 -r 1fd532fd490a pkgtools/pkglint/files/pkglint.pl
--- a/pkgtools/pkglint/files/pkglint.pl Tue Jun 26 05:38:57 2007 +0000
+++ b/pkgtools/pkglint/files/pkglint.pl Tue Jun 26 06:08:11 2007 +0000
@@ -1,5 +1,5 @@
#! @PERL@
-# $NetBSD: pkglint.pl,v 1.710 2007/06/18 09:35:59 rillig Exp $
+# $NetBSD: pkglint.pl,v 1.711 2007/06/26 06:08:11 rillig Exp $
#
# pkglint - static analyzer and checker for pkgsrc packages
@@ -4242,7 +4242,7 @@
} elsif ($rest =~ s/^[^\$"\\\`]+//) {
} elsif ($rest =~ s/^\\(?:[\\\"\`]|\$\$)//) {
} elsif ($rest =~ s/^\$\$\{([0-9A-Za-z_]+)\}//
- || $rest =~ s/^\$\$([0-9A-Z_a-z]+|[\$!#?\@])//) {
+ || $rest =~ s/^\$\$([0-9A-Z_a-z]+|[!#?\@]|\$\$)//) {
my ($shvarname) = ($1);
$opt_debug_shell and $line->log_debug("[checkline_mk_shellword] Found double-quoted variable ${shvarname}.");
} elsif ($rest =~ s/^\$\$//) {