[cells-gtk-cvs] CVS update: root/gtk-ffi/gtk-ffi.lisp

[Peter Denno]

Update of /project/cells-gtk/cvsroot/root/gtk-ffi
In directory common-lisp.net:/tmp/cvs-serv19048/gtk-ffi

Modified Files:
	gtk-ffi.lisp 
Log Message:
Was missing the identification of the libgtk filename in win32
Date: Thu May  5 16:20:51 2005
Author: pdenno

Index: root/gtk-ffi/gtk-ffi.lisp
diff -u root/gtk-ffi/gtk-ffi.lisp:1.10 root/gtk-ffi/gtk-ffi.lisp:1.11
--- root/gtk-ffi/gtk-ffi.lisp:1.10	Sat Feb 26 23:37:40 2005
+++ root/gtk-ffi/gtk-ffi.lisp	Thu May  5 16:20:51 2005
@@ -60,6 +60,7 @@
         (:glib "libglib-2.0-0.dll")
         (:gthread "libgthread-2.0-0.dll")
         (:gdk "libgdk-win32-2.0-0.dll")
+        (:gtk "libgtk-win32-2.0-0.dll")
         (:cgtk "libcellsgtk")))
     #+macosx
     (concatenate 'string
@@ -368,6 +369,7 @@
      (setf (get-slot-value ,iter-var 'gtk-tree-iter 'user-data2) c-null)
      (setf (get-slot-value ,iter-var 'gtk-tree-iter 'user-data3) c-null)
      , at body))
+
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (defun as-gtk-type-name (type)