From 13beba8606c26160c9f325299f7b06b4bf2eef8e Mon Sep 17 00:00:00 2001
From: Jules Laplace <carbon@melanarchy.org>
Date: Mon, 23 Dec 2013 18:47:59 -0600
Subject: fix debug logging of ids

---
 bucky2/bin/fix-files | 2 +-
 lib/comments.pm      | 1 +
 lib/files.pm         | 8 +++++---
 3 files changed, 7 insertions(+), 4 deletions(-)

diff --git a/bucky2/bin/fix-files b/bucky2/bin/fix-files
index 080ef78..150d6fa 100644
--- a/bucky2/bin/fix-files
+++ b/bucky2/bin/fix-files
@@ -4,7 +4,7 @@ use lib "../lib";
 use Bucky;
 
 my $bucky = new Bucky;
-my $file_list = $bucky->db->select("file", {'thread = 2833 AND id > 16186'});
+my $file_list = $bucky->db->select("file", {'thread = 2833'});
 my $file_map = {};
 foreach my $f (@$file_list) {
   $file_map->{ $f->{'filename'} } = $f->{'id'};
diff --git a/lib/comments.pm b/lib/comments.pm
index 1ccd469..576155c 100644
--- a/lib/comments.pm
+++ b/lib/comments.pm
@@ -207,6 +207,7 @@ sub display_subcomment
   my $z_date = verbosedate($c->{date});
   my $z_age = get_age($c->{date});
   $z_age .= "&nbsp;ago" unless $age eq "now";
+  my $z_id = $c->{id};
   my $z_user = $c->{username};
   my $z_profile = qq($BUCKY/profile/$z_user);
   my $z_comment = linebr($c->{comment}, $args->{shorturl});
diff --git a/lib/files.pm b/lib/files.pm
index 71ccafa..b9a57d5 100644
--- a/lib/files.pm
+++ b/lib/files.pm
@@ -191,14 +191,16 @@ sub display_file
 	my $bright = 0;
 	$checked = check_key($cbox, $f->{id});
 
+	print qq[<tr class="row$r">];
+
 	if ($DEBUG)
 		{
-		print qq!Displaying file $f->{id}!;
+		print qq!<td>\n!;
+		print qq!$f->{id}!;
 		print qq! (checked)! if ($checked);
-		print qq!<br>\n!;
+		print qq!</td>\n!;
 		}
 
-	print qq[<tr class="row$r">];
 	if ($cbox)
 		{
 		print qq!<td align="right"><input type="checkbox" name="file$f->{id}" value="$f->{id}"!;
-- 
cgit v1.2.3-70-g09d2