summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorMichael G. Schwern <schwern@pobox.com>2001-09-18 14:47:14 -0400
committerAbhijit Menon-Sen <ams@wiw.org>2001-09-18 22:11:25 +0000
commit7b48dbf9833dd0173f81b50164ac3dfbf08c9c41 (patch)
treed45e573cce7da0d5cfd16bd9adb541cfef14f83a /t
parent83ebf7e24acaf1a3b2a0ab5e6c3203a2b25bc739 (diff)
downloadperl-7b48dbf9833dd0173f81b50164ac3dfbf08c9c41.tar.gz
Re: [PATCH] t/op/crypt.t
Message-Id: <20010918184714.I585@blackrider> p4raw-id: //depot/perl@12076
Diffstat (limited to 't')
-rw-r--r--t/op/crypt.t19
1 files changed, 18 insertions, 1 deletions
diff --git a/t/op/crypt.t b/t/op/crypt.t
index 2619338b25..457be52f25 100644
--- a/t/op/crypt.t
+++ b/t/op/crypt.t
@@ -1,6 +1,23 @@
-use Test::More tests => 2;
+#!./perl -Tw
+
+BEGIN {
+ chdir 't' if -d 't';
+ @INC = ('../lib');
+}
+
use Config;
+BEGIN {
+ require Test::More;
+
+ if( !$Config{d_crypt} ) {
+ Test::More->import('skip_all');
+ }
+ else {
+ Test::More->import(tests => 2);
+ }
+}
+
# Can't assume too much about the string returned by crypt(),
# and about how many bytes of the encrypted (really, hashed)
# string matter.