oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

WebGUI 3.6.2 release

Browse source
This commit is contained in:
JT Smith 2002-03-26 03:07:00 +00:00
parent 6c593771e1
commit a389e8ff95
9 changed files with 127 additions and 65 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lib/WebGUI/Discussion.pm
View file

@ -23,6 +23,7 @@ use WebGUI::URL;
#-------------------------------------------------------------------
sub _deleteReplyTree {
my ($sth, %data, $messageId);
tie %data, 'Tie::CPHash';
$sth = WebGUI::SQL->read("select messageId from discussion where pid=$_[0] order by messageId");
while (%data = $sth->hash) {
_deleteReplyTree($data{messageId});