From fdfd77a7d5164d7b38c5e8c8518fce3b59d818ea Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Mon, 21 Jun 2004 15:14:37 +0000
Subject: [PATCH] some new Swedish paradigms

---
 grammars/database/RestaurantSwe.gf | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/grammars/database/RestaurantSwe.gf b/grammars/database/RestaurantSwe.gf
index e41c9699a..bb7f9d891 100644
--- a/grammars/database/RestaurantSwe.gf
+++ b/grammars/database/RestaurantSwe.gf
@@ -12,7 +12,9 @@ lin
   Japanese = AdjP1 (adjReg "japansk") ;
 
   address = funAv (nRisk "adress") ;
-  phone = funTill (nPapper "nummer") ;
+  phone = 
+    funTill (mkN "telefonnummer" "telefonnumret" "telefonnummer"
+                 "telefonnumren" neutrum nonmasculine) ;
   priceLevel = funPaa (nRisk "prisnivå") ;
 
   Cheap = aReg "billig" ;
@@ -25,6 +27,6 @@ lin
 
   LucasCarton = pnReg ["Lucas-Carton"] neutrum nonmasculine ; --- -
   LaCoupole  = pnReg ["La-Coupole"] neutrum nonmasculine ;
-  BurgerKing = pnReg ["Burger-King"] neutrum nonmasculine ;
+  BurgerKing = pnS ["Burger King"] neutrum nonmasculine ;
 
 }