@@ -, +, @@ --- Koha/SuggestionEngine/Plugin/LibrisSpellcheck.pm | 4 ++-- .../data/mysql/atomicupdate/bug_14557_add_libriskey_syspref.sql | 3 ++- installer/data/mysql/sysprefs.sql | 5 +++-- .../prog/en/modules/admin/preferences/searching.pref | 8 ++++++-- 4 files changed, 13 insertions(+), 7 deletions(-) --- a/Koha/SuggestionEngine/Plugin/LibrisSpellcheck.pm +++ a/Koha/SuggestionEngine/Plugin/LibrisSpellcheck.pm @@ -29,9 +29,9 @@ sub NAME { sub get_suggestions { my ($self, $query) = @_; my $key = C4::Context->preference('LibrisKey'); - + my $base = C4::Context->preference('LibrisURL'); my $search = $query->{'search'}; - my $response = LWP::UserAgent->new->get("http://api.libris.kb.se/bibspell/spell?query={$search}&key=$key"); + my $response = LWP::UserAgent->new->get($base."spell?query={$search}&key=$key"); my $xml = XMLin($response->content, NoAttr => 1, ForceArray => qr/term/); my @terms; --- a/installer/data/mysql/atomicupdate/bug_14557_add_libriskey_syspref.sql +++ a/installer/data/mysql/atomicupdate/bug_14557_add_libriskey_syspref.sql @@ -1, +1,2 @@ -INSERT IGNORE INTO systempreferences (variable,value,explanation,options,type) VALUES ('LibrisKey', '', 'This key must be obtained at http://api.libris.kb.se/. It is unique for the IP of the server.', NULL, 'Free'); +INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES ('LibrisKey', '', 'This key must be obtained at http://api.libris.kb.se/. It is unique for the IP of the server.', NULL, 'Free'); +INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES ('LibrisURL', 'http://api.libris.kb.se/bibspell/', 'This it the base URL for the Libris spellchecking API.',NULL,'Free'); --- a/installer/data/mysql/sysprefs.sql +++ a/installer/data/mysql/sysprefs.sql @@ -647,5 +647,6 @@ INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` ('XSLTListsDisplay','default','','Enable XSLT stylesheet control over lists pages display on intranet','Free'), ('XSLTResultsDisplay','default','','Enable XSL stylesheet control over results page display on intranet','Free'), ('z3950AuthorAuthFields','701,702,700',NULL,'Define the MARC biblio fields for Personal Name Authorities to fill biblio.author','free'), -('z3950NormalizeAuthor','0','','If ON, Personal Name Authorities will replace authors in biblio.author','YesNo') -; +('z3950NormalizeAuthor','0','','If ON, Personal Name Authorities will replace authors in biblio.author','YesNo'), +('LibrisKey', '', 'This key must be obtained at http://api.libris.kb.se/. It is unique for the IP of the server.', NULL, 'Free'), +('LibrisURL', 'http://api.libris.kb.se/bibspell/', 'This it the base URL for the Libris spellchecking API.',NULL,'Free'); --- a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/searching.pref +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/searching.pref @@ -243,8 +243,12 @@ Searching: yes: "search" no: "don't search" - on all variations of the ISBN. Note that this preference has no effect if UseQueryParser is on. - API Keys: + Did you Mean/Spell checking: - - - LIBRIS Spellcheking API key + - LIBRIS Spellchecking API key - pref: LibrisKey - "Can be obtained at http://api.libris.kb.se/bibspell." + - + - LIBRIS base URL + - pref: LibrisURL + - "Please only change this if you are sure it needs changing." --