chiark / gitweb /
debian: Fix package sections.
[mgLib] / mdwfocus.c
... / ...
CommitLineData
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
51void 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 -------------------------------------------------*/