From cf444f636c04c21f7638d8a18a55b41905d5b994 Mon Sep 17 00:00:00 2001 From: espen Date: Mon, 22 Oct 2007 09:21:50 +0000 Subject: [PATCH] Added missing read-time conditional testing for Gtk+ version --- gtk/gtktext.lisp | 3 ++- gtk/gtktree.lisp | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/gtk/gtktext.lisp b/gtk/gtktext.lisp index c56ba91..c61bfbc 100644 --- a/gtk/gtktext.lisp +++ b/gtk/gtktext.lisp @@ -20,7 +20,7 @@ ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -;; $Id: gtktext.lisp,v 1.9 2007/10/17 14:52:19 espen Exp $ +;; $Id: gtktext.lisp,v 1.10 2007/10/22 09:21:50 espen Exp $ (in-package "GTK") @@ -343,6 +343,7 @@ ;;; Text Iter +#?(pkg-exists-p "gtk+-2.0" :atleast-version "2.10.0") (defmethod allocate-foreign ((text-iter text-iter) &rest initargs) (declare (ignore initargs)) (let ((size (foreign-size (class-of text-iter)))) diff --git a/gtk/gtktree.lisp b/gtk/gtktree.lisp index efbfbcf..1e238b6 100644 --- a/gtk/gtktree.lisp +++ b/gtk/gtktree.lisp @@ -20,7 +20,7 @@ ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -;; $Id: gtktree.lisp,v 1.31 2007/10/17 14:47:10 espen Exp $ +;; $Id: gtktree.lisp,v 1.32 2007/10/22 09:21:50 espen Exp $ (in-package "GTK") @@ -385,6 +385,7 @@ (iter tree-iter :in/return) (path tree-path)) +#?(pkg-exists-p "gtk+-2.0" :atleast-version "2.12.0") (defmethod allocate-foreign ((tree-iter tree-iter) &rest initargs) (declare (ignore initargs)) (let ((size (foreign-size (class-of tree-iter)))) -- 2.11.0