Index: /Include/Classes/System/Drawing/Point.ab
===================================================================
--- /Include/Classes/System/Drawing/Point.ab	(revision 28)
+++ /Include/Classes/System/Drawing/Point.ab	(revision 29)
@@ -98,5 +98,5 @@
 	End Function
 
-	Sub Offset(pt As Point) As Point
+	Function Offset(pt As Point) As Point
 		Dim ret As Point(x + pt.x, y + pt.y)
 		Return ret
@@ -106,5 +106,5 @@
 		x += dx
 		y += dy
-	End Function
+	End Sub
 
 	Static Function Substract(pt1 As Point, pt2 As Point) As Point
