--- trunk/httpd.pl	2004/05/06 23:06:08	16
+++ trunk/httpd.pl	2004/05/07 11:25:01	17
@@ -14,6 +14,8 @@
 
 use Data::Dumper;
 
+my $debug = 1;
+
 my $d = HTTP::Daemon->new( Reuse => 1, LocalPort => 6969 ) || die;
 my $cgi = new CGI::Lite;
 my $mws = MWS->new('global.conf');
@@ -68,7 +70,7 @@
 		my $url = $r->url->path;
 
 		# XXX LOG
-		print $r->method," ",$url,Dumper($param);
+		print $r->method," ",$url,"\n",Dumper($param),"\n" if ($debug);
 
 		# template file name (use ?format=html as default)
 		my $tpl_file = 'master.';
@@ -99,6 +101,7 @@
 			my @res = $mws->fetch_all_results();
 
 			$tpl_var->{results} = \@res;
+			$tpl_var->{total_hits} = $mws->{total_hits};
 
 
 		#