stk/Contrib/STk-wtour/lessons/canvas1.stk

7 lines
85 B
Plaintext
Raw Normal View History

1996-09-27 06:29:02 -04:00
;;; Basic canvas widget
(canvas '.c1)
(pack .c1)
(.c1 'create 'line 10 10 200 200)