Stas Bekman wrote:
Philip M. Gollucci wrote:
if (defined $val && defined *ENTRY{ARRAY}) {
- push @{$self->{symbols}}, [$key, [EMAIL PROTECTED];
+ unless (exists
$directives_seen_back{"$key-$ENTRY[0]"}) {
+ $directives_seen_back{"$key-$ENTRY[0]"} = 1;
+ push @{$self->{symbols}}, [$key, [EMAIL PROTECTED];
+ }
}
It helps to use the correct variables. This is what happens at
4:30am....
And check it out, I'm even going to only have to commit this one once!
http://svn.apache.org/viewvc?view=rev&revision=482625
Most likely..... Grumble....
The test suite definitely worked for me when I ran it through cause I
broke test 14 in this file originally, but then changed it so that this
one worked.
not ok 18
# testing : $PerlConfig
# expected: 1
# received:
not ok 19
# testing : $PerlConfig
# expected: 1
# received:
not ok 20
# testing : @PerlConfig
# expected: 1
# received:
not ok 21
# testing : @PerlConfig
# expected: 1
# received:
not ok 22
--
------------------------------------------------------------------------
Philip M. Gollucci ([EMAIL PROTECTED]) 323.219.4708
Consultant / http://p6m7g8.net/Resume/resume.shtml
Senior Software Engineer - TicketMaster - http://ticketmaster.com
1024D/EC88A0BF 0DE5 C55C 6BF3 B235 2DAB B89E 1324 9B4F EC88 A0BF
I never had a dream come true
'Til the day that I found you.
Even though I pretend that I've moved on
You'll always be my baby.
I never found the words to say
You're the one I think about each day
And I know no matter where life takes me to
A part of me will always be...
A part of me will always be with you.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
