Committer: ailyin
LJSV-1525 (http://www.livejournal.com/admin/faq/faqedit.bml not working): if a page fails miserably, a little bit of strictness can helpU trunk/htdocs/admin/faq/faqedit.bml
Modified: trunk/htdocs/admin/faq/faqedit.bml =================================================================== --- trunk/htdocs/admin/faq/faqedit.bml 2011-04-14 13:09:15 UTC (rev 18877) +++ trunk/htdocs/admin/faq/faqedit.bml 2011-04-15 02:53:40 UTC (rev 18878) @@ -10,10 +10,13 @@ <?_code +#line 14 - $id = $FORM{'id'} + 0; - $ret = ""; + use strict; + my $id = $FORM{'id'} + 0; + my $ret = ""; + my $dbh = LJ::get_db_writer(); my $remote = LJ::get_remote(); @@ -200,7 +203,7 @@ push @cats, '';push @cats, ''; my $faqd = LJ::Lang::get_dom("faq"); - while (($fc, $fcname) = $sth->fetchrow_array) + while (my ($fc, $fcname) = $sth->fetchrow_array) { if ($id) { next unless ($ac_add{'*'} || $ac_add{$fc} || ($fc eq $faqcat));