summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJason Woodward2009-01-04 15:36:27 +0000
committerJason Woodward2009-01-04 15:36:27 +0000
commit6f9decc9a74da6150b381bb4140c50e5c1445572 (patch)
tree58d70b3e7e2cfe859f9af2f220ed565c604dc39a
parenta075addb5812fffb6010950251245c2b24161d5b (diff)
downloadcpan2tgz-6f9decc9a74da6150b381bb4140c50e5c1445572.tar.gz
added David Unric's patch for localized error checking via Errno
-rw-r--r--Changelog3
-rwxr-xr-xcpan2tgz5
2 files changed, 6 insertions, 2 deletions
diff --git a/Changelog b/Changelog
index 929bc0e..a34f819 100644
--- a/Changelog
+++ b/Changelog
@@ -1,4 +1,7 @@
+0.6.5 Jan 04, 2009
+ * added David Unric's patch for localized error checking via Errno
+
0.6.4 Dec 31, 2008
* fixed incorrect return value from CPAN::*::make when YAML or YAML::Syck is in use
diff --git a/cpan2tgz b/cpan2tgz
index b73de54..12b7046 100755
--- a/cpan2tgz
+++ b/cpan2tgz
@@ -26,8 +26,9 @@ use Config;
use CPAN;
use Getopt::Long;
use File::Find ();
+use Errno;
-our $VERSION = '0.6.4';
+our $VERSION = '0.6.5';
our $HAS_YAML = 1;
eval "no warnings 'all'; use YAML;"; if ($@) { $HAS_YAML = 0 }
@@ -155,7 +156,7 @@ sub do_package
# make does not return the same when YAML or YAML::Syck is in
# use and $! is set to an internal non-fatal value from a YAML
# check
- if (!($! eq 'Inappropriate ioctl for device' && $HAS_YAML)) {
+ if (!($!{ENOTTY} && $HAS_YAML)) {
print "make ERROR [$module_name]: $!\n";
exit(1);
}