diff options
| author | aarne <aarne@cs.chalmers.se> | 2007-03-14 12:11:18 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2007-03-14 12:11:18 +0000 |
| commit | f7ce8940fa0d53718eb30bfc7d0ef9320bafc673 (patch) | |
| tree | a018f006c071e2782baa2e4e86fc28dc57901d49 /src/GF/Shell/TeachYourself.hs | |
| parent | 98fcad148e61d5a284d0fe1b095f90eab368d28f (diff) | |
ma -status; sep lines for l -all
Diffstat (limited to 'src/GF/Shell/TeachYourself.hs')
| -rw-r--r-- | src/GF/Shell/TeachYourself.hs | 2 |
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 |