fixed a bug in draw-line
This commit is contained in:
parent
89e23d9df0
commit
e7108c64ca
|
@ -27,7 +27,7 @@
|
||||||
|
|
||||||
;; *** draw lines, polygons ******************************************
|
;; *** draw lines, polygons ******************************************
|
||||||
|
|
||||||
(import-lambda-definition draw-line (display drawable gc x1 y2 x2 y2)
|
(import-lambda-definition draw-line (display drawable gc x1 y1 x2 y2)
|
||||||
"scx_Draw_Line")
|
"scx_Draw_Line")
|
||||||
|
|
||||||
;; points has to be a list of (x . y) pairs
|
;; points has to be a list of (x . y) pairs
|
||||||
|
|
Loading…
Reference in New Issue