X-Git-Url: http://winboard.nl/cgi-bin?a=blobdiff_plain;f=xoptions.c;h=8dbf32a608d17609610cfc2e9084fb180b284848;hb=715e33a60133ac9ac76b3aa0a5cf6f14f0f3930f;hp=5ac5b02038918a49cec6b597f3cd8a9f5fca72d2;hpb=b633aa086dad6a008fb8e19068605e40cf13b02b;p=xboard.git

diff --git a/xoptions.c b/xoptions.c
index 5ac5b02..8dbf32a 100644
--- a/xoptions.c
+++ b/xoptions.c
@@ -1665,6 +1665,28 @@ void MatchOptionsProc(w, event, prms, nprms)
    GenericPopUp(matchOptions, _("Match Options"), 0);
 }
 
+extern char ICSInputTranslations[];
+char *icsText;
+
+Option boxOptions[] = {
+{   0, 20,  400, NULL, (void*) &icsText, "", NULL, TextBox, "" },
+{   0,  3,    0, NULL, NULL, "", NULL, EndMark , "" }
+};
+
+void InputBoxPopup()
+{
+    Widget edit;
+    Arg args[16];
+
+    if(shells[4]) { // if already exists, clear content
+	XtSetArg(args[0], XtNstring, "");
+	XtSetValues(boxOptions[0].handle, args, 1);
+    }
+    MarkMenu("menuView.ICS Input Box", 4);
+    if(GenericPopUp(boxOptions, _("ICS input box"), 4))
+	XtOverrideTranslations(boxOptions[0].handle, XtParseTranslationTable(ICSInputTranslations));
+}
+
 void
 SettingsPopUp(ChessProgramState *cps)
 {