summaryrefslogtreecommitdiff
path: root/src/GF/Shell/TeachYourself.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/Shell/TeachYourself.hs')
-rw-r--r--src/GF/Shell/TeachYourself.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Shell/TeachYourself.hs b/src/GF/Shell/TeachYourself.hs
index 5c2170f55..7e5a8afe2 100644
--- a/src/GF/Shell/TeachYourself.hs
+++ b/src/GF/Shell/TeachYourself.hs
@@ -58,7 +58,7 @@ morphoTrainList opts ig number = do
mkOnes gen ts
where
mkOnes gen (t:ts) = do
- psss <- ioeErr $ allLinTables gr cnc t
+ psss <- ioeErr $ allLinTables True gr cnc t
let pss = concat $ map snd $ concat psss
let (i,gen') = randomR (0, length pss - 1) gen
(ps,ss) <- ioeErr $ pss !? i