From 99759c687ad664279f87bf32baea67c9ddc886db Mon Sep 17 00:00:00 2001 From: Ben Elliston Date: Thu, 25 Feb 1999 18:15:07 +0000 Subject: [PATCH] 1999-02-26 Ben Elliston * autoscan.pl (parse_args): Make compatible with Perl version 4. --- autoscan.in | 2 +- autoscan.pl | 2 +- bin/autoscan.in | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/autoscan.in b/autoscan.in index 0e29a790..ac394c7f 100644 --- a/autoscan.in +++ b/autoscan.in @@ -39,7 +39,7 @@ exit 0; # Process any command line arguments. sub parse_args { - local ($usage) = << 'EOD'; + local ($usage) = <<'EOD'; Usage: autoscan [OPTION] ... [SRCDIR] Examine source files in the directory tree rooted at SRCDIR, or the diff --git a/autoscan.pl b/autoscan.pl index 0e29a790..ac394c7f 100644 --- a/autoscan.pl +++ b/autoscan.pl @@ -39,7 +39,7 @@ exit 0; # Process any command line arguments. sub parse_args { - local ($usage) = << 'EOD'; + local ($usage) = <<'EOD'; Usage: autoscan [OPTION] ... [SRCDIR] Examine source files in the directory tree rooted at SRCDIR, or the diff --git a/bin/autoscan.in b/bin/autoscan.in index 0e29a790..ac394c7f 100644 --- a/bin/autoscan.in +++ b/bin/autoscan.in @@ -39,7 +39,7 @@ exit 0; # Process any command line arguments. sub parse_args { - local ($usage) = << 'EOD'; + local ($usage) = <<'EOD'; Usage: autoscan [OPTION] ... [SRCDIR] Examine source files in the directory tree rooted at SRCDIR, or the -- 2.47.2