[Po4a-commits] "po4a/lib/Locale/Po4a Man.pm,1.163,1.164"

[Nicolas FRANCOIS]

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

Modified Files:
	Man.pm 
Log Message:
Do not replace - by \- in the symbols used in \*(XX


Index: Man.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Man.pm,v
retrieving revision 1.163
retrieving revision 1.164
diff -u -d -r1.163 -r1.164
--- Man.pm	16 Jul 2006 10:31:08 -0000	1.163
+++ Man.pm	16 Jul 2006 12:33:24 -0000	1.164
@@ -881,13 +881,15 @@
             if (   ($begin =~ m/(?<!\\)(\\\\)*\\s$/s)
                 or ($begin =~ m/(?<!\\)(\\\\)*\\\((.|E<[gl]t>)$/s)
                 or ($tmp2 =~ m/(?<!\\)(\\\\)*\\[hCv]'([^']|(?<!\\)(\\\\)*\\')*$/)
-                or ($tmp2 =~ m/(?<!\\)(\\\\)*\\\[([^\]]|(?<!\\)(\\\\)*\\\[)*$/)) {
+                or ($tmp2 =~ m/(?<!\\)(\\\\)*\\\[([^\]]|(?<!\\)(\\\\)*\\\[)*$/)
+                or ($tmp2 =~ m/(?<!\\)(\\\\)*\\\*\(.?$/)) {
                 # Do not change - to \- for
                 #  * \s-n (reduce font size)
                 #  * \(.- (a character named '.-', e.g. '<-')
                 #  * inside a \h'...'
                 #  * inside a \C'...'
                 #  * inside a \[...]
+                #  * inside a \*(..
                 #  * inside a \v'...'
                 $tmp = $tmp2."-";
             } else {