From 30abcf023c66178a4649e15b90518014b107aea5 Mon Sep 17 00:00:00 2001 From: bringert Date: Fri, 31 Mar 2006 15:31:33 +0000 Subject: [PATCH] Added colon to the list of punctuation chars in GSL generation. --- src/GF/Speech/PrGSL.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/GF/Speech/PrGSL.hs b/src/GF/Speech/PrGSL.hs index b204ae6c3..2c06d13d1 100644 --- a/src/GF/Speech/PrGSL.hs +++ b/src/GF/Speech/PrGSL.hs @@ -69,7 +69,7 @@ showToken :: Token -> String showToken t = map toLower (prt t) isPunct :: Char -> Bool -isPunct c = c `elem` "-_.;.,?!()[]{}" +isPunct c = c `elem` "-_.:;.,?!()[]{}" comments :: [String] -> ShowS comments = unlinesS . map (showString . ("; " ++))