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
->frame
= WMCreateFrame(panel
->win
);
207 WMResizeWidget(panel
->frame
, FRAME_WIDTH
, FRAME_HEIGHT
);
208 WMMoveWidget(panel
->frame
, FRAME_LEFT
, FRAME_TOP
);
211 /***************** Size Display ****************/
212 panel
->sizeF
= WMCreateFrame(panel
->frame
);
213 WMResizeWidget(panel
->sizeF
, 240, 60);
214 WMMoveWidget(panel
->sizeF
, 20, 10);
215 WMSetFrameTitle(panel
->sizeF
, _("Size Display"));
217 WMSetBalloonTextForView(_("The position or style of the window size\n"
218 "display that's shown when a window is resized."),
219 WMWidgetView(panel
->sizeF
));
221 panel
->sizeP
= WMCreatePopUpButton(panel
->sizeF
);
222 WMResizeWidget(panel
->sizeP
, 200, 20);
223 WMMoveWidget(panel
->sizeP
, 22, 24);
224 WMAddPopUpButtonItem(panel
->sizeP
, _("Corner of screen"));
225 WMAddPopUpButtonItem(panel
->sizeP
, _("Center of screen"));
226 WMAddPopUpButtonItem(panel
->sizeP
, _("Center of resized window"));
227 WMAddPopUpButtonItem(panel
->sizeP
, _("Technical drawing-like"));
229 WMMapSubwidgets(panel
->sizeF
);
231 /***************** Position Display ****************/
232 panel
->posiF
= WMCreateFrame(panel
->frame
);
233 WMResizeWidget(panel
->posiF
, 240, 60);
234 WMMoveWidget(panel
->posiF
, 20, 75);
235 WMSetFrameTitle(panel
->posiF
, _("Position Display"));
237 WMSetBalloonTextForView(_("The position or style of the window position\n"
238 "display that's shown when a window is moved."),
239 WMWidgetView(panel
->posiF
));
241 panel
->posiP
= WMCreatePopUpButton(panel
->posiF
);
242 WMResizeWidget(panel
->posiP
, 200, 20);
243 WMMoveWidget(panel
->posiP
, 22, 24);
244 WMAddPopUpButtonItem(panel
->posiP
, _("Corner of screen"));
245 WMAddPopUpButtonItem(panel
->posiP
, _("Center of screen"));
246 WMAddPopUpButtonItem(panel
->posiP
, _("Center of resized window"));
248 WMMapSubwidgets(panel
->posiF
);
250 /***************** Balloon Text ****************/
251 panel
->ballF
= WMCreateFrame(panel
->frame
);
252 WMResizeWidget(panel
->ballF
, 235, 125);
253 WMMoveWidget(panel
->ballF
, 270, 10);
254 WMSetFrameTitle(panel
->ballF
, _("Show balloon text for..."));
256 for (i
=0; i
<4; i
++) {
257 panel
->ballB
[i
] = WMCreateSwitchButton(panel
->ballF
);
258 WMResizeWidget(panel
->ballB
[i
], 205, 20);
259 WMMoveWidget(panel
->ballB
[i
], 15, 20+i
*25);
261 WMSetButtonText(panel
->ballB
[0], _("incomplete window titles"));
262 WMSetButtonText(panel
->ballB
[1], _("miniwindow titles"));
263 WMSetButtonText(panel
->ballB
[2], _("application/dock icons"));
264 WMSetButtonText(panel
->ballB
[3], _("internal help"));
266 WMMapSubwidgets(panel
->ballF
);
268 /***************** Options ****************/
269 panel
->optF
= WMCreateFrame(panel
->frame
);
270 WMResizeWidget(panel
->optF
, 235, 75);
271 WMMoveWidget(panel
->optF
, 270, 145);
273 panel
->raisB
= WMCreateSwitchButton(panel
->optF
);
274 WMResizeWidget(panel
->raisB
, 210, 30);
275 WMMoveWidget(panel
->raisB
, 15, 7);
276 WMSetButtonText(panel
->raisB
, _("Raise window when switching focus with keyboard."));
279 panel
->modeB
= WMCreateSwitchButton(panel
->optF
);
280 WMResizeWidget(panel
->modeB
, 210, 30);
281 WMMoveWidget(panel
->modeB
, 15, 40);
282 WMSetButtonText(panel
->modeB
, _("Enable keyboard language switch button in window titlebars."));
285 WMMapSubwidgets(panel
->optF
);
287 /***************** Workspace border ****************/
288 panel
->borderF
= WMCreateFrame(panel
->frame
);
289 WMResizeWidget(panel
->borderF
, 240, 75);
290 WMMoveWidget(panel
->borderF
, 20, 145);
291 WMSetFrameTitle(panel
->borderF
, _("Workspace border"));
293 panel
->borderS
= WMCreateSlider(panel
->borderF
);
294 WMResizeWidget(panel
->borderS
, 80, 15);
295 WMMoveWidget(panel
->borderS
, 20, 20);
296 WMSetSliderMinValue(panel
->borderS
, 0);
297 WMSetSliderMaxValue(panel
->borderS
, 5);
298 WMSetSliderAction(panel
->borderS
, borderCallback
, panel
);
300 panel
->borderL
= WMCreateLabel(panel
->borderF
);
301 WMResizeWidget(panel
->borderL
, 50, 15);
302 WMMoveWidget(panel
->borderL
, 105, 20);
304 panel
->lrB
= WMCreateSwitchButton(panel
->borderF
);
305 WMMoveWidget(panel
->lrB
, 20, 40);
306 WMResizeWidget(panel
->lrB
, 90, 30);
307 WMSetButtonText(panel
->lrB
, _("Left/Right"));
309 panel
->tbB
= WMCreateSwitchButton(panel
->borderF
);
310 WMMoveWidget(panel
->tbB
, 120, 40);
311 WMResizeWidget(panel
->tbB
, 90, 30);
312 WMSetButtonText(panel
->tbB
, _("Top/Bottom"));
315 WMMapSubwidgets(panel
->borderF
);
317 WMRealizeWidget(panel
->frame
);
318 WMMapSubwidgets(panel
->frame
);
326 InitPreferences(WMScreen
*scr
, WMWindow
*win
)
330 panel
= wmalloc(sizeof(_Panel
));
331 memset(panel
, 0, sizeof(_Panel
));
333 panel
->sectionName
= _("Miscellaneous Ergonomic Preferences");
334 panel
->description
= _("Various settings like balloon text, geometry\n"
339 panel
->callbacks
.createWidgets
= createPanel
;
340 panel
->callbacks
.updateDomain
= storeData
;
342 AddSection(panel
, ICON_FILE
);