fixes

webtools/tinderbox2/ChangeLog

@@ -1,3 +1,15 @@
+Allow users to backdate notices
+
+autmate regeneration of HTML when user uses CGI 
+interface
+	
+Put the C in all build cells.
+
+VC code did the wrong thing when generating old pages and there was
+no TreeState data.
+
+Fix Spelling mistakes thoughout code.	
+	
 Add support for build machines to tell the server to add text/links 
 into build cells (TinderboxPrint).
 

webtools/tinderbox2/src/bin/addnote.cgi

@@ -6,8 +6,8 @@
 #		 on the tinderbox status page.
 
 
-# $Revision: 1.16 $ 
-# $Date: 2002-04-27 02:31:08 $ 
+# $Revision: 1.17 $ 
+# $Date: 2002-04-27 03:23:00 $ 
 # $Author: kestes%walrus.com $ 
 # $Source: /home/jrmuizel/cvs-mirror/mozilla/webtools/tinderbox2/src/bin/addnote.cgi,v $ 
 # $Name:  $ 
@@ -135,6 +135,11 @@ sub get_params {
 
   if (param("effectivetime")) {
       $EFFECTIVE_TIME = timestring2time( param("effectivetime") );
+
+      # allow people to backdate notices but not forward date them.
+      if ($EFFECTIVE_TIME > $TIME) {
+          $EFFECTIVE_TIME = $TIME;
+      }
   } else {
       $EFFECTIVE_TIME = time();
   }

webtools/tinderbox2/src/lib/HTMLPopUp.pm

@@ -12,8 +12,8 @@
 # the completed string before it is returned.
 
 
-# $Revision: 1.15 $ 
-# $Date: 2002-04-27 01:13:08 $ 
+# $Revision: 1.16 $ 
+# $Date: 2002-04-27 03:22:57 $ 
 # $Author: kestes%walrus.com $ 
 # $Source: /home/jrmuizel/cvs-mirror/mozilla/webtools/tinderbox2/src/lib/HTMLPopUp.pm,v $ 
 # $Name:  $ 
@@ -238,8 +238,10 @@ sub split_cgi_args {
 
 sub regenerate_HTML_pages {
     my $old_query_string =  $ENV{"QUERY_STRING"};
+    my $old_request_method = $ENV{"REQUEST_METHOD"};
 
     $ENV{"QUERY_STRING"} = '';
+    $ENV{"REQUEST_METHOD"} = '';
 
     system(
            $FileStructure::CGIBIN_DIR.'tinder.cgi', 
@@ -247,6 +249,7 @@ sub regenerate_HTML_pages {
            );
 
     $ENV{"QUERY_STRING"} = $old_query_string;
+    $ENV{"REQUEST_METHOD"} = $old_request_method;
 
     return 0;
 }

webtools/tinderbox2/src/lib/TinderDB/Notice.pm

@@ -78,7 +78,7 @@ use Utils;
 use HTMLPopUp;
 use TinderDB::BasicTxtDB;
 
-$VERSION = ( qw $Revision: 1.15 $ )[1];
+$VERSION = ( qw $Revision: 1.16 $ )[1];
 
 @ISA = qw(TinderDB::BasicTxtDB);
 
@@ -252,11 +252,11 @@ sub render_notice {
     # also tell when the note was really posted.
 
     my $localpostedtime;
-    if ($notice->{'time'} != $notice->{'posttime'}) {
+    if ( $notice->{'posttime'} - $notice->{'time'} > $main::SECONDS_PER_HOUR) {
        $localpostedtime = (
-                           "(Actually posted at: ". 
-                           $notice->{'localpostedtime'}.
-                           ")".
+                           "<br>(Actually posted at: ". 
+                           $notice->{'localposttime'}.
+                           ")\n".
                            "");
     }