diff options
| author | aarne <unknown> | 2004-01-26 08:39:52 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2004-01-26 08:39:52 +0000 |
| commit | f807f76211d0901a7a462ab1ee0a6b60ca1ce207 (patch) | |
| tree | efccf688ffc1498fbaeae5b6f5f596b5da330244 /src/GF/Text/Hebrew.hs | |
| parent | 7362e70af9bae99dc0af5e1460f5d5c00db86145 (diff) | |
Improved unicode output.
Diffstat (limited to 'src/GF/Text/Hebrew.hs')
| -rw-r--r-- | src/GF/Text/Hebrew.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/GF/Text/Hebrew.hs b/src/GF/Text/Hebrew.hs index abd2855b8..b5a827518 100644 --- a/src/GF/Text/Hebrew.hs +++ b/src/GF/Text/Hebrew.hs @@ -1,13 +1,15 @@ module Hebrew where mkHebrew :: String -> String -mkHebrew = mkHebrewWord +mkHebrew = reverse . mkHebrewWord --- reverse : assumes everything's on same line type HebrewChar = Char -- HH 031103 added code for spooling the markup --- removed reverse, words, unwords (seemed obsolete and come out wrong on the screen) +-- removed reverse, words, unwords +-- (seemed obsolete and come out wrong on the screen) +-- AR 26/1/2004 put reverse back - needed in Fudgets (but not in Java?) mkHebrewWord :: String -> [HebrewChar] -- mkHebrewWord = map mkHebrewChar |