$NetBSD: patch-aa,v 1.1.1.1 2001/03/25 06:33:16 mjl Exp $ --- Makefile.PL.orig Wed Aug 30 17:54:08 2000 +++ Makefile.PL Sun Mar 25 08:20:30 2001 @@ -14,16 +14,16 @@ } my %config; - $config{email_address} = prompt( q[ -To do a full test of the Log::Dispatch::* modules, we need -to attempt to send an email. If you want these tests to -be done please supply an address. -Address?] ); - - $config{syslog} = prompt( q[ -Do you want to test Log::Dispatch::Syslog by sending a message as -daemon.notice? -Yes/No?], 'No' ); +# $config{email_address} = prompt( q[ +#To do a full test of the Log::Dispatch::* modules, we need +#to attempt to send an email. If you want these tests to +#be done please supply an address. +#Address?] ); + +# $config{syslog} = prompt( q[ +#Do you want to test Log::Dispatch::Syslog by sending a message as +#daemon.notice? +#Yes/No?], 'No' ); delete $config{syslog} if $config{syslog} !~ /^y(?:es)?/i; @@ -91,7 +91,7 @@ while (1) { - chomp (my $module = ); +# chomp (my $module = ); last unless $module; if (-e "./Dispatch/$module")