(asdf:oos 'asdf:load-op :clg-tools)
(defpackage "GTK-SYSTEM"
- (:use "COMMON-LISP" "ASDF" "PKG-CONFIG")
- (:export "CLG-INIT"))
+ (:use "COMMON-LISP" "ASDF" "PKG-CONFIG"))
(in-package "GTK-SYSTEM")
(pkg-exists-p "gtk+-2.0" :atleast-version "2.4.0")
+(when (string>= (pkg-version "gtk+-2.0") "2.6.0")
+ (pushnew :gtk2.6 *features*))
+
+(when (string>= (pkg-version "gtk+-2.0") "2.8.0")
+ (pushnew :gtk2.8 *features*))
(defsystem gtk
:depends-on (glib gdk pango atk)
(:file "gtktypes" :depends-on ("gtkobject"))
(:file "gtkwidget" :depends-on ("gtktypes"))
(:file "gtkcontainer" :depends-on ("gtktypes"))
+ (:file "gtktree" :depends-on ("gtktypes"))
+ (:file "gtktext" :depends-on ("gtktypes"))
+ (:file "gtkaction" :depends-on ("gtktypes"))
+ (:file "gtkstyle" :depends-on ("gtktypes"))
(:file "gtk" :depends-on ("gtktypes"))
(:file "gtkutils" :depends-on ("gtk"))
- (:file "export" :depends-on ("gtktypes" "gtk")))
- :perform (load-op :after (op gtk) (clg-init)))
+ (:file "export" :depends-on ("gtktypes" "gtkwidget" "gtkcontainer" "gtk" "gtktree" "gtkaction" "gtkutils" "gtkstyle"))))