X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/blobdiff_plain/e4d1c6e4a7284689b124fbc182aa8791b0d06d0e..c1df82a9ae71659e720d2f62be917d73c92208d9:/examples/testgtk.lisp diff --git a/examples/testgtk.lisp b/examples/testgtk.lisp index 858d894..1f607af 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)))