From: Colin Watson <cjwatson@chiark.greenend.org.uk>
Date: Sat, 28 Sep 2002 11:06:38 +0000 (+0000)
Subject: bin/expandvars: Don't use defined() on arrays.
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~cjwatson/git?p=bin.git;a=commitdiff_plain;h=cb40d23716de523fcfb585bc3d8dc84e5d790cbc

bin/expandvars: Don't use defined() on arrays.
---

diff --git a/expandvars b/expandvars
index 68f56c8..d9d7fd9 100755
--- a/expandvars
+++ b/expandvars
@@ -53,7 +53,7 @@ while (<CONF>)
     last;
 }
 
-usage unless defined @params && $#params >= 0;
+usage unless @params;
 
 # Eek. This matches the next (optionally double-quoted) string on the line.
 my $stringre = qr/\s*("(?:[^\\]|\\.)*?"|(?:[^\\]|\\.)+?)(?:\s|$)/;