X-Git-Url: https://git.distorted.org.uk/~mdw/clg/blobdiff_plain/ae9c3069aeba7f2aaa942a2556a27bf34c0e8eaa..d59045234b5dffd33c0010c9f63c7d2d0d9f09d8:/gtk/gtktypes.lisp diff --git a/gtk/gtktypes.lisp b/gtk/gtktypes.lisp index bd65bc4..90343a5 100644 --- a/gtk/gtktypes.lisp +++ b/gtk/gtktypes.lisp @@ -15,7 +15,7 @@ ;; License along with this library; if not, write to the Free Software ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -;; $Id: gtktypes.lisp,v 1.5 2001/01/28 14:21:04 espen Exp $ +;; $Id: gtktypes.lisp,v 1.6 2001/01/28 14:27:17 espen Exp $ @@ -710,20 +710,6 @@ (:metaclass child-class)) -;; deprecated -(defclass tree-item (item) - () -; :slots -; ;; slots not accessible through the arg mechanism -; ((subtree :write-method :lisp :type tree-item))) - (:metaclass container-class) - (:alien-name "GtkTreeItem")) - -(defclass tree-item-child (item-child) - () - (:metaclass child-class)) - - (defclass window (bin) ((type :allocation :param @@ -1642,19 +1628,6 @@ (:metaclass child-class)) -;; Deprecated -(defclass tree (container) - () -; :slots -; ;; slots not accessible through the arg mechanism -; ((selection-mode :type selection-mode) -; (view-mode :type tree-view-mode) -; (view-lines :type boolean) -; (root-tree :read-only t :type tree))) - (:metaclass container-class) - (:alien-name "GtkTree")) - - (defclass calendar (widget) () (:metaclass widget-class)