diff options
author | Michael G. Schwern <schwern@pobox.com> | 2001-09-18 14:47:14 -0400 |
---|---|---|
committer | Abhijit Menon-Sen <ams@wiw.org> | 2001-09-18 22:11:25 +0000 |
commit | 7b48dbf9833dd0173f81b50164ac3dfbf08c9c41 (patch) | |
tree | d45e573cce7da0d5cfd16bd9adb541cfef14f83a /t | |
parent | 83ebf7e24acaf1a3b2a0ab5e6c3203a2b25bc739 (diff) | |
download | perl-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.t | 19 |
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. |