anchor.diff:  ;; 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.9 2002-03-24 15:40:50 espen Exp $
  +;; $Id: gtk.lisp,v 1.10 2002-03-24 21:54:06 espen Exp $
   
   
   (in-package "GTK")
  
positive.code: (defbinding window-activate-default () int
    (window window))
  
  (defbinding window-set-transient-for () nil
    (window window)
    (parent window))
  
  ;(defbinding window-set-geometry-hints)
  
  
  
  
negative.code: 
  ;;; Window
  
  (defbinding window-set-wmclass () nil
    (window window)
    (wmclass-name string)
    (wmclass-class string))
  
  (defbinding window-add-accel-group () nil
    (window window)
    (accel-group accel-group))
  