From ca1776ffa001d0b0142d74bedc2d65e335c0e63e Mon Sep 17 00:00:00 2001 From: mattias Date: Wed, 18 Dec 2002 17:59:12 +0000 Subject: [PATCH] minor cleanup git-svn-id: trunk@3714 - --- lcl/include/pixmap.inc | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lcl/include/pixmap.inc b/lcl/include/pixmap.inc index be42ce676d..f97c3e0166 100644 --- a/lcl/include/pixmap.inc +++ b/lcl/include/pixmap.inc @@ -224,8 +224,7 @@ begin XPM:=ReadXPMFromStream(Stream,Size); try if not ReadXPMSize(XPM,NewWidth,NewHeight,NewColorCount) then - RaiseGDBException('AAA1'); - //raise Exception.Create('TPixmap.ReadStream: ERROR: reading xpm'); + RaiseGDBException('TPixmap.ReadStream: ERROR: reading xpm'); // free old pixmap // Create the pixmap @@ -250,6 +249,9 @@ end; { ============================================================================= $Log$ + Revision 1.17 2002/12/18 17:59:12 mattias + minor cleanup + Revision 1.16 2002/12/18 17:52:18 mattias fixed lazarus xml files for fpc 1.1