t: Split buildsystem_tests in to smaller bits

Signed-off-by: Niels Thykier <niels@thykier.net>

1 files changed, 9 insertions, 1 deletions

diff --git a/t/Test/DH.pm b/t/Test/DH.pm
index 7b6bdd4e..080a669a 100644
--- a/t/Test/DH.pm
+++ b/t/Test/DH.pm
@@ -36,7 +36,7 @@ use Debian::Debhelper::Dh_Lib;
 our @EXPORT = qw(
     each_compat_up_to_and_incl_subtest each_compat_subtest
     each_compat_from_and_above_subtest run_dh_tool
-    uid_0_test_is_ok create_empty_file
+    uid_0_test_is_ok create_empty_file readlines
 );
 
 our ($TEST_DH_COMPAT, $ROOT_OK, $ROOT_CMD);
@@ -189,4 +189,12 @@ sub create_empty_file {
     return 1;
 }
 
+sub readlines {
+    my ($h) = @_;
+    my @lines = <$h>;
+    close $h;
+    chop @lines;
+    return \@lines;
+}
+
 1;