From e0bffc27974add79f406a7e34098f710c7719243 Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Thu, 13 Mar 2008 07:15:48 +0000
Subject: [PATCH] Use Acc case in ComparA

---
 lib/resource/bulgarian/AdjectiveBul.gf | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/resource/bulgarian/AdjectiveBul.gf b/lib/resource/bulgarian/AdjectiveBul.gf
index 44e2d5d5f..c16067a86 100644
--- a/lib/resource/bulgarian/AdjectiveBul.gf
+++ b/lib/resource/bulgarian/AdjectiveBul.gf
@@ -6,7 +6,7 @@ concrete AdjectiveBul of Adjective = CatBul ** open ResBul, Prelude in {
       } ;
 
     ComparA a np = {
-      s = \\aform => "по" ++ "-" ++ a.s ! aform ++ "от" ++ np.s ! RSubj ; 
+      s = \\aform => "по" ++ "-" ++ a.s ! aform ++ "от" ++ np.s ! RObj Acc ; 
       isPre = True
       } ;