r367@athlon: dpavlin | 2005-12-27 23:29:18 +0100

 minor tweaks

git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@330 07558da8-63fa-0310-ba24-9fe276d99e06

diff --git a/TODO b/TODO
index eebff70..cff8d25 100644 (file)
--- a/TODO
+++ b/TODO
@@ -6,6 +6,8 @@
 + add regexp filter [2.00_5]
 + add YAML as normalize format
 + add more input formats (MARC::Fast and others) [2.00_6]
+- fix characters generated in [% search %] (move that to Webpacus?)
+- remove delimiters characters from index and query entered
 - delete unused files in database directories
 - scoring for various fields in input/*.xml
 - write pure perl Search::HyperEstraier

diff --git a/lib/WebPAC/Lookup.pm b/lib/WebPAC/Lookup.pm
index 443d49c..24a3c2a 100644 (file)
--- a/lib/WebPAC/Lookup.pm
+++ b/lib/WebPAC/Lookup.pm
@@ -146,9 +146,9 @@ sub add {
 
 Perform lookups on format supplied to it.
 
- my $text = $lookup->lookup('[v900]');
+ my $text = $lookup->lookup('lookup{v900}');
 
-Lookups can be nested (like C<[d:[a:[v900]]]>).
+Lookups can be nested (like lookup{B<d:>lookup{B<a:>lookup{B<v900>}}}).
 
 =cut