eprints-dev: /home/dpavlin/mtoolkit/utf8-fix.pl [commit]
authorDobrica Pavlinusic <dpavlin@rot13.org>
Tue, 19 Oct 2010 16:27:38 +0000 (18:27 +0200)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Tue, 19 Oct 2010 16:27:38 +0000 (18:27 +0200)
mtoolkit/utf8-fix.pl

index 3592209..2cb5a1b 100755 (executable)
@@ -34,8 +34,14 @@ s/\xC3\x83\xC2\x83\xC3\x85\xC2\xB8/ß/gs && $stat->{'ss'}++;
 
 s/$junk\xC3\x82\xC2\x8D/č/gs && $stat->{'cv'}++;
 s/$junk\xC2\x80\xC2\xA1/ć/gs && $stat->{"c"}++;
+# #Buri\xC3\x84\xC2\x87.pdf
+s/\xC3\x84\xC2\x87/ć/gs && $stat->{'c C384C287'}++;
+
 s/$junk\xC3\x82\xC2\xA1/š/gs && $stat->{'s'}++;
+#Ma\xC3\x85\xC2\xA1a
+s/\xC3\x85\xC2\xA1/š/gs && $stat->{'s C385C2'}++;
 s/$junk\xC2\x80\xC4\xA1/š/gs && $stat->{'s C4'}++;
+
 s/$junk\xC3\x82\xC2\xBE/ž/gs && $stat->{'z'}++;
 
 s/$junk\xC2\x80\xC2\x98/đ/gs && $stat->{'d'}++;