Changeset 22837 for src

Timestamp:

10/31/08 08:02:07 (2 months ago)

Author:

azawawi

Message:

[STD_syntax_highlight] ETOOMUCHTIME --simple => --redspans

Files:

• src/perl6/ETOOMUCHTIME (modified) (3 diffs)

src/perl6/ETOOMUCHTIME

@@ -42 +42 @@
     my $myfile = $file;
     $myfile =~ s/^\.\.\/\.\.\/t\/spec/html/;   
-    my ($simple_html,$full_html) = ("$myfile.simple.html", "$myfile.html");
+    my ($redspans_html,$full_html) = ("$myfile.simple.html", "$myfile.html");
     my ($html_filename,$html_path,$html_suffix) = fileparse($full_html);
     mkpath $html_path;
@@ -51 +51 @@
 $file
     -> $full_html
-    -> $simple_html
+    -> $redspans_html
 OUT
     my $t0 = new Benchmark;
     my $cmd = "./$HILITE --clean-html " .
-            "--simple-html=$simple_html " .
+            "--redspans-html=$redspans_html " .
             "--full-html=$full_html $file";
     my $log = `$cmd 2>&1`;
@@ -84 +84 @@
 </pre></body></html>
 ERROR
-        open SIMPLE_HTML, ">$simple_html"
-            or die "Could not open $simple_html for writing: $OS_ERROR\n";
-        print SIMPLE_HTML $error_html;       
-        close SIMPLE_HTML;
+        open REDSPANS_HTML, ">$redspans_html"
+            or die "Could not open $redspans_html for writing: $OS_ERROR\n";
+        print REDSPANS_HTML $error_html;       
+        close REDSPANS_HTML;
         open FULL_HTML, ">$full_html"
             or die "Could not open $full_html for writing: $OS_ERROR\n";