Typo.

[cl-gtk2.git] / gtk / gtk.dialog.lisp

diff --git a/gtk/gtk.dialog.lisp b/gtk/gtk.dialog.lisp
index d6232bd..05744d4 100644 (file)
--- a/gtk/gtk.dialog.lisp
+++ b/gtk/gtk.dialog.lisp
@@ -57,6 +57,8 @@
     (dialog-set-alternative-button-order-from-array dialog (length response-list) new-order))
   response-list)
 
+(export 'set-dialog-alternative-button-order)
+
 (defmacro with-gtk-message-error-handler (&body body)
   (let ((dialog (gensym))
         (e (gensym)))