X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;ds=inline;f=vhost%2Fwebpac2.cgi;h=1f77b8f12fddc042cd390a5cff54e4fb0bf7ff2e;hb=dd90d5ad6ed43a985d367818cd6238973d32bbca;hp=4079f3c5e614b7f71f62e64f35fae2317ce847e0;hpb=332902c2a6e9080a4d9ad6744cb34b7045399a51;p=webpac2

diff --git a/vhost/webpac2.cgi b/vhost/webpac2.cgi
index 4079f3c..1f77b8f 100755
--- a/vhost/webpac2.cgi
+++ b/vhost/webpac2.cgi
@@ -123,8 +123,20 @@ print
 		hidden( -name => 'entries_per_page', -default => $entries_per_page ),
 		hidden( -name => 'current_page', -default => 1 ),
 		checkbox( -name => 'debug', -default => 0 ), # FIXME hidden?
+		qq|<div id=inputs>|,
+		h2( 'Select input' ),
+		checkbox_group(
+			-name => 'only_input',
+			-values => [ map { $_->{name} } @{ $db->{input} } ],
+			-linebreak=> 'true',
+		),
+		qq|</div>|,
+
 ;
 
+dump_yaml( 'inputs', $db->{input} );
+dump_yaml( 'input names', map { $_->{name} } @{ $db->{input} } );
+
 print	end_form;
 
 if ( my $search = param('search') ) {
@@ -152,6 +164,11 @@ if ( my $search = param('search') ) {
 		$cond->add_attr( param('attr') . " $op " . param('search') );
 	}
 
+	foreach my $i ( param('only_input') ) {
+		$cond->add_attr( '@uri STRBW file:///search/' . $database . '/' . $i );
+	}
+
+
 	my $nres = $node->search( $cond, 0 );
 	$pager->total_entries( $nres->hits );