minor fixes

diff --git a/addintel.pl b/addintel.pl
index 13b52a96523f12a6b90a11243db0b70d097bdb77..a2e43eca6b901bcb69c68ce8743eb582fe28cd61 100644 (file)
--- a/addintel.pl
+++ b/addintel.pl
@@ -67,5 +67,6 @@ if (param('cmd') eq 'submit_message'){
                $error .= $DBH->errstr;
        }
 }
+$BODY->param(Tick => $ND::TICK);
 $BODY->param(Error => $error);
 1;

diff --git a/main.pl b/main.pl
index 61cd47100b88caca012d1db849780f75c4bab82a..2231e36e0f26302224473db3955ea58e55bfe40f 100644 (file)
--- a/main.pl
+++ b/main.pl
@@ -65,7 +65,7 @@ if(param('oldpass') && param('pass')){
 my ($motd) = $DBH->selectrow_array("SELECT value FROM misc WHERE id='MOTD'");
 
 $BODY->param(MOTD => parseMarkup($motd));
-$BODY->param(Username => 'harv');
+$BODY->param(Username => $ND::USER);
 $BODY->param(isMember => isMember());
 $BODY->param(isHC => isHC());
 my @groups = map {name => $_}, sort keys %ND::GROUPS;

diff --git a/templates/addintel.tmpl b/templates/addintel.tmpl
index b30dc8f4c42fba36f23bc3631d7314e21f868263..2082a7fae1316aaf45334526686b4aa2fa51c793 100644 (file)
--- a/templates/addintel.tmpl
+++ b/templates/addintel.tmpl
@@ -8,7 +8,7 @@
                <textarea rows="20" cols="50" name="intel"></textarea>
                <input type="hidden" name="cmd" value="submit"/>
                <input type="hidden" name="page" value="addintel"/>
-               <br/>Tick:<input type="text" name="tick" value="1803"/>
+               <br/>Tick:<input type="text" name="tick" value="<TMPL_VAR NAME=Tick>"/>
                <input type="submit" value="Submit"/>
        </fieldset></form>
 </div>