chiark / gitweb /
Fix relative order of `automake' and `autoconf'.
[mgLib] / cancel.c
1 /* -*-c-*-
2  *
3  * $Id: cancel.c,v 1.4 1999/05/06 19:51:47 mdw Exp $
4  *
5  * Handle Escape keypresses, directing them to cancel buttons
6  *
7  * (c) 1998 Straylight/Edgeware
8  */
9
10 /*----- Licensing notice --------------------------------------------------* 
11  *
12  * This file is part of the mgLib GTK utilities library.
13  *
14  * mgLib is free software; you can redistribute it and/or modify
15  * it under the terms of the GNU Library General Public License as
16  * published by the Free Software Foundation; either version 2 of the
17  * License, or (at your option) any later version.
18  * 
19  * mgLib is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  * GNU Library General Public License for more details.
23  * 
24  * You should have received a copy of the GNU Library General Public
25  * License along with mgLib; if not, write to the Free
26  * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
27  * MA 02111-1307, USA.
28  */
29
30 /*----- Revision history --------------------------------------------------* 
31  *
32  * $Log: cancel.c,v $
33  * Revision 1.4  1999/05/06 19:51:47  mdw
34  * Reformatted the LGPL notice a little bit.
35  *
36  * Revision 1.3  1999/05/05 18:52:45  mdw
37  * Change licensing conditions to LGPL.
38  *
39  * Revision 1.2  1999/03/25 23:36:07  mdw
40  * Compile to nothing in absence of GTK, for the benefit of parent packages
41  * which contain non-GTK-dependent parts.
42  *
43  * Revision 1.1  1998/12/11 09:44:21  mdw
44  * Initial version.
45  *
46  */
47
48 #ifdef HAVE_GTK
49
50 /*----- Header files ------------------------------------------------------*/
51
52 #include <gtk/gtk.h>
53 #include <gdk/gdkkeysyms.h>
54
55 #include "cancel.h"
56
57 /*----- Main code ---------------------------------------------------------*/
58
59 /* --- @cancel@ --- *
60  *
61  * Arguments:   @GtkWindow *win@ = window in which this is happening
62  *              @GtkWidget *w@ = widget to activate, or null
63  *
64  * Returns:     ---
65  *
66  * Use:         Sets up @win@ so that a press of `escape' will activate
67  *              @w@ or destroy @win@.
68  */
69
70 static gboolean cancel_press(GtkWidget *w, GdkEventKey *ev, gpointer *p)
71 {
72   if (ev->keyval == GDK_Escape) {
73     if (p)
74       gtk_widget_activate(GTK_WIDGET(p));
75     else
76       gtk_object_destroy(GTK_OBJECT(w));
77     return (1);
78   }
79   return (0);
80 }
81
82 void cancel(GtkWindow *win, GtkWidget *w)
83 {
84   gtk_signal_connect(GTK_OBJECT(win), "key_press_event",
85                      GTK_SIGNAL_FUNC(cancel_press), w);
86 }
87
88 /*----- That's all, folks -------------------------------------------------*/
89
90 #else
91   int mgLib_cancel = 0;
92 #endif