From 03fbdb67704c8b1afa696b1d7ff98fc005c05af4 Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 25 Oct 2001 08:41:43 +0000 Subject: [PATCH] remove debugging cruft --- FS/FS/Conf.pm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/FS/FS/Conf.pm b/FS/FS/Conf.pm index 615fdcb72..fb8d13bae 100644 --- a/FS/FS/Conf.pm +++ b/FS/FS/Conf.pm @@ -127,15 +127,15 @@ sub set { $value = $1; unless ( $self->config($file) eq $value ) { warn "[FS::Conf] SET $file\n" if $DEBUG; - warn "$dir" if is_tainted($dir); - warn "$dir" if is_tainted($file); +# warn "$dir" if is_tainted($dir); +# warn "$dir" if is_tainted($file); my $fh = new IO::File ">$dir/$file" or return; print $fh "$value\n"; } } -sub is_tainted { - return ! eval { join('',@_), kill 0; 1; }; - } +#sub is_tainted { +# return ! eval { join('',@_), kill 0; 1; }; +# } =item delete -- 2.11.0