From: Michael Andreen <harv@ruin.nu>
Date: Thu, 11 Jan 2007 10:47:17 +0000 (+0000)
Subject: stuff
X-Git-Url: https://ruin.nu/git/?a=commitdiff_plain;h=36b2fb1d5ea4cc4e16b5250af982134fa5d0f4a4;p=ndwebbie.git

stuff
---

diff --git a/ND/Web/Pages/Forum.pm b/ND/Web/Pages/Forum.pm
index c8aa120..cc15bad 100644
--- a/ND/Web/Pages/Forum.pm
+++ b/ND/Web/Pages/Forum.pm
@@ -23,6 +23,7 @@ use warnings;
 use ND::Web::Forum;
 use CGI qw/:standard/;
 use ND::Web::Include;
+use ND::Include;
 
 $ND::PAGES{forum} = {parse => \&parse, process => \&process, render=> \&render};
 
@@ -96,7 +97,10 @@ sub render {
 			my $moveThread = $DBH->prepare(q{UPDATE forum_threads SET fbid = $1 WHERE ftid = $2 AND fbid = $3});
 			for my $param (param()){
 				if ($param =~ /t:(\d+)/){
-					$moveThread->execute(param('board'),$1,$board->{id}) or $ND::ERROR .= p($DBH->errstr)
+					$moveThread->execute(param('board'),$1,$board->{id}) or $ND::ERROR .= p($DBH->errstr);
+					if ($moveThread->rows > 0){
+						log_message $ND::UID, qq{Moved thread: $1 to board: $board->{id}};
+					}
 				}
 			}
 			$DBH->commit or $ND::ERROR .= p($DBH->errstr);
diff --git a/ND/Web/Pages/Main.pm b/ND/Web/Pages/Main.pm
index 3e8d751..29f7c51 100644
--- a/ND/Web/Pages/Main.pm
+++ b/ND/Web/Pages/Main.pm
@@ -19,7 +19,7 @@
 
 package ND::Web::Pages::Main;
 use strict;
-use warnings FATAL => 'all';
+use warnings;
 use CGI qw/:standard/;
 use ND::Include;
 use ND::Web::Include;