Browse files

Make accel-labels be properly reference counted.

This gets rid of all CRITICAL Gtk errors in example app.
  • Loading branch information...
1 parent 1fe0b3e commit a29e9a5c301b80ba311129333d3335922de7d351 @Ramarren committed Nov 8, 2009
Showing with 1 addition and 1 deletion.
  1. +1 −1 cells-gtk/display.lisp
@@ -99,7 +99,7 @@
((text :accessor text :initarg :text :initform nil))
- :id (c_1 (gtk-accel-label-new (text self))))
+ :new-args (c? (list (text self))))
(def-widget image (widget misc)
((filename :accessor filename :initarg :filename :initform nil)

0 comments on commit a29e9a5

Please sign in to comment.