fix typo

diff --git a/gtk/gtk.dialog.lisp b/gtk/gtk.dialog.lisp
index b19fd30..7c22b7a 100644 (file)
--- a/gtk/gtk.dialog.lisp
+++ b/gtk/gtk.dialog.lisp
@@ -5,7 +5,7 @@
 
 (export 'dialog-run)
 
-(defcfun (dialog-respose "gtk_dialog_response") :void
+(defcfun (dialog-response "gtk_dialog_response") :void
   (dialog (g-object dialog))
   (response response-type))