From acda767722286c4e35b3917d1812e590ec852b26 Mon Sep 17 00:00:00 2001
From: "Heiko Schlittermann (HS12-RIPE)" <hs@schlittermann.de>
Date: Wed, 2 Nov 2016 23:16:49 +0100
Subject: [PATCH] Testsuite: started t/ to add tests for the testsuite

---
 test/t/00-basic.t | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 test/t/00-basic.t

diff --git a/test/t/00-basic.t b/test/t/00-basic.t
new file mode 100644
index 000000000..df7eab4de
--- /dev/null
+++ b/test/t/00-basic.t
@@ -0,0 +1,19 @@
+use Test::More;
+use lib 'lib';
+use_ok 'Exim::Runtest';
+
+can_ok 'Exim::Runtest', qw(mailgroup);
+
+my $group = getgrgid $(;
+ok $group => 'got a group name';
+diag "use group $group";
+
+is Exim::Runtest::mailgroup($group), $group => 'group names match';
+ok $group = Exim::Runtest::mailgroup('non existing group') => 'cope with unknown group';
+diag "got random group: $group";
+
+ok getgrnam($group) => 'got an existing group';
+
+
+
+done_testing;
-- 
2.25.1