nethack-gwaa-kiwi/nethack
1
0
Fork 0
Code Pull Requests Activity

X11_getlin()

Browse Source 
Two cosmetic changes for the X11 version of the getlin() routine:
1) Make the text entry box big enough to hold 60 characters before
   sliding the beginning input off the left edge, instead of just 13,
   so that user can see much more of what is being typed;
2) Make the cancel button be a little wider, and the okay button be
   the same width as the cancel button so they look a little nicer.
This commit is contained in:
PatR
2016-01-21 23:13:49 -08:00
parent 93f7df6848
commit 2bf652dd0f
3 changed files with 41 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

35
win/X11/dialogs.c
View File

@@ -48,7 +48,13 @@
* target type" issued by 'gcc -Wwrite-strings' as used by nethack.
* (For this file, always the second parameter to XtSetArg().)
*
* $NHDT-Date: 1452594032 2016/01/12 10:20:32 $ $NHDT-Branch: NetHack-3.6.0 $:$NHDT-Revision: 1.7 $
* Modified 1/2016, Pat Rankin.
* + Added minimum width argument to SetDialogResponse() so that the
* text entry widget can be forced to wider than the default response.
* + Make 'okay' button same width as 'cancel', and both wider than
* default by a small arbitrary amount.
*
* $NHDT-Date: 1453446809 2016/01/22 07:13:29 $ $NHDT-Branch: NetHack-3.6.0 $:$NHDT-Revision: 1.8 $
*/
#ifndef SYSV
@@ -99,6 +105,7 @@ XtCallbackProc cancel_callback;
Widget form, prompt, response, okay, cancel;
Arg args[20];
Cardinal num_args;
Dimension owidth, cwidth;
num_args = 0;
#ifdef SPECIAL_CMAP
@@ -191,6 +198,8 @@ XtCallbackProc cancel_callback;
okay = XtCreateManagedWidget("okay", commandWidgetClass, form, args,
num_args);
XtAddCallback(okay, XtNcallback, okay_callback, form);
XtSetArg(args[0], XtNwidth, &owidth);
XtGetValues(okay, args, ONE);
/* Only create cancel button if there is a callback for it. */
if (cancel_callback) {
@@ -224,7 +233,18 @@ XtCallbackProc cancel_callback;
args, num_args);
XtAddCallback(cancel, XtNcallback, cancel_callback, form);
XtInstallAccelerators(response, cancel);
}
XtSetArg(args[0], XtNwidth, &cwidth);
XtGetValues(cancel, args, ONE);
/* widen the cancel button */
cwidth += 25;
XtSetArg(args[0], XtNwidth, cwidth);
XtSetValues(cancel, args, ONE);
} else
cwidth = owidth + 25;
/* make okay button same width as cancel, or widen it if no cancel */
XtSetArg(args[0], XtNwidth, cwidth);
XtSetValues(okay, args, ONE);
XtInstallAccelerators(response, okay);
XtSetKeyboardFocus(form, response);
@@ -279,18 +299,21 @@ Widget w;
return XtNewString(s);
}
#define max(a, b) (((a) > (b)) ? (a) : (b))
/* set the default reponse */
void
SetDialogResponse(w, s)
SetDialogResponse(w, s, ln)
Widget w;
String s;
unsigned ln;
{
Arg args[4];
Widget response;
XFontStruct *font;
Dimension width, nwidth, leftMargin, rightMargin;
unsigned s_len = strlen(s);
if (s_len < ln)
s_len = ln;
response = XtNameToWidget(w, "response");
XtSetArg(args[0], nhStr(XtNfont), &font);
XtSetArg(args[1], nhStr(XtNleftMargin), &leftMargin);
@@ -298,7 +321,7 @@ String s;
XtSetArg(args[3], nhStr(XtNwidth), &width);
XtGetValues(response, args, FOUR);
/* width includes margins as per Xaw documentation */
nwidth = (font->max_bounds.width * strlen(s)) + leftMargin + rightMargin;
nwidth = font->max_bounds.width * (s_len + 1) + leftMargin + rightMargin;
if (nwidth < width)
nwidth = width;
@@ -395,3 +418,5 @@ boolean bottom; /* position y on bottom? */
XSetWMNormalHints(XtDisplay(w), XtWindow(w), hints);
XFree(hints);
}
/*dialogs.c*/