From f1f711963b8e5f0b2b5a9d80a522cbd616a153a9 Mon Sep 17 00:00:00 2001 From: Jay Berkenbilt Date: Sat, 4 Jun 2022 21:15:40 -0400 Subject: Add and test QPDFLogger class --- libtests/qtest/logger.test | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 libtests/qtest/logger.test (limited to 'libtests/qtest/logger.test') diff --git a/libtests/qtest/logger.test b/libtests/qtest/logger.test new file mode 100644 index 00000000..86767eff --- /dev/null +++ b/libtests/qtest/logger.test @@ -0,0 +1,33 @@ +#!/usr/bin/env perl +require 5.008; +use warnings; +use strict; + +chdir("logger") or die "chdir testdir failed: $!\n"; + +require TestDriver; + +my $td = new TestDriver('logger'); + +cleanup(); + +$td->runtest("logger", + {$td->COMMAND => "logger >stdout 2>stderr"}, + {$td->STRING => "", $td->EXIT_STATUS => 0}, + $td->NORMALIZE_NEWLINES); +$td->runtest("check stdout", + {$td->FILE => "stdout"}, + {$td->FILE => "exp-stdout"}, + $td->NORMALIZE_NEWLINES); +$td->runtest("check stderr", + {$td->FILE => "stderr"}, + {$td->FILE => "exp-stderr"}, + $td->NORMALIZE_NEWLINES); + +cleanup(); +$td->report(3); + +sub cleanup +{ + unlink "stdout", "stderr"; +} -- cgit v1.2.3-54-g00ecf