--- trunk/html/swish.cgi	2003/03/18 20:20:11	21
+++ trunk/html/swish.cgi	2003/03/18 20:24:57	22
@@ -95,12 +95,14 @@
 	$s=~tr/¹©ðÐèÈæƾ®/sSdDcCcCzZ/;
 	$s=~s/\*\*+/*/g;
 
+	my %params;	# optional parametars for swish
+
 	my @properties = split(/\s+/,x($config->{properties}));
+	$params{properties} = \@properties if (@properties);
 
 	my $sh = SWISH->connect('Fork',
 		prog     => x($config->{prog}),
 		indexes  => x($config->{index}),
-		properties  => \@properties,
 		results  => sub {
 			my ($sh,$hit) = @_;
 
@@ -119,6 +121,7 @@
 #			print "Field '$_' = '", $hit->$_, "'<br>\n" for sort @fields;
 		},
 		maxhits => param('max_hits') || $max_hits,
+		\%params,
 	);
 
 	die $SWISH::errstr unless $sh;