From 4542fb1ded3aa12e9203bc07428bc8cc1785bb91 Mon Sep 17 00:00:00 2001
From: Rupert Swarbrick <rswarbrick@gmail.com>
Date: Sun, 29 Apr 2012 15:35:23 +0100
Subject: [PATCH] Ensure that BORDER is defined at compile time.

Otherwise ENTRY ends up with an undefined type for its slot.
---
 gtk/gtktypes.lisp | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/gtk/gtktypes.lisp b/gtk/gtktypes.lisp
index 1155977..2bd3f9b 100644
--- a/gtk/gtktypes.lisp
+++ b/gtk/gtktypes.lisp
@@ -84,6 +84,9 @@
     :type int))
   (:metaclass boxed-class))
 
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (register-type 'border '|gtk_border_get_type|))
+
 (defclass stock-item (struct)
   ((id
     :allocation :alien
-- 
2.11.0