From: espen <espen>
Date: Fri, 7 Sep 2007 07:36:26 +0000 (+0000)
Subject: Added CAIRO-REGION
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/commitdiff_plain/1c66c45f970603a0e638e641ea282b3e53f7c5c9?hp=e1531bff3f558c21de73f423d9b19c66a0f33c7c

Added CAIRO-REGION
---

diff --git a/gdk/gdk.lisp b/gdk/gdk.lisp
index fa5932e..6bcb6af 100644
--- 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.
 
-;; $Id: gdk.lisp,v 1.43 2007-06-25 21:28:54 espen Exp $
+;; $Id: gdk.lisp,v 1.44 2007-09-07 07:36:26 espen Exp $
 
 
 (in-package "GDK")
@@ -1100,9 +1100,9 @@   (defbinding cairo-rectangle () nil
     (cr cairo:context)
     (rectangle rectangle))
  
-;;   (defbinding cairo-region () nil
-;;     (cr cairo:context)
-;;     (region region))
+  (defbinding cairo-region () nil
+    (cr cairo:context)
+    (region region))
 
   (defbinding (cairo-surface-get-window "clg_gdk_cairo_surface_get_window") () window
     (surface cairo:surface))