add do while loop to Reader.pm, may fixes XML bug

1 files changed, 1 insertions, 1 deletions

diff --git a/index.pl b/index.pl
index d5a4ef3..985af29 100755
--- a/index.pl
+++ b/index.pl
@@ -9,7 +9,7 @@ use Socket;
 use Sys::Hostname;
 
 my $host = hostname();
-my $config = -e "config-$host.txt" ?  "config-$host.txt" : 'config.txt';
+my $config = -e "config-$host.txt" ? "config-$host.txt" : 'config.txt';
 
 my Xerl $xerl = Xerl->new( config => $config );
 $xerl->run();