debian: Fix package sections.
[mgLib] / cancel.c
1 /* -*-c-*-
2 *
3 * $Id: cancel.c,v 1.6 2004/04/08 01:36:14 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 /*----- Header files ------------------------------------------------------*/
31
32 #include <gtk/gtk.h>
33 #include <gdk/gdkkeysyms.h>
34
35 #include "cancel.h"
36
37 /*----- Main code ---------------------------------------------------------*/
38
39 /* --- @cancel@ --- *
40 *
41 * Arguments: @GtkWindow *win@ = window in which this is happening
42 * @GtkWidget *w@ = widget to activate, or null
43 *
44 * Returns: ---
45 *
46 * Use: Sets up @win@ so that a press of `escape' will activate
47 * @w@ or destroy @win@.
48 */
49
50 static gboolean cancel_press(GtkWidget *w, GdkEventKey *ev, gpointer *p)
51 {
52 if (ev->keyval == GDK_Escape) {
53 if (p)
54 gtk_widget_activate(GTK_WIDGET(p));
55 else
56 gtk_object_destroy(GTK_OBJECT(w));
57 return (1);
58 }
59 return (0);
60 }
61
62 void cancel(GtkWindow *win, GtkWidget *w)
63 {
64 gtk_signal_connect(GTK_OBJECT(win), "key_press_event",
65 GTK_SIGNAL_FUNC(cancel_press), w);
66 }
67
68 /*----- That's all, folks -------------------------------------------------*/