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

---
 lib/comments.pm | 1 +
 lib/files.pm    | 8 +++++---
 2 files changed, 6 insertions(+), 3 deletions(-)

(limited to 'lib')

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