From ffd6c23155026b758eaf40abe7e43331b958f979 Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Thu, 24 Jun 2004 19:08:30 +0000
Subject: some fixes

---
 src/GF/API.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/GF/API.hs')

diff --git a/src/GF/API.hs b/src/GF/API.hs
index 0a1f2ee1a..2d23da0f6 100644
--- a/src/GF/API.hs
+++ b/src/GF/API.hs
@@ -189,7 +189,7 @@ optLinearizeTree opts0 gr t = case getOptVal opts transferFun of
   Just m -> useByTransfer flin g (I.identC m) t
   _ -> flin t
  where
-  opts = addOptions (stateOptions gr) opts0
+  opts = addOptions opts0 (stateOptions gr)
   flin = case getOptVal opts markLin of
     Just mk
      | mk == markOptXML    -> lin markXML
-- 
cgit v1.2.3