~mdw
/
clg
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Added function to get the GDK window associated to a Cairo xlib surface
[clg]
/
gdk
/
gdk.lisp
diff --git
a/gdk/gdk.lisp
b/gdk/gdk.lisp
index
f802e65
..
5e18e2e
100644
(file)
--- a/
gdk/gdk.lisp
+++ b/
gdk/gdk.lisp
@@
-20,7
+20,7
@@
;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-;; $Id: gdk.lisp,v 1.3
4 2007-04-06 14:19:08
espen Exp $
+;; $Id: gdk.lisp,v 1.3
5 2007-04-06 14:25:20
espen Exp $
(in-package "GDK")
(in-package "GDK")
@@
-1048,6
+1048,10
@@
;; (defbinding cairo-region () nil
;; (cr cairo:context)
;; (region region))
;; (defbinding cairo-region () nil
;; (cr cairo:context)
;; (region region))
+
+ (defbinding (cairo-xlib-surface-get-window
+ "clg_gdk_cairo_xlib_surface_get_window") () window
+ (surface cairo:xlib-surface))
)
)