Perl filters now can optionally reach data via a virtual filehandle.

[idzebra-moved-to-github.git] / perl / demo / zebra.cfg

diff --git a/perl/demo/zebra.cfg b/perl/demo/zebra.cfg
index 92d856f..53e3d08 100644 (file)
--- a/perl/demo/zebra.cfg
+++ b/perl/demo/zebra.cfg
@@ -14,7 +14,7 @@ memMax: 1
 
 
 demo1.recordType.pm: grs.perl.pod
-demo1.recordId: (bib1,Title)
+demo1.recordId: $database (bib1,Title)
 demo1.database: demo1
 
 demo2.recordType.pm: grs.perl.pod