Why isn't HANDLE (for canvas items) exported from :ltk?

"Hand to forehead" when I figured out why the following didn't work.

(defpackage :p (:use :cl :ltk)) (in-package :p) (defun test () (let* (... (c (... 'canvas ...)) (o (make-instance 'canvas-oval :canvas c :x0 ...))) (itemconfigure c (slot-value o 'handle) ...)))

Alternatively, would it make sense to have (defmethod itemconfigure ((canvas canvas) (canvas-item item) ...)) do the right thing? Possible patch attached.

Thanks, Daniel