From: espen Date: Sun, 21 Nov 2004 17:39:27 +0000 (+0000) Subject: Bug fix X-Git-Tag: clg-0-90~192 X-Git-Url: https://git.distorted.org.uk/~mdw/clg/commitdiff_plain/22dc653c543055beb24be7e6296d243e4bef39c4?ds=inline Bug fix --- diff --git a/gtk/gtk.lisp b/gtk/gtk.lisp index 6299f2c..247b597 100644 --- a/gtk/gtk.lisp +++ b/gtk/gtk.lisp @@ -15,7 +15,7 @@ ;; License along with this library; if not, write to the Free Software ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -;; $Id: gtk.lisp,v 1.18 2004/11/19 13:09:00 espen Exp $ +;; $Id: gtk.lisp,v 1.19 2004/11/21 17:39:27 espen Exp $ (in-package "GTK") @@ -457,7 +457,7 @@ ;;; Entry -(defbinding entry-get-layout () (copy-of pango:layout) +(defbinding entry-get-layout () pango:layout (entry entry)) (defbinding entry-get-layout-offsets () nil @@ -524,7 +524,7 @@ (defbinding label-get-text () string (label label)) -(defbinding label-get-layout () (copy-of pango:layout) +(defbinding label-get-layout () pango:layout (label label)) (defbinding label-get-selection-bounds () boolean