diff --git a/packages/fcl-passrc/src/pparser.pp b/packages/fcl-passrc/src/pparser.pp
index 3b987ca3f4..d269db6c7c 100644
--- a/packages/fcl-passrc/src/pparser.pp
+++ b/packages/fcl-passrc/src/pparser.pp
@@ -1584,7 +1584,7 @@ procedure TPasParser.ParseProperty(Element:TPasElement);
     end else 
       UngetToken;
     //MaybeReadFullyQualifiedIdentifier(Result);  
-    writeln(Result);
+    //writeln(Result);
   end;
 
 begin