X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=vuFind.pm;h=82c96f5f25ce80b1213015d0fa6bdd321abe0078;hb=18a4315db8c49fd64ca248a402e471915de12e24;hp=ffdd987003b1320efefb5e14940c5efc55eb62c3;hpb=3cb274d8ed7a89201ff08fcf941b4958670cb4b9;p=Biblio-Z3950.git

diff --git a/vuFind.pm b/vuFind.pm
index ffdd987..82c96f5 100644
--- a/vuFind.pm
+++ b/vuFind.pm
@@ -39,6 +39,15 @@ sub usemap {{
 #	12		=> '',
 #	1007	=> '',
 	1016	=> 'all',
+
+	RPN => {
+		And => '&bool[]=AND&',
+		Or  => '&bool[]=OR&',
+	},
+	prefix_term => sub {
+		my ( $prefix, $term ) = @_;
+		return 'type[]=' . $prefix . '&lookfor[]=' . $term;
+	}
 }};
 
 sub search {
@@ -47,7 +56,7 @@ sub search {
 	die "need query" unless defined $query;
 
 	# http://catalog.hathitrust.org/Search/Home?lookfor=croatia%20AND%20zagreb&type=title
-	my $url = 'http://catalog.hathitrust.org/Search/Home?lookfor=' . $query;
+	my $url = 'http://catalog.hathitrust.org/Search/Home?' . $query;
 
 diag "get $url";