[pkgsrc/trunk]: pkgsrc/pkgtools/pkglint/files Fixed a typo found by Eric Hasz...

[rillig <rillig%pkgsrc.org@localhost>]

details:   https://anonhg.NetBSD.org/pkgsrc/rev/c4df8ad5c5f2
branches:  trunk
changeset: 546369:c4df8ad5c5f2
user:      rillig <rillig%pkgsrc.org@localhost>
date:      Sat Aug 30 06:50:37 2008 +0000

description:
Fixed a typo found by Eric Haszlakiewicz.

diffstat:

 pkgtools/pkglint/files/pkglint.pl |  4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diffs (19 lines):

diff -r 0c315f9e04c0 -r c4df8ad5c5f2 pkgtools/pkglint/files/pkglint.pl
--- a/pkgtools/pkglint/files/pkglint.pl Sat Aug 30 05:42:40 2008 +0000
+++ b/pkgtools/pkglint/files/pkglint.pl Sat Aug 30 06:50:37 2008 +0000
@@ -1,5 +1,5 @@
 #! @PERL@
-# $NetBSD: pkglint.pl,v 1.771 2008/08/28 20:38:39 rillig Exp $
+# $NetBSD: pkglint.pl,v 1.772 2008/08/30 06:50:37 rillig Exp $
 #
 
 # pkglint - static analyzer and checker for pkgsrc packages
@@ -5858,7 +5858,7 @@
        # If the variable is not used and is untyped, it may be a
        # spelling mistake.
        if ($op eq ":=" && $varname eq lc($varname)) {
-               $opt_warn_unchecked and $line->log_warning("${varname} might be unused unless it is an argument to a procedure file.");
+               $opt_debug_unchecked and $line->log_debug("${varname} might be unused unless it is an argument to a procedure file.");
                # TODO: check $varname against the list of "procedure files".
 
        } elsif (!var_is_used($varname)) {