(in-package :cl-user) (defpackage :command-and-command-table-utilities (:USE :CLIM :CLIM-EXTENSIONS :CLIM-LISP) (:export :command-of-command-table :command-or-commands-of-command-table :expand-command-tables)) (defpackage :creating-assoc (:use :cl) (:export :creating-assoc)) (defpackage :conditional-commands (:USE :CLIM :CLIM-EXTENSIONS :CLIM-LISP :command-and-command-table-utilities :creating-assoc) (:export :define-conditional-application-frame :define-conditional-command :add-entity-enabledness-change :remove-entity-enabledness-change :change-entity-enabledness))