[livejournal] r18913: LJSV-1525 (http://www.livejournal.com/ad...

U   trunk/htdocs/admin/faq/readcat.bml

Modified: trunk/htdocs/admin/faq/readcat.bml
===================================================================
--- trunk/htdocs/admin/faq/readcat.bml	2011-04-20 03:22:01 UTC (rev 18912)
+++ trunk/htdocs/admin/faq/readcat.bml	2011-04-20 03:32:04 UTC (rev 18913)
@@ -9,16 +9,18 @@
 </CENTER>
 
 <?_code
+#line 13
+ use strict;
 
  my $dbh = LJ::get_db_writer();
 
- $ret = "";
+ my $ret = "";
 
  my $qfaqcat = $dbh->quote($FORM{'faqcat'});
 
  my %faqcat;
  my %faqq;
- $sth = $dbh->prepare("SELECT faqcat, faqcatname, catorder FROM faqcat WHERE faqcat=$qfaqcat");
+ my $sth = $dbh->prepare("SELECT faqcat, faqcatname, catorder FROM faqcat WHERE faqcat=$qfaqcat");
  $sth->execute;
  while ($_ = $sth->fetchrow_hashref)
  {