From 3c79b070fd647ba8757d4e3fc38638ebbf79e993 Mon Sep 17 00:00:00 2001 From: "kestes%walrus.com" Date: Sun, 19 Jan 2003 17:18:56 +0000 Subject: [PATCH] add a VC column simulation. git-svn-id: svn://10.0.0.236/trunk@136630 18797224-902f-48f8-a5cc-f745e15eee43 --- .../tinderbox2/src/test/vcdisplay.tst | 28 ++++++++++++++++--- 1 file changed, 24 insertions(+), 4 deletions(-) diff --git a/mozilla/webtools/tinderbox2/src/test/vcdisplay.tst b/mozilla/webtools/tinderbox2/src/test/vcdisplay.tst index d036cd3b706..597abac30e0 100644 --- a/mozilla/webtools/tinderbox2/src/test/vcdisplay.tst +++ b/mozilla/webtools/tinderbox2/src/test/vcdisplay.tst @@ -1,10 +1,11 @@ #!#perl# -w -- # generate static html pages for use in testing the popup libraries. +# Output is written to standard out to be examined by a programmer. -# $Revision: 1.1 $ -# $Date: 2002-12-10 19:21:12 $ +# $Revision: 1.2 $ +# $Date: 2003-01-19 17:18:56 $ # $Author: kestes%walrus.com $ # $Source: /home/befator/cvs/jail/cvsroot/mozilla/webtools/tinderbox2/src/test/vcdisplay.tst,v $ # $Name: not supported by cvs2svn $ @@ -78,11 +79,14 @@ sub print_url { sub print_tests { + # simulation of processmail_build call + %args = ( 'tree' => 'Project_A', 'file' => 'main.c', 'line' => 325, 'linktxt' => "Compiler error! Some error message here.", + 'alt_linktxt' => "Compiler error! Some error message here.", ); $line = VCDisplay::guess(%args); @@ -91,7 +95,7 @@ sub print_tests { print $line."\n\n"; print "\n\n\n"; - + # simulation of Build column call %args = ( 'tree' => 'Project_A', @@ -109,11 +113,27 @@ sub print_tests { print "\n\n\n"; + # simulation of VC column call %args = ( 'tree' => 'Project_A', + 'mindate' => 1039467540 - $main::SECONDS_PER_DAY, + 'maxdate' => 1039467540, + 'who' => 'fred', + ); + + $line = VCDisplay::query(%args); + print_hash(%args); + print_url($line); + print $line."\n\n"; + print "\n\n\n"; + + # simulation of time column call + + %args = ( + 'tree' => 'Project_A', + 'mindate' => 1039467540, 'linktxt' => '12/09 15:59', - 'mindate' => '1039467540', ); $line = VCDisplay::query(%args);