diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-29 02:55:58 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-29 02:55:58 +0000 |
| commit | 199566928fd3000f78b2b73ac518cc24c1c23c98 (patch) | |
| tree | 5dab1f2e94e69718e85acd72fa7d6fe7c4edf6e4 /jpl/JNI/JNI.pm | |
| parent | 5ae032e52d5a7115f5d9d196a67232baa1cdf9cf (diff) | |
| download | perl-199566928fd3000f78b2b73ac518cc24c1c23c98.tar.gz | |
The latest JPL from the anoncvs.
p4raw-id: //depot/perl@11015
Diffstat (limited to 'jpl/JNI/JNI.pm')
| -rw-r--r-- | jpl/JNI/JNI.pm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/jpl/JNI/JNI.pm b/jpl/JNI/JNI.pm index c91ae9c998..6ef65e275a 100644 --- a/jpl/JNI/JNI.pm +++ b/jpl/JNI/JNI.pm @@ -198,7 +198,7 @@ sub AUTOLOAD { ($constname = $AUTOLOAD) =~ s/.*:://; my $val = constant($constname, @_ ? $_[0] : 0); if ($! != 0) { - if ($! =~ /Invalid/ || $!{EINVAL}) { + if ($! =~ /Invalid/) { $AutoLoader::AUTOLOAD = $AUTOLOAD; goto &AutoLoader::AUTOLOAD; } @@ -318,8 +318,6 @@ JNI - Perl encapsulation of the Java Native Interface =head1 DESCRIPTION -This module provides an encapsulation in Perl of the Java Native Interface. - =head1 Exported constants JNI_ABORT |