Changeset 659 for LATMOS-Accounts/lib/LATMOS/Accounts/Utils.pm

Timestamp:

01/18/10 23:42:40 (14 years ago)

Author:

nanardon

Message:

• translate another letter

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Utils.pm (modified) (1 diff)

LATMOS-Accounts/lib/LATMOS/Accounts/Utils.pm

@@ -21 +21 @@
     $text =~ s/œ/oe/g;
     $text =~ s/Ê/ae/g;
-    $text =~ tr/uà âÀÂÄÀçéÚêëÉÈÊËïîÏÎöÎÖÔÌûÛÜ/uaaaAAAceeeeEEEEiiIIooOOuuUU/;
+    $text =~ tr {uà âÀÂÄÀçéÚêëÉÈÊËïîÏÎÞöÎÖÔÌûÛÜ}
+                {uaaaAAAceeeeEEEEiiIIoooOOuuUU};
     $text =~ s/([^[:ascii:]])//;
     $text