1 /* Preferences.c- misc personal preferences
3 * WPrefs - Window Maker Preferences Program
5 * Copyright (c) 1998 Alfredo K. Kojima
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
26 typedef struct _Panel
{
33 CallbackRec callbacks
;
50 #endif /* XKB_MODELOCK */
62 #define ICON_FILE "ergonomic"
66 borderCallback(WMWidget
*w
, void *data
)
68 _Panel
*panel
= (_Panel
*)data
;
72 i
= WMGetSliderValue(panel
->borderS
);
75 WMSetLabelText(panel
->borderL
, "OFF");
77 sprintf(buffer
, "%i pixel%s", i
, i
>1 ? "s" : "");
78 WMSetLabelText(panel
->borderL
, buffer
);
84 showData(_Panel
*panel
)
89 str
= GetStringForKey("ResizeDisplay");
92 if (strcasecmp(str
, "corner")==0)
93 WMSetPopUpButtonSelectedItem(panel
->sizeP
, 0);
94 else if (strcasecmp(str
, "center")==0)
95 WMSetPopUpButtonSelectedItem(panel
->sizeP
, 1);
96 else if (strcasecmp(str
, "floating")==0)
97 WMSetPopUpButtonSelectedItem(panel
->sizeP
, 2);
98 else if (strcasecmp(str
, "line")==0)
99 WMSetPopUpButtonSelectedItem(panel
->sizeP
, 3);
101 str
= GetStringForKey("MoveDisplay");
104 if (strcasecmp(str
, "corner")==0)
105 WMSetPopUpButtonSelectedItem(panel
->posiP
, 0);
106 else if (strcasecmp(str
, "center")==0)
107 WMSetPopUpButtonSelectedItem(panel
->posiP
, 1);
108 else if (strcasecmp(str
, "floating")==0)
109 WMSetPopUpButtonSelectedItem(panel
->posiP
, 2);
111 x
= GetIntegerForKey("WorkspaceBorderSize");
114 WMSetSliderValue(panel
->borderS
, x
);
115 borderCallback(NULL
, panel
);
117 str
= GetStringForKey("WorkspaceBorder");
120 if (strcasecmp(str
, "LeftRight")==0) {
121 WMSetButtonSelected(panel
->lrB
, True
);
122 } else if (strcasecmp(str
, "TopBottom")==0) {
123 WMSetButtonSelected(panel
->tbB
, True
);
124 } else if (strcasecmp(str
, "AllDirections")==0) {
125 WMSetButtonSelected(panel
->tbB
, True
);
126 WMSetButtonSelected(panel
->lrB
, True
);
129 WMSetButtonSelected(panel
->raisB
, GetBoolForKey("CirculateRaise"));
131 WMSetButtonSelected(panel
->modeB
, GetBoolForKey("KbdModeLock"));
132 #endif /* XKB_MODELOCK */
134 WMSetButtonSelected(panel
->ballB
[0], GetBoolForKey("WindowTitleBalloons"));
135 WMSetButtonSelected(panel
->ballB
[1], GetBoolForKey("MiniwindowTitleBalloons"));
136 WMSetButtonSelected(panel
->ballB
[2], GetBoolForKey("AppIconBalloons"));
137 WMSetButtonSelected(panel
->ballB
[3], GetBoolForKey("HelpBalloons"));
142 storeData(_Panel
*panel
)
147 switch (WMGetPopUpButtonSelectedItem(panel
->sizeP
)) {
161 SetStringForKey(str
, "ResizeDisplay");
163 switch (WMGetPopUpButtonSelectedItem(panel
->posiP
)) {
174 SetStringForKey(str
, "MoveDisplay");
176 lr
= WMGetButtonSelected(panel
->lrB
);
177 tb
= WMGetButtonSelected(panel
->tbB
);
179 str
= "AllDirections";
186 SetStringForKey(str
, "WorkspaceBorder");
187 SetIntegerForKey(WMGetSliderValue(panel
->borderS
), "WorkspaceBorderSize");
189 SetBoolForKey(WMGetButtonSelected(panel
->raisB
), "CirculateRaise");
191 SetBoolForKey(WMGetButtonSelected(panel
->modeB
), "KbdModeLock");
192 #endif /* XKB_MODELOCK */
193 SetBoolForKey(WMGetButtonSelected(panel
->ballB
[0]), "WindowTitleBalloons");
194 SetBoolForKey(WMGetButtonSelected(panel
->ballB
[1]), "MiniwindowTitleBalloons");
195 SetBoolForKey(WMGetButtonSelected(panel
->ballB
[2]), "AppIconBalloons");
196 SetBoolForKey(WMGetButtonSelected(panel
->ballB
[3]), "HelpBalloons");
201 createPanel(Panel
*p
)
203 _Panel
*panel
= (_Panel
*)p
;
206 panel
->box
= WMCreateBox(panel
->parent
);
207 WMSetBoxExpandsToParent(panel
->box
, 2, 2, 0, 0);
210 /***************** Size Display ****************/
211 panel
->sizeF
= WMCreateFrame(panel
->box
);
212 WMResizeWidget(panel
->sizeF
, 240, 60);
213 WMMoveWidget(panel
->sizeF
, 20, 10);
214 WMSetFrameTitle(panel
->sizeF
, _("Size Display"));
216 WMSetBalloonTextForView(_("The position or style of the window size\n"
217 "display that's shown when a window is resized."),
218 WMWidgetView(panel
->sizeF
));
220 panel
->sizeP
= WMCreatePopUpButton(panel
->sizeF
);
221 WMResizeWidget(panel
->sizeP
, 200, 20);
222 WMMoveWidget(panel
->sizeP
, 22, 24);
223 WMAddPopUpButtonItem(panel
->sizeP
, _("Corner of screen"));
224 WMAddPopUpButtonItem(panel
->sizeP
, _("Center of screen"));
225 WMAddPopUpButtonItem(panel
->sizeP
, _("Center of resized window"));
226 WMAddPopUpButtonItem(panel
->sizeP
, _("Technical drawing-like"));
228 WMMapSubwidgets(panel
->sizeF
);
230 /***************** Position Display ****************/
231 panel
->posiF
= WMCreateFrame(panel
->box
);
232 WMResizeWidget(panel
->posiF
, 240, 60);
233 WMMoveWidget(panel
->posiF
, 20, 75);
234 WMSetFrameTitle(panel
->posiF
, _("Position Display"));
236 WMSetBalloonTextForView(_("The position or style of the window position\n"
237 "display that's shown when a window is moved."),
238 WMWidgetView(panel
->posiF
));
240 panel
->posiP
= WMCreatePopUpButton(panel
->posiF
);
241 WMResizeWidget(panel
->posiP
, 200, 20);
242 WMMoveWidget(panel
->posiP
, 22, 24);
243 WMAddPopUpButtonItem(panel
->posiP
, _("Corner of screen"));
244 WMAddPopUpButtonItem(panel
->posiP
, _("Center of screen"));
245 WMAddPopUpButtonItem(panel
->posiP
, _("Center of resized window"));
247 WMMapSubwidgets(panel
->posiF
);
249 /***************** Balloon Text ****************/
250 panel
->ballF
= WMCreateFrame(panel
->box
);
251 WMResizeWidget(panel
->ballF
, 235, 125);
252 WMMoveWidget(panel
->ballF
, 270, 10);
253 WMSetFrameTitle(panel
->ballF
, _("Show balloon text for..."));
255 for (i
=0; i
<4; i
++) {
256 panel
->ballB
[i
] = WMCreateSwitchButton(panel
->ballF
);
257 WMResizeWidget(panel
->ballB
[i
], 205, 20);
258 WMMoveWidget(panel
->ballB
[i
], 15, 20+i
*25);
260 WMSetButtonText(panel
->ballB
[0], _("incomplete window titles"));
261 WMSetButtonText(panel
->ballB
[1], _("miniwindow titles"));
262 WMSetButtonText(panel
->ballB
[2], _("application/dock icons"));
263 WMSetButtonText(panel
->ballB
[3], _("internal help"));
265 WMMapSubwidgets(panel
->ballF
);
267 /***************** Options ****************/
268 panel
->optF
= WMCreateFrame(panel
->box
);
269 WMResizeWidget(panel
->optF
, 235, 75);
270 WMMoveWidget(panel
->optF
, 270, 145);
272 panel
->raisB
= WMCreateSwitchButton(panel
->optF
);
273 WMResizeWidget(panel
->raisB
, 210, 30);
274 WMMoveWidget(panel
->raisB
, 15, 7);
275 WMSetButtonText(panel
->raisB
, _("Raise window when switching\nfocus with keyboard."));
278 panel
->modeB
= WMCreateSwitchButton(panel
->optF
);
279 WMResizeWidget(panel
->modeB
, 210, 30);
280 WMMoveWidget(panel
->modeB
, 15, 40);
281 WMSetButtonText(panel
->modeB
, _("Enable keyboard language\nswitch button in window titlebars."));
284 WMMapSubwidgets(panel
->optF
);
286 /***************** Workspace border ****************/
287 panel
->borderF
= WMCreateFrame(panel
->box
);
288 WMResizeWidget(panel
->borderF
, 240, 75);
289 WMMoveWidget(panel
->borderF
, 20, 145);
290 WMSetFrameTitle(panel
->borderF
, _("Workspace border"));
292 panel
->borderS
= WMCreateSlider(panel
->borderF
);
293 WMResizeWidget(panel
->borderS
, 80, 15);
294 WMMoveWidget(panel
->borderS
, 20, 20);
295 WMSetSliderMinValue(panel
->borderS
, 0);
296 WMSetSliderMaxValue(panel
->borderS
, 5);
297 WMSetSliderAction(panel
->borderS
, borderCallback
, panel
);
299 panel
->borderL
= WMCreateLabel(panel
->borderF
);
300 WMResizeWidget(panel
->borderL
, 50, 15);
301 WMMoveWidget(panel
->borderL
, 105, 20);
303 panel
->lrB
= WMCreateSwitchButton(panel
->borderF
);
304 WMMoveWidget(panel
->lrB
, 20, 40);
305 WMResizeWidget(panel
->lrB
, 90, 30);
306 WMSetButtonText(panel
->lrB
, _("Left/Right"));
308 panel
->tbB
= WMCreateSwitchButton(panel
->borderF
);
309 WMMoveWidget(panel
->tbB
, 120, 40);
310 WMResizeWidget(panel
->tbB
, 90, 30);
311 WMSetButtonText(panel
->tbB
, _("Top/Bottom"));
314 WMMapSubwidgets(panel
->borderF
);
316 WMRealizeWidget(panel
->box
);
317 WMMapSubwidgets(panel
->box
);
325 InitPreferences(WMScreen
*scr
, WMWidget
*parent
)
329 panel
= wmalloc(sizeof(_Panel
));
330 memset(panel
, 0, sizeof(_Panel
));
332 panel
->sectionName
= _("Miscellaneous Ergonomic Preferences");
333 panel
->description
= _("Various settings like balloon text, geometry\n"
336 panel
->parent
= parent
;
338 panel
->callbacks
.createWidgets
= createPanel
;
339 panel
->callbacks
.updateDomain
= storeData
;
341 AddSection(panel
, ICON_FILE
);