--- smeserver-denyhosts-2.6/root/etc/e-smith/web/functions/denyhosts.patch2 2008-03-31 20:10:12.000000000 +0200 +++ smeserver-denyhosts-2.6/root/etc/e-smith/web/functions/denyhosts 2008-04-22 07:16:09.000000000 +0200 @@ -20,12 +20,6 @@ our $fm = esmith::FormMagick->new(); $fm->parse_xml(); -#use Sys::Filesystem (); -#use FileHandle; -# use Shell qw (ls cat); -#use File::Temp 0.12 qw(tempdir); -#use File::Basename; - use esmith::cgi; use esmith::config; use esmith::util; @@ -104,14 +98,10 @@ print $q->hr; - - #my @allowedhosts = `cat /var/lib/denyhosts/allowed-hosts`; - print $q->h1 ($q->pre ($fm->localise('FM_ALLOWED_HOSTS'))); print $q->hr; - #print $q->p ($q->pre ("@allowedhosts")); print "