diff options
| author | aarne <unknown> | 2003-11-03 16:27:55 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2003-11-03 16:27:55 +0000 |
| commit | 94326929b144913642121bef8f8ecc98feb992e7 (patch) | |
| tree | 07d59cc33cbef2ac79c6f3f573b9718c51322e7a /src/GF/API.hs | |
| parent | 2728e6e7ceec92c7f781368b4a523b37e5dee3b9 (diff) | |
Fixed several things, e.g. tokenizer.
Diffstat (limited to 'src/GF/API.hs')
| -rw-r--r-- | src/GF/API.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/GF/API.hs b/src/GF/API.hs index db2e4a066..927c9683c 100644 --- a/src/GF/API.hs +++ b/src/GF/API.hs @@ -177,9 +177,10 @@ optLinearizeTree opts gr t = case getOptVal opts transferFun of lin mk | oElem showRecord opts = liftM prt . linearizeNoMark g c - | otherwise = return . linTree2string mk g c + | otherwise = return . untok . linTree2string mk g c g = grammar gr c = cncId gr + untok = customOrDefault opts useUntokenizer customUntokenizer gr {- ---- untoksl . lin where |