X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/blobdiff_plain/d9c9bb7cc16432444ec05dea27aed0ee0a2efa3a..cc8d918eec6976ce68916fd15a4837f5b8e34dba:/examples/testgtk.lisp diff --git a/examples/testgtk.lisp b/examples/testgtk.lisp index 5f2ad9b..8b3b175 100644 --- a/examples/testgtk.lisp +++ b/examples/testgtk.lisp @@ -26,7 +26,7 @@ ;; Kimball, Josh MacDonald and others. -;; $Id: testgtk.lisp,v 1.41 2007/07/12 09:18:30 espen Exp $ +;; $Id: testgtk.lisp,v 1.42 2008/01/02 16:07:14 espen Exp $ #+sbcl(require :gtk) #+(or cmu clisp)(asdf:oos 'asdf:load-op :gtk) @@ -1795,7 +1795,7 @@ (define-toplevel create-handle-box (window "Handle Box Test" :border-width 20) :child (create-label "Below"))) -;;; Tooltips test +;;; Tooltips test. Note that GtkTooltips has been deprecated in GTK+ 2.12 (define-simple-dialog create-tooltips (dialog "Tooltips" :default-width 200) (let ((tooltips (make-instance 'tooltips)))