diff --git a/webtools/tinderbox2/src/lib/VCDisplay/Perforce_P4DB.pm b/webtools/tinderbox2/src/lib/VCDisplay/Perforce_P4DB.pm index 9c95135f3ea4..8d830654a8ef 100644 --- a/webtools/tinderbox2/src/lib/VCDisplay/Perforce_P4DB.pm +++ b/webtools/tinderbox2/src/lib/VCDisplay/Perforce_P4DB.pm @@ -4,8 +4,8 @@ # have installed perforce with P4DB to let your webserver render html # pages of your VC repository. -# $Revision: 1.2 $ -# $Date: 2003/05/11 01:29:03 $ +# $Revision: 1.3 $ +# $Date: 2003/05/12 21:55:46 $ # $Author: kestes%walrus.com $ # $Source: /home/hwine/cvs_conversion/cvsroot/mozilla/webtools/tinderbox2/src/lib/VCDisplay/Perforce_P4DB.pm,v $ # $Name: $ @@ -127,7 +127,7 @@ sub time2p4db { # Is this necessary? I saw it during testing and # I am afraid to take it out. - push @out, 'ignore=GO%21'; + push @out, 'ignore=GO!'; return @out; } @@ -159,17 +159,16 @@ sub prepare_perforce_args { ($args{'mindate'}) && (push @url_args, time2p4db($args{'mindate'}) ); + # I am not sure of the calling sequence for FSPC, I think this is + # correct but someone who runs this should confirm it. + + my $filespec =TreeData::Tree2Filespec($args{'tree'}); if ($args{'file'}) { + $filespec .= $args{'file'}; + } - # I am not sure of the calling sequence for FSPC perhaps I - # need to preface the file with this string '%2F%2F...', some - # tests I ran indicated that this was not necessary. - - push @url_args, "FSPC=".HTMLPopUp::escapeURL($args{'file'}) ; - } else { - push @url_args, 'FSPC=%2F%2F...' ; - } + push @url_args, "FSPC=".HTMLPopUp::escapeURL($filespec) ; return @url_args; }