]> git.saurik.com Git - wxWidgets.git/blobdiff - src/gtk/aboutdlg.cpp
Use generic collapsible pane for wxUniv based builds.
[wxWidgets.git] / src / gtk / aboutdlg.cpp
index 7c0c374076361b013a02e9b517c56dd2e8c66440..c5c73555634b9de7981a2e404de9180dc078d9f0 100644 (file)
@@ -22,6 +22,7 @@
 #if wxUSE_ABOUTDLG && defined(__WXGTK26__)
 
 #ifndef WX_PRECOMP
+    #include "wx/utils.h"       // for wxLaunchDefaultBrowser()
 #endif //WX_PRECOMP
 
 #include "wx/aboutdlg.h"
@@ -81,6 +82,20 @@ private:
 // implementation
 // ============================================================================
 
+extern "C" void
+wxGtkAboutDialogOnClose(GtkAboutDialog *about)
+{
+    gtk_widget_destroy(GTK_WIDGET(about));
+}
+
+extern "C" void
+wxGtkAboutDialogOnLink(GtkAboutDialog * WXUNUSED(about),
+                       const gchar *link,
+                       gpointer WXUNUSED(data))
+{
+    wxLaunchDefaultBrowser(wxGTK_CONV_BACK(link));
+}
+
 void wxAboutBox(const wxAboutDialogInfo& info)
 {
     if ( !gtk_check_version(2,6,0) )
@@ -102,6 +117,11 @@ void wxAboutBox(const wxAboutDialogInfo& info)
 
         if ( info.HasWebSite() )
         {
+            // NB: must be called before gtk_about_dialog_set_website() as
+            //     otherwise it has no effect (although GTK+ docs don't mention
+            //     this...)
+            gtk_about_dialog_set_url_hook(wxGtkAboutDialogOnLink, NULL, NULL);
+
             gtk_about_dialog_set_website(dlg, GtkStr(info.GetWebSiteURL()));
             gtk_about_dialog_set_website_label
             (
@@ -135,6 +155,9 @@ void wxAboutBox(const wxAboutDialogInfo& info)
 
         gtk_about_dialog_set_translator_credits(dlg, GtkStr(transCredits));
 
+        g_signal_connect(dlg, "response",
+                            G_CALLBACK(wxGtkAboutDialogOnClose), NULL);
+
         gtk_widget_show(GTK_WIDGET(dlg));
         return;
     }