X-Git-Url: http://winboard.nl/cgi-bin?a=blobdiff_plain;f=xhistory.c;h=bf5a26dc6e80da59cb344525e0881e6e755f78ae;hb=aa694af0138b799c4de3e031d15c2a9be3112b6c;hp=6e2c0cd34c03871c45e98b43289e57c7beed007e;hpb=2aaf542114d8131c9fccc4e1ebffd45cb950d1d1;p=xboard.git diff --git a/xhistory.c b/xhistory.c index 6e2c0cd..bf5a26d 100644 --- a/xhistory.c +++ b/xhistory.c @@ -46,10 +46,9 @@ #include #include "common.h" -#include "frontend.h" #include "backend.h" #include "xhistory.h" -#include "xboard.h" +#include "dialogs.h" #include "gettext.h" #ifdef ENABLE_NLS @@ -61,11 +60,9 @@ #endif // templates for calls into back-end (= history.c; should be moved to history.h header shared with it!) -void RefreshMemoContent P((void)); -void MemoContentUpdated P((void)); void FindMoveByCharIndex P(( int char_index )); -// variables in xoptions.c +// variables in nhistory.c extern Option historyOptions[]; // ------------- low-level front-end actions called by MoveHistory back-end ----------------- @@ -78,20 +75,6 @@ HighlightMove (int from, int to, Boolean highlight) } void -ClearHistoryMemo () -{ - ClearTextWidget(&historyOptions[0]); -} - -// the bold argument says 0 = normal, 1 = bold typeface -// the colorNr argument says 0 = font-default, 1 = gray -int -AppendToHistoryMemo (char * text, int bold, int colorNr) -{ - return AppendText(&historyOptions[0], text); // for now ignore bold & color stuff, as Xaw cannot handle that -} - -void ScrollToCurrent (int caretPos) { Arg args[10]; @@ -114,7 +97,6 @@ ScrollToCurrent (int caretPos) // ------------------------------ callbacks -------------------------- -char *historyText; char historyTranslations[] = ": select-start() \n \ : extend-end() SelectMove() \n"; @@ -128,41 +110,3 @@ SelectMove (Widget w, XEvent * event, String * params, Cardinal * nParams) FindMoveByCharIndex( index ); // [HGM] also does the actual moving to it, now } -Option historyOptions[] = { -{ 0xD, 200, 400, NULL, (void*) &historyText, "", NULL, TextBox, "" }, -{ 0, 2, 0, NULL, (void*) NULL, "", NULL, EndMark , "" } -}; - -// ------------ standard entry points into MoveHistory code ----------- - -Boolean -MoveHistoryIsUp () -{ - return shellUp[7]; -} - -Boolean -MoveHistoryDialogExists () -{ - return shells[7] != NULL; -} - -void -HistoryPopUp () -{ - if(GenericPopUp(historyOptions, _("Move list"), 7)) - XtOverrideTranslations(historyOptions[0].handle, XtParseTranslationTable(historyTranslations)); - MarkMenu("Show Move History", 7); -} - -void -HistoryShowProc () -{ - if (!shellUp[7]) { - ASSIGN(historyText, ""); - HistoryPopUp(); - RefreshMemoContent(); - MemoContentUpdated(); - } else PopDown(7); - ToNrEvent(currentMove); -}