summaryrefslogtreecommitdiff
path: root/vms/gen_shrfls.pl
diff options
context:
space:
mode:
authorCraig A. Berry <craigberry@mac.com>2006-04-02 01:09:38 +0000
committerCraig A. Berry <craigberry@mac.com>2006-04-02 01:09:38 +0000
commit2ee88f01016d2541e1f47423d3e348014e311bc8 (patch)
tree427ab17ccf38f3b4735ae93200ddec336be554ef /vms/gen_shrfls.pl
parentdc5494d2ca929464ae4e4345bfcf79797bc9baa8 (diff)
downloadperl-2ee88f01016d2541e1f47423d3e348014e311bc8.tar.gz
fix typo in vms/gen_shrfls.pl itanium detector
p4raw-id: //depot/perl@27669
Diffstat (limited to 'vms/gen_shrfls.pl')
-rw-r--r--vms/gen_shrfls.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/vms/gen_shrfls.pl b/vms/gen_shrfls.pl
index 5fc9165f06..98afe30c17 100644
--- a/vms/gen_shrfls.pl
+++ b/vms/gen_shrfls.pl
@@ -60,7 +60,7 @@ $isvax = `\$ Write Sys\$Output \(F\$GetSyI(\"HW_MODEL\") .LE. 1024 .AND. F\$GetS
chomp $isvax;
print "\$isvax: \\$isvax\\\n" if $debug;
-$isi64 = `\$ Write Sys\$Output \(F\$GetSyI(\"HW_MODEL\") .GE. 4096`;
+$isi64 = `\$ Write Sys\$Output \(F\$GetSyI(\"HW_MODEL\") .GE. 4096)`;
chomp $isi64;
print "\$isi64: \\$isi64\\\n" if $debug;