make whole cell clickable

[ndwebbie.git] / forum.pl

diff --git a/forum.pl b/forum.pl
index a9f1be1bd2dfcfaa49cfe3acc9ffcd4b0c647d6e..eb59bac95b3a584f611da61fe514294f603022b4 100644 (file)
--- a/forum.pl
+++ b/forum.pl
@@ -52,14 +52,7 @@ if(param('t')){
 if (defined param('cmd') && param('cmd') eq 'forumpost'){
        $DBH->begin_work;
        if ($board && $board->{post}){
-               my $insert = $DBH->prepare(q{INSERT INTO forum_threads (fbid,subject) VALUES($1,$2)});
-               if ($insert->execute($board->{id},escapeHTML(param('subject')))){
-                       $thread = $DBH->selectrow_hashref($findThread,undef,
-                               $DBH->last_insert_id(undef,undef,undef,undef,"forum_threads_ftid_seq"),$ND::UID)
-                               or $ERROR .= p($DBH->errstr);
-               }else{
-                       $ERROR .= p($DBH->errstr);
-               }
+               $thread = addForumThread $DBH,$board,$ND::UID,param('subject');
        }
        if ($thread && $thread->{post}){
                addForumPost($DBH,$thread,$ND::UID,param('message'));