From ab053896125eb88ef7d6b433812682e65e283206 Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Wed, 13 Apr 2016 15:57:23 +0000
Subject: [PATCH] * Remove debug statement

git-svn-id: trunk@33497 -
---
 packages/fcl-pdf/src/fppdf.pp | 1 -
 1 file changed, 1 deletion(-)

diff --git a/packages/fcl-pdf/src/fppdf.pp b/packages/fcl-pdf/src/fppdf.pp
index fd1706b017..45cd6d48cf 100644
--- a/packages/fcl-pdf/src/fppdf.pp
+++ b/packages/fcl-pdf/src/fppdf.pp
@@ -2228,7 +2228,6 @@ begin
     IP.Image:=I;
     if Not KeepImage then
       begin
-      Writeln('Compressing : ',poCompressImages in Owner.Options);
       IP.CreateStreamedData(poCompressImages in Owner.Options);
       IP.FImage:=Nil; // not through property, that would clear the image
       i.Free;