Changeset 34029

Timestamp:

Jun 18, 2012, 9:01:02 AM (14 years ago)

Author:

eugene

Message:

cleanup error messages

File:

• branches/eam_branches/ipp-20120601/psconfig/pscheckmods (modified) (3 diffs)

branches/eam_branches/ipp-20120601/psconfig/pscheckmods

@@ -11 +11 @@
 if ($VERBOSE) { print STDERR "checking in @INC\n"; }
 
-## XXX EAM $realfilename = "ISO8601.pm";
-## XXX EAM $result = do $realfilename;
-## XXX EAM print "result: $result\n";
-## XXX EAM print "$@\n";
-## XXX EAM exit 2;
-
-&detailed_require ($ARGV[0]);
+# &detailed_require ($ARGV[0]);
 
 $x = eval "require $ARGV[0]; 1";
@@ -25 +19 @@
     &detailed_require ($ARGV[0]);
 }
-if ($VERBOSE) { print "x: $x\n"; }
+if ($VERBOSE) { print "result of require: $x\n"; }
 
 $version = eval "\$$ARGV[0]::VERSION";
@@ -44 +38 @@
     if (exists $INC{$filename}) {
         return 1 if $INC{$filename};
-        die "Compilation failed in require";
     }
     my ($realfilename,$result);