aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMaarten Vanraes <alien@mageia.org>2015-08-01 09:52:18 +0200
committerMaarten Vanraes <alien@mageia.org>2015-08-01 09:52:18 +0200
commitd43e0a3e101f48b8fbea5b17dfa1dd1f07defd6d (patch)
treeb731012028165b9a99166e1662d30fe16f0e90d0
parent9ec2d0205d3c8e2c24a1d769ee8af42b2d2cbec6 (diff)
downloadmanatools-d43e0a3e101f48b8fbea5b17dfa1dd1f07defd6d.tar
manatools-d43e0a3e101f48b8fbea5b17dfa1dd1f07defd6d.tar.gz
manatools-d43e0a3e101f48b8fbea5b17dfa1dd1f07defd6d.tar.bz2
manatools-d43e0a3e101f48b8fbea5b17dfa1dd1f07defd6d.tar.xz
manatools-d43e0a3e101f48b8fbea5b17dfa1dd1f07defd6d.zip
Logging: add a test case
-rw-r--r--t/11-Shared-Logging.t19
1 files changed, 19 insertions, 0 deletions
diff --git a/t/11-Shared-Logging.t b/t/11-Shared-Logging.t
new file mode 100644
index 00000000..5b18ae9c
--- /dev/null
+++ b/t/11-Shared-Logging.t
@@ -0,0 +1,19 @@
+use 5.006;
+use strict;
+use warnings FATAL => 'all';
+use Test::More;
+use Data::Dumper;
+
+BEGIN {
+ use_ok( 'ManaTools::Shared::Logging' ) || print "ManaTools::Shared::Logging failed!\n";
+}
+
+ok ( my $obj = ManaTools::Shared::Logging->new(), 'new_logging');
+diag Dumper($obj);
+# check I,W,E,D
+ok ( $obj->I("test info %d", 1), 'info_logging');
+ok ( $obj->W("test warning %d", 2), 'warning_logging');
+ok ( $obj->E("test err %d", 3), 'err_logging');
+ok ( $obj->D("test debug %d", 4), 'debug_logging');
+
+done_testing;