umm.. Allen, there is a lot of junk code in the files
for example [lib.cgi],
in sub CreateNewThread, this code looks like unnecessary? I couldnt locate any code using them:
Quote
code:
Code
#adjust bgcolor variables if ($vars_style{BGColor} ne ""){$BGColor = qq(bgcolor="$vars_style{BGColor}");} if ($vars_style{AltColumnColor1} ne ""){$AltColumnColor1 = qq(class="color1");} if ($vars_style{AltColumnColor2} ne ""){$AltColumnColor2 = qq(class="color2");} if ($vars_style{CategoryStripColor} ne ""){$CategoryStripColor = qq(bgcolor="$vars_style{CategoryStripColor}");} if ($vars_style{TableColorStrip} ne ""){$TableColorStrip = qq(bgcolor="$vars_style{TableColorStrip}");} if ($vars_style{PageBackground} ne ""){$PageBackground = qq(background="$vars_config{NonCGIURL}/$vars_style{PageBackground}");} if ($vars_style{TableBorderColor} ne ""){ $TableWidth2 = "100%"; $BorderTop = $TBT; $BorderBottom = $TBB; } else { $TableWidth2 = $vars_style{TableWidth}; $BorderTop = $TBT; $BorderBottom = $TBB; }
also there are un-closed and un-openen curlies:
in sub Lock, while is not closed but you' ve closed it in Unlock
code: [qb]
Code
sub Lock { local ($lockname) = @_; local ($endtime); $endtime = 15; $endtime = time + $endtime; while (-e $lockname && time < $endtime) { open (LOCKFILE, ">$lockname"); } #end lock sr
Donate to UBBDev today to help aid in Operational, Server and Script Maintenance, and Development costs.
Please also see our parent organization VNC Web Services if you're in the need of a new UBB.threads Install or Upgrade, Site/Server Migrations, or Security and Coding Services.
