This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
oslevel can fail on AIX, but the output generated would confuse
authorNicholas Clark <nick@ccl4.org>
Fri, 16 Jul 2004 10:14:24 +0000 (10:14 +0000)
committerNicholas Clark <nick@ccl4.org>
Fri, 16 Jul 2004 10:14:24 +0000 (10:14 +0000)
Configure

p4raw-id: //depot/perl@23122

Configure

index 5087714..cef7bfe 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -3080,7 +3080,9 @@ EOM
                aix) osname=aix
                        tmp=`( (oslevel) 2>/dev/null || echo "not found") 2>&1`
                        case "$tmp" in
-                       'not found') osvers="$4"."$3" ;;
+                       # oslevel can fail with:
+                       # oslevel: Unable to acquire lock.
+                       *not\ found) osvers="$4"."$3" ;;
                        '<3240'|'<>3240') osvers=3.2.0 ;;
                        '=3240'|'>3240'|'<3250'|'<>3250') osvers=3.2.4 ;;
                        '=3250'|'>3250') osvers=3.2.5 ;;