chiark / gitweb /
debian: Fix maintainer email address.
[mgLib] / mdwfocus.c
1 /* -*-c-*-
2  *
3  * $Id: mdwfocus.c,v 1.6 2004/04/08 01:36:14 mdw Exp $
4  *
5  * Tell my hacked `fvwm' to focus this window
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/gdk.h>
34
35 #include <X11/Xatom.h>
36 #include <X11/Xlib.h>
37
38 /*----- Main code ---------------------------------------------------------*/
39
40 /* --- @mdwfocus@ --- *
41  *
42  * Arguments:   @GtkWidget *w@ = widget to mark as must-be-focussed.
43  *
44  * Returns:     ---
45  *
46  * Use:         Marks a window as wanting to have focus `anyway', even if
47  *              normally disabled.  This only works with my hacked `fvwm'
48  *              version.
49  */
50
51 void mdwfocus(GtkWidget *w)
52 {
53   static GdkAtom a = 0;
54   unsigned char c = 1;
55
56   if (!a)
57     a = gdk_atom_intern("FVWM_GIVE_ME_FOCUS", 0);
58   gdk_property_change(w->window, a, XA_CARDINAL, 8,
59                       GDK_PROP_MODE_REPLACE, &c, 1);
60 }
61
62 /*----- That's all, folks -------------------------------------------------*/