chiark
/
gitweb
/
~mdw
/
clg
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
e1531bf
)
Added CAIRO-REGION
author
espen
<espen>
Fri, 7 Sep 2007 07:36:26 +0000
(07:36 +0000)
committer
espen
<espen>
Fri, 7 Sep 2007 07:36:26 +0000
(07:36 +0000)
gdk/gdk.lisp
patch
|
blob
|
blame
|
history
diff --git
a/gdk/gdk.lisp
b/gdk/gdk.lisp
index fa5932e9583836df4a4f60c8c298e40149673bd9..6bcb6af45f5a3c72b493453b9675c35dcdeb8b88 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.4
3 2007-06-25 21:28:54
espen Exp $
+;; $Id: gdk.lisp,v 1.4
4 2007-09-07 07:36:26
espen Exp $
(in-package "GDK")
(in-package "GDK")
@@
-1100,9
+1100,9
@@
(defbinding cairo-rectangle () nil
(cr cairo:context)
(rectangle rectangle))
(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))
(defbinding (cairo-surface-get-window "clg_gdk_cairo_surface_get_window") () window
(surface cairo:surface))