Fix gtkh file bug.

diff --git a/common/makegdesc b/common/makegdesc
index 32271fb..cfcb6f1 100755 (executable)
--- a/common/makegdesc
+++ b/common/makegdesc
@@ -510,6 +510,7 @@ while(<>)
 if($args{"h"})
 {
     $hfile = IO::File->new($args{"h"}, "w") || die;
+    $hfile->print("GtkWidget *create_" . $options{"prefix"} . "wnd(void);\n");
     printheader $rootwidgets, $hfile;
     $hfile->close();
 }