# HG changeset patch
# User stephent
# Date 998818944 0
# Node ID 98b3721724bdf3b0ba13a937f28c6319b178a12b
# Parent  704cb139ec6ba7f703430d94f6853beea7290fef
[xemacs-hg @ 2001-08-26 09:42:22 by stephent]
Glynn Clements's patch to unregister input methods under Motif. <15240.50183.445881.777321@turnbull.sk.tsukuba.ac.jp>

diff -r 704cb139ec6b -r 98b3721724bd src/ChangeLog
--- a/src/ChangeLog	Fri Aug 24 08:52:09 2001 +0000
+++ b/src/ChangeLog	Sun Aug 26 09:42:24 2001 +0000
@@ -1,3 +1,8 @@
+2001-04-19  Glynn Clements  <glynn.clements@virgin.net>
+
+	* input-method-motif.c (XIM_delete_frame): New callback.
+	(XIM_init_frame): Register it.
+
 2001-08-24  Stephen J. Turnbull  <stephen@xemacs.org>
 
 	* buffer.h (valid_char_p): Make negative integers invalid again.
diff -r 704cb139ec6b -r 98b3721724bd src/input-method-motif.c
--- a/src/input-method-motif.c	Fri Aug 24 08:52:09 2001 +0000
+++ b/src/input-method-motif.c	Sun Aug 26 09:42:24 2001 +0000
@@ -94,6 +94,13 @@
   /* Nothing to do */
 }
 
+/* Callback for the deleting frame. */
+static void
+XIM_delete_frame (Widget w, XtPointer client_data, XtPointer call_data)
+{
+  XmImUnregister ((Widget) client_data);
+}
+
 void
 XIM_init_frame (struct frame *f)
 {
@@ -152,6 +159,8 @@
 		   NULL);
 
   XmFontListEntryFree (&fontlistEntry);
+
+  XtAddCallback (w, XmNdestroyCallback, XIM_delete_frame, (XtPointer) w);
 }
 
 void