From 236372c76efd223ecd379927885c9c7700dea979 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Fri, 22 Jun 2012 09:02:13 +0000
Subject: [PATCH] overload problem in Phrasebook fixed

---
 examples/phrasebook/SentencesI.gf | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/examples/phrasebook/SentencesI.gf b/examples/phrasebook/SentencesI.gf
index 91367cdc0..d2df39ca9 100644
--- a/examples/phrasebook/SentencesI.gf
+++ b/examples/phrasebook/SentencesI.gf
@@ -51,7 +51,7 @@ incomplete concrete SentencesI of Sentences = Numeral **
     PSentence s = mkText s | lin Text (mkUtt s) ;  -- optional '.'
     PQuestion s = mkText s | lin Text (mkUtt s) ;  -- optional '?'
 
-    PGreetingMale, PGreetingFemale = \g -> mkText (lin Phr g) exclMarkPunct | g ;
+    PGreetingMale, PGreetingFemale = \g -> mkText (lin Phr (ss g.s)) exclMarkPunct | g ;
 
     -- PWord w = w ;