local
authorDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 25 Aug 2006 19:22:33 +0000 (19:22 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 25 Aug 2006 19:22:33 +0000 (19:22 +0000)
git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@622 07558da8-63fa-0310-ba24-9fe276d99e06

conf/mjesec.yml
conf/normalize/mapping.pl

index d56437f..5a42f00 100644 (file)
@@ -445,9 +445,11 @@ databases:
           '*':
             '^g': ' ; '
             '^c': '. '
+            '^k': ' ; '
         210:
-          '*':
+          '^a':
             '^c': '^b'
+          '^b':
             '^d': '^c'
         700:
           '^a':
@@ -535,6 +537,29 @@ databases:
         # limit number of records to read from database
         #limit: 10
 
+        modify_records:
+          200:
+            '^d':
+              '^e': ' : '
+            '^e':
+              '^d': ' = '
+            '*':
+              '^g': ' ; '
+              '^c': '. '
+          210:
+            '^a':
+              '^c': '^b'
+            '^b':
+              '^d': '^c'
+          700:
+            '^a':
+              '^b': ', '
+          701:
+            '^a':
+              '^b': ', '
+          702:
+            '^a':
+              '^b': ', '
         # define normalisation for that source
         normalize:
           # which tag to use in normalize xml for data?
index ddb4b4e..d364deb 100644 (file)
@@ -25,7 +25,7 @@ if ( rec('230') ) {
 
 # polje 035 je u NSK ponovljivo. za¹to ???
 
-# privemeno koristimo 0356 umjesto 0359
+# privemeno koristimo 0356 umjesto 0359, zato ¹to marclint 9 prijavljuje kao gre¹ku
 
 marc('035','6',
 join_with('',
@@ -45,7 +45,7 @@ join_with('',
 # u FFSF bazama postoji nekoliko zaredanih ISBN, odvojenih s '. - '
 
 marc('020','a',
-       rec('010')
+       rec('10')
 );
 
 # u polje 040a mo¾da jo¹ dodati prefiks HR
@@ -85,9 +85,15 @@ marc_compose('245',
        ),
        'h', rec('200','b'),
        'b', rec('200','k'),
-       'b', rec('200','d'),
-       'b', rec('200','e'),
-       'c', rec('200','f'),
+       'b', rec('200','d'), 
+       'b', 
+               join_with(' : ',
+                       rec('200','e'),
+               ),
+       'c', 
+               join_with(' ; ',
+                       rec('200','f'),
+               ),
 # FIXME append to last subfield
        '+', prefix('. ', rec('200','c') ),
 );
@@ -368,64 +374,65 @@ marc('740','a',
 
 
 # vi¹erazinci 
+# 
+# if ( rec('230') ) {
+# 
+#      marc_duplicate();
+#      marc_remove('245');
+# 
+#      marc('245','a',
+#              rec('230','a')
+#      );
+# 
+#      if ( ! rec('230','a') ) {
+# 
+#              marc('245','a',
+#                      rec('200','a')
+#              );
+#      }
+# 
+#      marc('245','b',
+#              rec('230','e')
+#      );
+# 
+#      marc('245','c',
+#              rec('230','f')
+#      );
+# 
+#      marc('245','n',
+#              rec('230','v')
+#      );
+# 
+# }
+# 
+# if ( rec('231') ) {
+# 
+#      marc_duplicate();
+#      marc_remove('245');
+# 
+#      marc('245','a',
+#              rec('231','a')
+#      );
+# 
+#      if ( ! rec('231','a') ) {
+# 
+#              marc('245','a',
+#                      rec('200','a')
+#              );
+#      }
+# 
+#      marc('245','b',
+#              rec('231','e')
+#      );
+# 
+#      marc('245','c',
+#              rec('231','f')
+#      );
+# 
+#      marc('245','n',
+#              rec('231','v')
+#      );
+# 
+# }
 
-if ( rec('230') ) {
-
-       marc_duplicate();
-       marc_remove('245');
-
-       marc('245','a',
-               rec('230','a')
-       );
-
-       if ( ! rec('230','a') ) {
-
-               marc('245','a',
-                       rec('200','a')
-               );
-       }
-
-       marc('245','b',
-               rec('230','e')
-       );
-
-       marc('245','c',
-               rec('230','f')
-       );
-
-       marc('245','n',
-               rec('230','v')
-       );
-
-}
-
-if ( rec('231') ) {
-
-       marc_duplicate();
-       marc_remove('245');
-
-       marc('245','a',
-               rec('231','a')
-       );
-
-       if ( ! rec('231','a') ) {
-
-               marc('245','a',
-                       rec('200','a')
-               );
-       }
-
-       marc('245','b',
-               rec('231','e')
-       );
-
-       marc('245','c',
-               rec('231','f')
-       );
-
-       marc('245','n',
-               rec('231','v')
-       );
-
-}
 }