[Po4a-commits] "po4a/lib/Locale/Po4a Man.pm,1.187,1.188"

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory haydn:/tmp/cvs-serv13626/lib/Locale/Po4a

Modified Files:
	Man.pm 
Log Message:
Add \N'xxx' to the exception for the '' to \*(rq transliteration. Thanks
to KISE Hiroshi for pointing this.


Index: Man.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Man.pm,v
retrieving revision 1.187
retrieving revision 1.188
diff -u -d -r1.187 -r1.188
--- Man.pm	5 Sep 2006 20:26:18 -0000	1.187
+++ Man.pm	17 Sep 2006 20:36:03 -0000	1.188
@@ -1006,10 +1006,13 @@
             # detect in my manpages.
             # \*(.'  \*(.`
             # \*'    \*`
+            # \N'xxx'
             if ($tmp =~ m/(?<!\\)(?:\\\\)*\\\*\($/s) {
                 $tmp .= $q;
             } elsif (   $tmp =~ m/(?<!\\)(?:\\\\)*\\\*\(.$/s
-                     or $tmp =~ m/(?<!\\)(?:\\\\)*\\\*$/s) {
+                     or $tmp =~ m/(?<!\\)(?:\\\\)*\\\*$/s
+                     or ($tmp =~ m/(?<!\\)(?:\\\\)*\\N'[0-9]*$/s
+                         and $q eq "''")) {
                 $q =~ m/(.)(.)/;
                 $tmp .= $1;
                 $str = $2.$str;