/* EFUN: "Other New Screen" (not EMACS) - from IMAGEN config */
f_othnscreen()
{
if (! oth_win)
return;
f_othwind();
if (exp_p) /* With arg, back up */
d_screen(-1);
else
d_screen(1);
f_othwind();
redp(RD_WINDS); /* Look at all windows */
}
void
ws_draw_in_display(DisplayObj d, Graphical gr, BoolObj invert, BoolObj subtoo)
{ d_screen(d);
if ( invert == ON ) r_invert_mode(ON);
if ( subtoo == ON ) r_subwindow_mode(ON);
RedrawArea(gr, gr->area);
r_invert_mode(OFF);
r_subwindow_mode(OFF);
d_done();
}
/* EFUN: "Previous Screen" */
f_pscreen()
{ d_screen(-exp);
}
/* EFUN: "Next Screen" */
f_nscreen()
{ d_screen( exp);
}