From: Michael Meffie <mmeffie@sinenomine.net>
Date: Tue, 30 Apr 2013 23:57:21 +0000 (-0400)
Subject: tests: posix signal constants in rx/perf test
X-Git-Tag: upstream/1.8.0_pre1^2~1196
X-Git-Url: https://git.michaelhowe.org/gitweb/?a=commitdiff_plain;h=b88ff242df03f7332945793422e7c16c423b7e76;p=packages%2Fo%2Fopenafs.git

tests: posix signal constants in rx/perf test

Export the posix signal constants in the rx/perf perl test. Fixes a
perl syntax error on solaris.

Change-Id: Iaad361b8533787f9ad97fa00221e01e687f50723
Reviewed-on: http://gerrit.openafs.org/9836
Tested-by: BuildBot <buildbot@rampaginggeek.com>
Reviewed-by: Derrick Brashear <shadow@your-file-system.com>
---

diff --git a/tests/rx/perf-t b/tests/rx/perf-t
index fceec181d..025d6b5e3 100755
--- a/tests/rx/perf-t
+++ b/tests/rx/perf-t
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 
 use Test::More tests=>4;
-use POSIX "sys_wait_h";
+use POSIX qw(:sys_wait_h :signal_h);
 
 my $port = 4000;
 my $build = $ENV{BUILD};
@@ -37,7 +37,7 @@ is (0,
 
 kill("TERM", $pid);
 waitpid($pid, 0);
-if (WIFSIGNALED($?) && WTERMSIG($?) != POSIX::SIGTERM) {
+if (WIFSIGNALED($?) && WTERMSIG($?) != SIGTERM) {
     fail("Server died with signal ".WTERMSIG($?));
 } elsif (WIFEXITED($?) && WEXITSTATUS($?) != 0) {
     fail("Server exited with code". WEXITSTATUS($?));