Update of /project/eclipse/cvsroot/eclipse/lib In directory common-lisp.net:/tmp/cvs-serv30586/lib

Modified Files: netwm-manager.lisp Log Message: a first try to implement net-wm-icon.

Date: Wed Nov 26 10:13:53 2003 Author: ihatchondo

Index: eclipse/lib/netwm-manager.lisp diff -u eclipse/lib/netwm-manager.lisp:1.9 eclipse/lib/netwm-manager.lisp:1.10 --- eclipse/lib/netwm-manager.lisp:1.9 Thu Nov 20 19:04:08 2003 +++ eclipse/lib/netwm-manager.lisp Wed Nov 26 10:13:46 2003 @@ -1,5 +1,5 @@ ;;; -*- Mode: Lisp; Package: EXTENDED-WINDOW-MANAGER-HINTS -*- -;;; $Id: netwm-manager.lisp,v 1.9 2003/11/21 00:04:08 ihatchondo Exp $ +;;; $Id: netwm-manager.lisp,v 1.10 2003/11/26 15:13:46 ihatchondo Exp $ ;;; ;;; This is the CLX support for the managing with gnome. ;;; @@ -415,10 +415,12 @@

;; _NET_WM_ICON

-;; FIXME: (defun net-wm-icon (window) - (declare (ignore window)) - (values)) + "Returnsa vector of possible icons for the client. This is an vector of + (unsigned-byte 32) ARGB with high byte being A, low byte being B. The + first two cardinals are width, height. Data is in rows, left to right + and top to bottom." + (get-property window :_NET_WM_ICON :result-type 'vector))

;; _NET_WM_HANDLED_ICONS