!+
! TOGGLE_STATUS_LINE.TPU
!-
! Eve commands to turn the status line on and off for the current window.
! Having the status line off is particularly useful in making slides
! directly from the terminal.

procedure eve_status_line_off

set (status_line, current_window, none, "");

endprocedure;


procedure eve_status_line_on

set (status_line, current_window, reverse, " Buffer");
eve$set_status_line (current_window);

endprocedure;