diff --git a/lcl/lazcanvas.pas b/lcl/lazcanvas.pas
index 8842e17a7b..e1db6788ae 100644
--- a/lcl/lazcanvas.pas
+++ b/lcl/lazcanvas.pas
@@ -104,7 +104,7 @@ type
     // Routines broken/unimplemented/incompatible in FPC
     procedure DoRectangle (const Bounds:TRect); override;
     procedure DoRectangleFill (const Bounds:TRect); override;
-    {$if FPC_FullVersion < 30301}
+    {$if FPC_FullVersion < 30203}
     procedure DoPolygonFill (const points:array of TPoint); override;
     {$endif}
     // Routines which don't work with out extended clipping in TFPImageCanvas
@@ -339,7 +339,7 @@ begin
   end;
 end;
 
-{$IF FPC_FullVersion < 30301}
+{$IF FPC_FullVersion < 30203}
 // unimplemented in FPC
 // algorithm explained here: http://alienryderflex.com/polygon_fill/
 procedure TLazCanvas.DoPolygonFill(const points: array of TPoint);