From 66f1ff9b05f9191fe37f8ac87f297928bc08785f Mon Sep 17 00:00:00 2001
From: Krasimir Angelov <kr.angelov@gmail.com>
Date: Sat, 23 Jun 2018 22:45:51 +0200
Subject: [PATCH] fix for with_Pron

---
 src/bulgarian/NounBul.gf | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/src/bulgarian/NounBul.gf b/src/bulgarian/NounBul.gf
index 9534e5c91..d601ff5b4 100644
--- a/src/bulgarian/NounBul.gf
+++ b/src/bulgarian/NounBul.gf
@@ -38,8 +38,9 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
     DetNP det =
       { s = \\role => let s = det.s ! False ! ANeut ! role
                       in case role of {
-                           RObj Dat => "на" ++ s;
-                           _        => s
+                           RObj Dat      => "на" ++ s;
+                           RObj WithPrep => with_Word ++ s;
+                           _             => s
                          } ;
         a = {gn = gennum ANeut (numnnum det.nn); p = P3} ;
         p = Pos
@@ -47,7 +48,7 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
     
     UsePN pn = { s = table {
                        RObj Dat      => "на" ++ pn.s; 
-                       RObj WithPron => with_Word ++ pn.s; 
+                       RObj WithPrep => with_Word ++ pn.s; 
                        _             => pn.s
                      } ;
                  a = {gn = GSg pn.g; p = P3} ;