From ff33b6ca77d468920dc19c8b5258be3f6cdfc073 Mon Sep 17 00:00:00 2001
From: John Darrington <john@darrington.wattle.id.au>
Date: Sat, 27 Jun 2020 07:27:25 +0200
Subject: [PATCH] PSPPIRE: fix leaks of GtkAccelGroup

---
 src/ui/gui/help-menu.c           | 2 ++
 src/ui/gui/psppire-data-window.c | 1 +
 2 files changed, 3 insertions(+)

diff --git a/src/ui/gui/help-menu.c b/src/ui/gui/help-menu.c
index 712dbbadd2..1dc2daf309 100644
--- a/src/ui/gui/help-menu.c
+++ b/src/ui/gui/help-menu.c
@@ -239,5 +239,7 @@ create_help_menu (GtkWindow *toplevel)
 
   gtk_widget_show_all (menuitem);
 
+  g_object_unref (accel_group);
+
   return menuitem;
 }
diff --git a/src/ui/gui/psppire-data-window.c b/src/ui/gui/psppire-data-window.c
index 3a45fbe137..73fb1e1bb1 100644
--- a/src/ui/gui/psppire-data-window.c
+++ b/src/ui/gui/psppire-data-window.c
@@ -1399,6 +1399,7 @@ create_edit_menu (PsppireDataWindow *dw)
     dw->mi_clear_cases = gtk_menu_item_new_with_mnemonic (_("Cl_ear Cases"));
     gtk_menu_attach (GTK_MENU (menu), dw->mi_clear_cases,     0, 1, i, i + 1); ++i;
     g_signal_connect_swapped (dw->mi_clear_cases, "activate", G_CALLBACK (on_clear_cases), dw);
+    g_object_unref (ag);
   }
 
   {
-- 
2.30.2