[Bio] / FigKernelPackages / Tracer.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/Tracer.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.66, Tue Sep 26 13:37:07 2006 UTC revision 1.67, Fri Sep 29 15:00:17 2006 UTC
# Line 1959  Line 1959 
1959                  Trace("CGI: $parmName = " . join(", ", @values));                  Trace("CGI: $parmName = " . join(", ", @values));
1960              }              }
1961          }          }
1962            # Now output a GET-style URL for this query.
1963            my $getURL = $query->url(-relative => 1, -query => 1);
1964            # Strip out the Trace parameters.
1965            $getURL =~ s/Trace=\d[^;&]+[;&]//;
1966            $getURL =~ s/TF=\d[;&]//;
1967            # Output the URL.
1968            Trace("URL: ../FIG/$getURL");
1969            # Display the request method.
1970            my $method = $query->request_method();
1971            Trace("Method: $method");
1972      }      }
1973      if (T(CGI => 4)) {      if (T(CGI => 4)) {
1974          # Here we want the environment data too.          # Here we want the environment data too.

Legend:
Removed from v.1.66  
changed lines
  Added in v.1.67

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3