summaryrefslogtreecommitdiff
path: root/t/Test
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org>2018-07-08 18:15:41 +0300
committerSergey Poznyakoff <gray@gnu.org>2018-07-08 18:15:41 +0300
commit32b6c6394dc6a789826bd51575d9703bb4097f70 (patch)
treeec851b9e9b90b74546df99b878b2dfeb3c2cc445 /t/Test
parent10897f8a984a6dbc511403ca942fb8c7a8883349 (diff)
downloadconfig-haproxy-32b6c6394dc6a789826bd51575d9703bb4097f70.tar.gz
config-haproxy-32b6c6394dc6a789826bd51575d9703bb4097f70.tar.bz2
Add testsuite
Diffstat (limited to 't/Test')
-rw-r--r--t/Test/HAProxy.pm23
1 files changed, 23 insertions, 0 deletions
diff --git a/t/Test/HAProxy.pm b/t/Test/HAProxy.pm
new file mode 100644
index 0000000..b5b8a19
--- /dev/null
+++ b/t/Test/HAProxy.pm
@@ -0,0 +1,23 @@
+package Test::HAProxy;
+use strict;
+use warnings;
+use parent 'Config::HAProxy';
+use File::Basename;
+use File::Temp;
+use autodie;
+
+sub new {
+ my $class = shift;
+
+ my $file = new File::Temp;
+ while (<main::DATA>) {
+ print $file $_;
+ }
+ close $file;
+ $class->SUPER::new($file->filename)->parse;
+}
+
+1;
+
+
+

Return to:

Send suggestions and report system problems to the System administrator.