From: wessels <> Date: Fri, 21 Nov 1997 00:51:51 +0000 (+0000) Subject: perl compiler complains about [] X-Git-Tag: SQUID_3_0_PRE1~4507 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=29ca60c9b376fd2c4b285fe4dc96529f06a3cf4a;p=thirdparty%2Fsquid.git perl compiler complains about [] --- diff --git a/src/mk-string-arrays.pl b/src/mk-string-arrays.pl index 5fffd081fd..a8d6d847ea 100755 --- a/src/mk-string-arrays.pl +++ b/src/mk-string-arrays.pl @@ -1,5 +1,5 @@ #****************************************************************************** -# $Id: mk-string-arrays.pl,v 1.1 1997/11/20 08:20:26 wessels Exp $ +# $Id: mk-string-arrays.pl,v 1.2 1997/11/20 17:51:51 wessels Exp $ # # File: mk-strs.pl # @@ -30,7 +30,7 @@ while (<>) { if (/^} /) { ($b, $t) = split(/[ \t;]/, $_); if (defined($pat{$t})) { - print "const char *$pat{$t}[] = \n"; + print "const char *$pat{$t}\[\] = \n"; print "{\n"; for ($i = 0; $i < $count; $i++) { printf "\t\"%s\"%s\n",