From c51846361f18d372542f69e4bb281ef834750312 Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Tue, 30 May 2006 22:02:25 +0000
Subject: l -multi -all/-table ; same with tb

---
 src/GF/Shell.hs | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

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

diff --git a/src/GF/Shell.hs b/src/GF/Shell.hs
index 4b9660ced..3dcec9fbd 100644
--- a/src/GF/Shell.hs
+++ b/src/GF/Shell.hs
@@ -231,8 +231,11 @@ execC co@(comm, opts0) sa@(sh@(st,(h,_,_,_)),a) = checkOptions st co >> case com
 
   CLinearize [] 
     | oElem showMulti opts -> 
-       changeArg (opTS2CommandArg (unlines. linearizeToAll
-          (allStateGrammars st)) . s2t) sa 
+
+       changeArg (opTS2CommandArg (
+         unlines . 
+         (\t -> [optLinearizeTreeVal opts gr t | gr <- allStateGrammars st])) . s2t) sa
+
     | otherwise -> changeArg (opTS2CommandArg (optLinearizeTreeVal opts gro) . s2t) sa
 ----  CLinearize m -> changeArg (opTS2CommandArg (optLinearizeArgForm opts gro m)) sa
 
-- 
cgit v1.2.3