From 003f86fb1f9c7f77f65b851a2ff57617bd9bf277 Mon Sep 17 00:00:00 2001 From: "terry%mozilla.org" <> Date: Tue, 19 Oct 1999 06:57:56 +0000 Subject: Fixed stupid perl warnings. --- defparams.pl | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'defparams.pl') diff --git a/defparams.pl b/defparams.pl index 56a63cf6d..388c4139d 100644 --- a/defparams.pl +++ b/defparams.pl @@ -26,6 +26,15 @@ use diagnostics; use strict; +# Shut up misguided -w warnings about "used only once". For some reason, +# "use vars" chokes on me when I try it here. + +sub bug_form_pl_sillyness { + my $zz; + $zz = %::param_checker; + $zz = %::param_desc; + $zz = %::param_type; +} sub WriteParams { foreach my $i (@::param_list) { -- cgit v1.2.3-24-g4f1b