Fix relative order of `automake' and `autoconf'.

[mgLib] / cancel.c

/* -*-c-*-
 *
 * $Id: cancel.c,v 1.4 1999/05/06 19:51:47 mdw Exp $
 *
 * Handle Escape keypresses, directing them to cancel buttons
 *
 * (c) 1998 Straylight/Edgeware
 */

/*----- Licensing notice --------------------------------------------------* 
 *
 * This file is part of the mgLib GTK utilities library.
 *
 * mgLib is free software; you can redistribute it and/or modify
 * it under the terms of the GNU Library General Public License as
 * published by the Free Software Foundation; either version 2 of the
 * License, or (at your option) any later version.
 * 
 * mgLib is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Library General Public License for more details.
 * 
 * You should have received a copy of the GNU Library General Public
 * License along with mgLib; if not, write to the Free
 * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
 * MA 02111-1307, USA.
 */

/*----- Revision history --------------------------------------------------* 
 *
 * $Log: cancel.c,v $
 * Revision 1.4  1999/05/06 19:51:47  mdw
 * Reformatted the LGPL notice a little bit.
 *
 * Revision 1.3  1999/05/05 18:52:45  mdw
 * Change licensing conditions to LGPL.
 *
 * Revision 1.2  1999/03/25 23:36:07  mdw
 * Compile to nothing in absence of GTK, for the benefit of parent packages
 * which contain non-GTK-dependent parts.
 *
 * Revision 1.1  1998/12/11 09:44:21  mdw
 * Initial version.
 *
 */

#ifdef HAVE_GTK

/*----- Header files ------------------------------------------------------*/

#include <gtk/gtk.h>
#include <gdk/gdkkeysyms.h>

#include "cancel.h"

/*----- Main code ---------------------------------------------------------*/

/* --- @cancel@ --- *
 *
 * Arguments:	@GtkWindow *win@ = window in which this is happening
 *		@GtkWidget *w@ = widget to activate, or null
 *
 * Returns:	---
 *
 * Use:		Sets up @win@ so that a press of `escape' will activate
 *		@w@ or destroy @win@.
 */

static gboolean cancel_press(GtkWidget *w, GdkEventKey *ev, gpointer *p)
{
  if (ev->keyval == GDK_Escape) {
    if (p)
      gtk_widget_activate(GTK_WIDGET(p));
    else
      gtk_object_destroy(GTK_OBJECT(w));
    return (1);
  }
  return (0);
}

void cancel(GtkWindow *win, GtkWidget *w)
{
  gtk_signal_connect(GTK_OBJECT(win), "key_press_event",
		     GTK_SIGNAL_FUNC(cancel_press), w);
}

/*----- That's all, folks -------------------------------------------------*/

#else
  int mgLib_cancel = 0;
#endif