static void menu_cb_searchForPage (EDITOR_ARGS) {
EDITOR_IAM (HyperPage);
EDITOR_FORM (L"Search for page", 0)
TEXTFIELD (L"Page", L"a")
EDITOR_OK
EDITOR_DO
HyperPage_goToPage (me, GET_STRING (L"Page")); // BUG
EDITOR_END
}
static void gui_drawingarea_cb_click (I, GuiDrawingAreaClickEvent event) {
iam (HyperPage);
if (my g == NULL) return; // Could be the case in the very beginning.
if (gtk && event -> type != BUTTON_PRESS) return;
if (! my links) return;
for (long ilink = 1; ilink <= my links -> size; ilink ++) {
HyperLink link = (HyperLink) my links -> item [ilink];
if (event -> y > link -> y2DC && event -> y < link -> y1DC && event -> x > link -> x1DC && event -> x < link -> x2DC) {
saveHistory (me, my currentPageTitle);
try {
HyperPage_goToPage (me, link -> name);
} catch (MelderError) {
Melder_flushError (NULL);
}
return;
}
}
}
static void menu_cb_help (Manual me, EDITOR_ARGS_DIRECT) { HyperPage_goToPage (me, U"Manual"); }
static void menu_cb_help (EDITOR_ARGS) { EDITOR_IAM (Manual); HyperPage_goToPage (me, L"Manual"); }
static void which (ButtonEditor me, int show) {
my show = show;
GuiRadioButton_set (show == 1 ? my button1 : show == 2 ? my button2 : show == 3 ? my button3 : show == 4 ? my button4 : my button5);
HyperPage_goToPage (me, U"Buttons");
}
