fixed various bugs

This commit is contained in:
JT Smith 2004-07-12 00:13:28 +00:00
parent e896f3cb1e
commit 8061e40dcf
4 changed files with 20 additions and 14 deletions

View file

@ -236,7 +236,7 @@ sub www_view {
my $caller;
my $sth = WebGUI::SQL->read("select * from MessageBoard_forums where wobjectId=".$_[0]->get("wobjectId")." order by sequenceNumber");
while (my $forumMeta = $sth->hashRef) {
my $callback = WebGUI::URL::page("func=view&wid=".$_[0]->get("wobjectId")."&forumId=".$forumMeta->{forumId});
my $callback = WebGUI::URL::page("func=view&wid=".$_[0]->get("wobjectId")."&forumId=".$forumMeta->{forumId});
if ($session{form}{forumOp}) {
if ($session{form}{forumId} == $forumMeta->{forumId}) {
$caller = {