r1415@llin: dpavlin | 2007-10-31 13:14:40 +0100

 test normalize rules which I'm using for Webpacus

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

diff --git a/conf/normalize/webpacus.pl b/conf/normalize/webpacus.pl
new file mode 100644 (file)
index 0000000..05e4fcf
--- /dev/null
+++ b/conf/normalize/webpacus.pl
@@ -0,0 +1,64 @@
+
+search_display('ISBN',
+       rec('020','a')
+);
+
+search_display('ISBN_incorrect',
+       rec('010','z')
+);
+
+search_display('ISSN',
+       rec('022','a')
+);
+
+
+search_display('Language',
+       rec('040','a')
+);
+
+search_display('TitleProper',
+       rec('245','a')
+);
+
+sorted('TitleProper',
+       rec('245','a'),
+);
+
+search_display('ReminderTitle',
+       join_with(' : ',
+               prefix(' = ',
+                       rec('245','d')
+               ),
+               rec('245','e')
+       )
+);
+
+search_display('StatementResponsibility',
+       rec('245','f'),
+);
+
+
+search('PlacePublication',
+       rec('260','a')
+);
+
+search('NamePublisher',
+       rec('260','b'),
+);
+
+search_display('DatePublication',
+       rec('260','c')
+);
+
+display('Impresum',
+       rec('260'),
+);
+
+search_display('Dimensions',
+       rec('300','c')
+);
+
+search_display('GeneralNote',
+       rec('500')
+);
+