+sub def_log {
+ my ($uid,$call, $message) = @_;
+ my $log = $ND::DBH->prepare_cached(q{INSERT INTO forum_posts (ftid,uid,message) VALUES(
+ (SELECT ftid FROM calls WHERE id = $3),$1,$2)});
+ $log->execute($uid,$message,$call) or $ND::ERROR .= p($ND::DBH->errstr);
+}
+