From af4bf660024928da20b3a1e004d347d6bc0647c4 Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Tue, 18 Nov 2003 15:30:08 +0000
Subject: Using trie more.

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

(limited to 'src/GF/Compile/ShellState.hs')

diff --git a/src/GF/Compile/ShellState.hs b/src/GF/Compile/ShellState.hs
index 17ea2cc9a..138630c3a 100644
--- a/src/GF/Compile/ShellState.hs
+++ b/src/GF/Compile/ShellState.hs
@@ -88,7 +88,7 @@ stateGrammarST = grammar
 stateCF        = cf
 stateMorpho    = morpho
 stateOptions   = loptions
-stateGrammarWords = map fst . tree2list . stateMorpho
+stateGrammarWords = allMorphoWords . stateMorpho
 
 cncModuleIdST = stateGrammarST
 
-- 
cgit v1.2.3