From 1ca54cca208876f83014119da55e747d5342b434 Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Wed, 28 Jan 2004 12:42:20 +0000
Subject:  Unicode. Batch transl into HTML.

---
 src/GF/Text/Arabic.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/GF/Text/Arabic.hs')

diff --git a/src/GF/Text/Arabic.hs b/src/GF/Text/Arabic.hs
index 6df79c4a9..6882176eb 100644
--- a/src/GF/Text/Arabic.hs
+++ b/src/GF/Text/Arabic.hs
@@ -1,7 +1,8 @@
 module Arabic where
 
 mkArabic :: String -> String
-mkArabic = reverse . unwords . (map mkArabicWord) . words
+mkArabic = unwords . (map mkArabicWord) . words
+----mkArabic = reverse . unwords . (map mkArabicWord) . words
 --- reverse : assumes everything's on same line
 
 type ArabicChar = Char
-- 
cgit v1.2.3