!Last Modified:   5-FEB-1989 15:17:34.14, By: FLEMING 
procedure eveplus_module_pre_init

	eve$x_alpha_characters := 'abcdefghijklmnopqrstuvwxyz';
	eve$x_span_alpha := span(eve$x_alpha_characters);
	eve$x_span_digits := span(eve$x_digit_characters);
	eve$x_vt200_keys := "eve$x_vt200_keys";
!	eag_map_lock := 0;
	translate_buffer := TPU$K_UNSPECIFIED;
	screen_length := 0;
	eag_blank_string := " ";
	eag_map_window := "";
	eag_map_buffer := 0;
	eag_min_prefered_string := " ";
	eve$x_this_window := 0;
	eve$x_largest_width := 132;
	eve$x_hot_zone_size := 1;
	rtp$calluser_get_symbol := 1;
	rtp$calluser_trnlnm := 2;
	rtp$calluser_getjpi := 3;
	rtp$calluser_delete_file := 5;
	rtp$calluser_set_default := 6;
eve$x_whitespace := " 	";	! Whitespace characters: space & horizontal tab
endprocedure;
eveplus_module_pre_init;