From: Micah Cowan Date: Fri, 16 May 2008 17:39:35 +0000 (-0700) Subject: Added copyright notice, removing unused declaration. X-Git-Tag: v1.13~421^2~12^2~21 X-Git-Url: http://sjero.net/git/?p=wget;a=commitdiff_plain;h=66517821eee0933714f76ca43432e73dc72532cf Added copyright notice, removing unused declaration. --- diff --git a/util/paramcheck.pl b/util/paramcheck.pl index 83ad20c1..26078506 100755 --- a/util/paramcheck.pl +++ b/util/paramcheck.pl @@ -1,5 +1,20 @@ #!/usr/bin/perl +# Copyright (C) 2008 Free Software Foundation, Inc. + +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. + +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. + +# You should have received a copy of the GNU General Public License +# along with this program. If not, see . + use strict; use warnings; @@ -44,7 +59,7 @@ sub extract_opts_chunk sub extract_opts { my ($lines, $names) = @_; - my ($is_deprecated, @opts); + my @opts; foreach my $line (@$lines) { my ($args) = $line =~ /\{ \s+? (.*?) \s+? \}/sx; next unless defined $args;