.## edt°. _Jed_Emulationý# !-~þ + define_wordý/ self_insert_cmd! "þ & setkeyý/ self_insert_cmd! 'þ & setkeyý# OPþ ( unsetkeyý( edt_subs& OPOMþ & setkeyýP (Jed %v) EDT: %b   (%m%a%n%o)  %p   Advance   %t! 1þ / set_status_line! 1°( WANT_EOBý
* Edt_Loadedþ * is_defined.* * Edt_Loaded+* ( edt_pbuf+&  <edt>°( edt_pbuf ' whatbufý ( edt_pbufþ & setbufýþ & sw2buf/bý" ^Uþ ( unsetkeyý( exit_jed$ OPQþ & setkeyý( exit_jed$ OPEþ & setkey, ( exit_jedy$ quit& 0 Edt_Keypad_State+,* % state+
 % state°0 Edt_Keypad_State* ! t+" ke°! t* ! e+" >°! e % state." ks°! t" =°! e/cý ! eþ ' tt_send‚7 application_keypad_mode,* " on # off+( Numeric.°# off, Application.°" on 0 Edt_Keypad_StateN°0 Edt_Keypad_State 0 Edt_Keypad_State.ý " onþ
 ' message/.ý # offþ ' message/dý 0 Edt_Keypad_Stateþ 7 application_keypad_modey, edt_togglekpý, edt_togglekp& OPOPþ & setkeyý* edt_delbol" ^Uþ & setkeyý( edt_help# OQþ & setkeyý+ edt_findnxt# ORþ & setkeyý( edt_ldel# OSþ & setkeyý
( edt_cdel# Olþ & setkeyý( edt_wdel# Omþ & setkeyý2 smart_set_mark_cmd# Onþ & setkeyý( edt_line# Opþ & setkeyý( edt_word# Oqþ & setkeyý' edt_eol# Orþ & setkeyý( edt_char# Osþ & setkeyý+ edt_advance# Otþ & setkeyý* edt_backup
# Ouþ & setkeyý' edt_cut# Ovþ & setkeyý( edt_page# Owþ & setkeyý( edt_sect# Oxþ & setkeyý* edt_append# Oyþ & setkeyý( edt_help& OPOQþ & setkeyý( edt_find& OPORþ & setkeyý) edt_uldel& OPOSþ & setkeyý) edt_ucdel& OPOlþ
 & setkeyý) edt_uwdel& OPOmþ & setkeyý) edt_reset& OPOnþ & setkeyý) edt_oline& OPOpþ & setkeyý+ edt_chgcase& OPOqþ & setkeyý* edt_deleol& OPOrþ & setkeyý+ edt_specins& OPOsþ & setkeyý# eob& OPOtþ & setkeyý- beg_of_buffer
& OPOuþ & setkeyý) edt_paste& OPOvþ & setkeyý, evaluate_cmd& OPOwþ & setkeyý0 format_paragraph& OPOxþ & setkeyý+ edt_replace& OPOyþ & setkeyý) exit_mini# OMþ & setkeyý( Mini_Mapþ ( keymap_p.ý) exit_mini# OM( Mini_Mapþ
 ) definekeyý) edt_reset& OPOn( Mini_Mapþ ) definekey/c! 0! 9! 1.°" $0ý) digit_arg# OPý " $0þ & string9þ & setkey/hý( edt_find$ [1~þ & setkeyý$ yank$ [2~þ & setkeyý+ kill_region$ [3~þ & setkeyý2 smart_set_mark_cmd$ [4~þ & setkeyý
. emacs_escape_x% [29~þ & setkeyý( edt_help% [28~þ & setkeyý- beg_of_buffer& OPþ & setkeyý# eob& OPþ & setkeyý+ scroll_left& OPþ & setkeyý, scroll_right& OPþ & setkey& ' edt_dir+! 1°' edt_dir,! 1°' edt_dirý
O (Jed %v) EDT: %b   (%m%n%o)  %p    Advance   %t! 1þ / set_status_liney+ edt_advance," -1°' edt_dirýO (Jed %v) EDT: %b   (%m%n%o)  %p    Backup    %t! 1þ / set_status_liney* edt_backup* ( edt_wbuf ( edt_lbuf ( edt_cbuf+ + Null_String°( edt_wbuf
 + Null_String°( edt_lbuf! 0°( edt_cbuf, $ eobp. ) what_char°( edt_cbuf # del/by( edt_cdel, ( edt_cbuf.ý ( edt_cbufþ + insert_char ) go_left_1/cy) edt_ucdel, ' edt_dir! 1A. $ eolp. * go_right_1w/c / skip_word_chars 3 skip_non_word_chars/. $ bolp.
 ) go_left_1w/c 4 bskip_non_word_chars 0 bskip_word_chars/dy( edt_word, ) push_mark ( edt_word 0 bufsubstr_delete°( edt_wbufy( edt_wdel,ýýý4 char code (decimal):" 27 + Null_Stringþ ) read_miniþ ' integerþ + insert_chary+ edt_specins, ) push_spotý
 ( edt_wbufþ & insert ( pop_spoty) edt_uwdel, - push_mark_eol 0 bufsubstr_delete°( edt_lbufy* edt_deleol, ) push_mark # bol 0 bufsubstr_delete°( edt_lbufy* edt_delbol, 3 mark_to_visible_eol * go_right_1 0 bufsubstr_delete°( edt_lbufy( edt_ldel,
 ) push_spotý ( edt_lbufþ & insert ( pop_spoty) edt_uldel, ' edt_dir! 1A. . search_forward/. / search_backward/dy( edt_find,* ! r % found+! 0°! rý + LAST_SEARCHþ & strlen. ' edt_dir! 1A.ý! 1þ % right°! rý + LAST_SEARCHþ ' fsearch°% found/.ý
 + LAST_SEARCHþ ' bsearch°% found/d % found.ý ! rþ ' go_leftý* Not Found.þ % error/b/.ý* Find What?þ % error/dy+ edt_findnxt,* ! n+. , _clear_error/n ! n.ý- next_line_cmdþ $ call/iy- edt_go_down_n,* ! n+. , _clear_error/n ! n.ý1 previous_line_cmdþ
 $ call/iy+ edt_go_up_n, ' edt_dir! 1A.ý" 16þ - edt_go_down_n/.ý" 16þ + edt_go_up_n/d # boly( edt_sect, ' edt_dir! 1A. $ eolp.ý! 1þ - edt_go_down_n/c/.ý! 1þ + edt_go_up_n/d # eoly' edt_eol, ' edt_dir! 0?.ý! 1þ - edt_go_down_n/. $ bolp.ý! 1þ
 + edt_go_up_n/c/d # boly( edt_line, ' edt_dir! 1A. * go_right_1/. ) go_left_1/dy( edt_char, ' newline ) go_left_1y) edt_oline, + edt_advance. % markp/. * pop_mark_0/fý( kbd_quitþ $ cally) edt_reset,* # ret " ff+ý" 12þ $ char°" ff ' edt_dir! 1A.ý
 " ffþ ' fsearch°# ret/.ý " ffþ ' bsearch°# ret/d # ret.ý! 1þ ( recenter/cy( edt_page,* ! b+ ' dupmark.w/b ' whatbuf°! bý ( edt_pbufþ & setbuf , erase_bufferý ! bþ & setbufý ( edt_pbufþ + copy_region * del_regiony' edt_cut,ý ( edt_pbufþ & insbuf
y) edt_paste,* ! b+ ' whatbuf°! bý ( edt_pbufþ & setbuf # eobý ! bþ & setbuf ' dupmark.ý ( edt_pbufþ + copy_region * del_region/.ý* No Region.þ % error/dy* edt_append, * del_region ) edt_pastey+ edt_replace,ý + LAST_SEARCHþ * looking_at.ýý
 + LAST_SEARCHþ & strlenþ $ deln ) edt_pasteý + LAST_SEARCHþ * looking_at. + edt_findnxt/b/.ý8 Select range not active.þ % error/dy( edt_subs,ý' edt.hlpþ - jed_easy_helpy( edt_help,* ! n+ % markp. ) push_marký + LAST_SEARCHþ & strlen°! n ! ný
 + LAST_SEARCHþ * looking_atC.ý ! nþ ( go_right/. ' edt_dir! 1A. * go_right_1/. ) go_left_1/d/d/bý" 88þ , xform_regiony+ edt_chgcase,* ! n+ý + LAST_SEARCHþ & strlen°! n ! ný + LAST_SEARCHþ * looking_atC.ý ! nþ $ deln/. % markp.ý
8 Select range not active.þ % error/b * del_region/d ) edt_pastey+ edt_replace* 0 EDT_Scroll_Begin+! 3°0 EDT_Scroll_Begin,* ! n % max_n & w_rows+ý# 114þ + window_info°& w_rows & w_rows! 2 0 EDT_Scroll_Begin;! 2:?. + window_line°! n & w_rows
 0 EDT_Scroll_Begin:! 19°% max_n ! n 0 EDT_Scroll_Begin=.ý 0 EDT_Scroll_Beginþ ( recenter/c ! n % max_n?.ý % max_nþ ( recenter/c/cy0 edt_check_scrollý@ ."page_up" call edt_check_scroll$ [5~þ & setkeyýB ."page_down" call edt_check_scroll$ [6~þ
 & setkeyýJ ."previous_line_cmd" call edt_check_scroll# þ & setkeyýJ ."previous_line_cmd" call edt_check_scroll# OAþ & setkeyýF ."next_line_cmd" call edt_check_scroll# þ & setkeyýF ."next_line_cmd" call edt_check_scroll# OBþ & setkeyý! 1
þ 7 application_keypad_modeý0 keybindings_hook . _Jed_Emulationþ ( runhooks