From 92e02c105c5b673502689ff4785ef54002b49a1b Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 15 Oct 2016 21:06:02 +0100
Subject: Test suite: stunt parsechangelog: Some commented-out debugging

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 tests/tstunt/Dpkg/Changelog/Parse.pm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'tests/tstunt/Dpkg')

diff --git a/tests/tstunt/Dpkg/Changelog/Parse.pm b/tests/tstunt/Dpkg/Changelog/Parse.pm
index 89b5e57..d69b7df 100644
--- a/tests/tstunt/Dpkg/Changelog/Parse.pm
+++ b/tests/tstunt/Dpkg/Changelog/Parse.pm
@@ -60,6 +60,9 @@ sub changelog_parse {
     my $fields = Dpkg::Control::Changelog->new();
     $fields->parse(\*P, "output of stunt changelog parser");
 
+#use Data::Dumper;
+#print STDERR "PARSE $0 ", Dumper($fields);
+
     close P or die "$! $?";
 
     return $fields;
-- 
cgit v1.2.3