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
       } ;