Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Make accel-labels be properly reference counted.

This gets rid of all CRITICAL Gtk errors in example app.
  • Loading branch information...
commit a29e9a5c301b80ba311129333d3335922de7d351 1 parent 1fe0b3e
@Ramarren authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  cells-gtk/display.lisp
View
2  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)
Please sign in to comment.
Something went wrong with that request. Please try again.