From 5b753d8c1aa2ce271fb15b7c9aa1af83f8de0d3a Mon Sep 17 00:00:00 2001
From: Andrea Rossato <andrea.rossato@ing.unitn.it>
Date: Sun, 16 Mar 2008 13:11:00 +0100
Subject: add XFT support and make UTF-8 support configurable

This patch includes many changes:
- moved font and printing functions to XUtil.hs and created an
  abstraction layer to font management;
- ported the core, StdinReader and PipeReader to the new font
  management system.

To enable UTF-8 support configure with the "with_utf8" flag (requires
utf8-string):
runhaskell Setup.lhs configure --flags

darcs-hash:20080316121100-d6583-828134da356b706744b56a9d81203129b0e8e484.gz
---
 HsLocale.hsc | 27 ---------------------------
 1 file changed, 27 deletions(-)
 delete mode 100644 HsLocale.hsc

(limited to 'HsLocale.hsc')

diff --git a/HsLocale.hsc b/HsLocale.hsc
deleted file mode 100644
index a54ff34..0000000
--- a/HsLocale.hsc
+++ /dev/null
@@ -1,27 +0,0 @@
-{-# OPTIONS -fglasgow-exts #-}
------------------------------------------------------------------------------
--- |
--- Module      :  HsLocale
--- Copyright   :  (C) 2007 Andrea Rossato
--- License     :  BSD3
---
--- Maintainer  :  andrea.rossato@unibz.it
--- Stability   :  unstable
--- Portability :  unportable
---
------------------------------------------------------------------------------
-
-module HsLocale
-    ( setupLocale
-    ) where
-
-import Foreign.C
-
-#include <locale.h>
-foreign import ccall unsafe "locale.h setlocale"
-    setlocale :: CInt -> CString -> IO CString
-
-setupLocale :: IO ()
-setupLocale = withCString "" $ \s -> do
-                setlocale (#const LC_ALL) s
-                return ()
-- 
cgit v1.2.3