]>
Commit | Line | Data |
---|---|---|
73c04bcf A |
1 | # *************************************************************************** |
2 | # * | |
2ca993e8 | 3 | # * Copyright (C) 2004-2016, International Business Machines |
73c04bcf A |
4 | # * Corporation; Unicode, Inc.; and others. All Rights Reserved. |
5 | # * | |
6 | # *************************************************************************** | |
7 | # File: Any_Publishing.txt | |
46f4442e | 8 | # Generated from CLDR |
73c04bcf | 9 | # |
2ca993e8 A |
10 | |
11 | # Test case | |
12 | # "The" "(quick)" ('brown') `fox' ` jumped -- "over?" | |
13 | # Variables | |
374ca955 A |
14 | $single = \' ; |
15 | $space = ' ' ; | |
16 | $double = \" ; | |
17 | $back = \` ; | |
46f4442e | 18 | $tab = \u0008 ; |
374ca955 | 19 | $makeRight = [[:Z:][:Ps:][:Pi:]$] ; |
2ca993e8 | 20 | # fix UNIX quotes |
729e4ab9 A |
21 | $back $back → “ ; |
22 | $back → ‘ ; | |
2ca993e8 | 23 | # fix typewriter quotes, by context |
729e4ab9 A |
24 | $makeRight {$double} ↔ “ ; |
25 | $double ↔ ” ; | |
26 | $makeRight {$single} ↔ ‘ ; | |
27 | $single ↔ ’; | |
2ca993e8 | 28 | # fix multiple spaces and hyphens |
729e4ab9 A |
29 | $space {$space} → ; |
30 | '--' ↔ — ; | |
2ca993e8 | 31 |