Always set $opts{searchon_form}

diff --git a/cgi-bin/dispatcher.pl b/cgi-bin/dispatcher.pl
index f967fd379a2fc704201428d307e93b6c53b41100..0de4f1cb0bd177df4911a6da228ad8a3ba07c9d8 100755 (executable)
--- a/cgi-bin/dispatcher.pl
+++ b/cgi-bin/dispatcher.pl
@@ -179,6 +179,8 @@ if ((($opts{searchon} eq 'names') && $opts{source}) ||
     $opts{source} = 1;
     $opts{searchon} = 'names',
     $opts{searchon_form} = 'sourcenames';
+} else {
+    $opts{searchon_form} = $opts{searchon};
 }
 
 my $pet1 = new Benchmark;