X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=motd.pl;fp=motd.pl;h=b324cc013c3592ed966f8cd4b29fee61930c099c;hb=3fbdd3816ab065ed3ac2b5f77e7617b2c09ea00c;hp=f69a54a4f1da894581db34285a839f6717d2d7c8;hpb=409b542556545c6ebfc579ce114338242c966ceb;p=ndwebbie.git

diff --git a/motd.pl b/motd.pl
index f69a54a..b324cc0 100644
--- a/motd.pl
+++ b/motd.pl
@@ -18,21 +18,22 @@
 #**************************************************************************/
 
 use strict;
+use warnings FATAL => 'all';
+use ND::Include;
 
 $ND::TEMPLATE->param(TITLE => 'Edit MOTD');
 
 our $BODY;
 our $DBH;
-our $LOG;
 
 die "You don't have access" unless isHC();
 
-if (param('cmd') eq 'change'){
+if (defined param 'cmd' and param('cmd') eq 'change'){
 	$DBH->begin_work;
 	my $query = $DBH->prepare(q{UPDATE misc SET value= ? WHERE id='MOTD'});
 	my $motd = escapeHTML(param('motd'));
 	$query->execute($motd);
-	$LOG->execute($ND::UID,"Updated MOTD");
+	log_message $ND::UID,"Updated MOTD";
 	$DBH->commit;
 	$BODY->param(MOTD => $motd);
 }else{