projects
/
Biblio-Z3950.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
single field search mapping to fill text indexes
[Biblio-Z3950.git]
/
vuFind.pm
diff --git
a/vuFind.pm
b/vuFind.pm
index
ffdd987
..
82c96f5
100644
(file)
--- a/
vuFind.pm
+++ b/
vuFind.pm
@@
-39,6
+39,15
@@
sub usemap {{
# 12 => '',
# 1007 => '',
1016 => 'all',
# 12 => '',
# 1007 => '',
1016 => 'all',
+
+ RPN => {
+ And => '&bool[]=AND&',
+ Or => '&bool[]=OR&',
+ },
+ prefix_term => sub {
+ my ( $prefix, $term ) = @_;
+ return 'type[]=' . $prefix . '&lookfor[]=' . $term;
+ }
}};
sub search {
}};
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
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";
diag "get $url";