put in filespecs.

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;
 }