View file File name : rmail.slc Content :.#��! 5 8 Rmail_Spool_Mailbox_File� * is_defined.*�! 7 8 Rmail_Spool_Mailbox_File+� $ MAIL� & getenv�8 Rmail_Spool_Mailbox_File�! 8 $ NULL 8 Rmail_Spool_Mailbox_FileA.�" 10 / /var/spool/mail�8 Rmail_Spool_Mailbox_File�" 11! 2� 8 Rmail_Spool_Mailbox_File� + file_statusB.�" 13 ) /usr/mail�8 Rmail_Spool_Mailbox_File/c��" 15 8 Rmail_Spool_Mailbox_File� $ USER� & getenv� & dircat�8 Rmail_Spool_Mailbox_File/c/b��" 22 / Rmail_Directory� * is_defined.*�" 24 / Rmail_Directory+�� $ HOME� & getenv $ Mail� & dircat� / Rmail_Directory/b*�" 28 . Rmail_Tmp_Mbox+� / Rmail_Directory ) #NewMail#� & dircat�. Rmail_Tmp_Mbox*�" 30 7 Rmail_Master_Index_File+� / Rmail_Directory 1 _Root_Index.index� & dircat�7 Rmail_Master_Index_File*�" 31 3 Rmail_Folder_Buffer+ + Null_String�3 Rmail_Folder_Buffer*�" 32 1 Rmail_Folder_Name+ + Null_String�1 Rmail_Folder_Name*�" 33 4 Rmail_Newmail_Folder+ ( New-Mail�4 Rmail_Newmail_Folder*�" 34 1 Rmail_Root_Buffer+ 2 Rmail: Folder List�1 Rmail_Root_Buffer*�" 35 6 Rmail_Mail_Buffer_Name+ + Null_Str ing�6 Rmail_Mail_Buffer_Name��" 37 3 Rmail_Dont_Reply_To� * is_defined.*�" 40 3 Rmail_Dont_Reply_To+��" 41 $ USER� & getenv�" $1 " $1 $ NULLA. �" $1/c��" 42 $ HOST� & getenv�" $2 " $2 $ NULLA. �" $2/c�" 44 " $1�3 Rmail_Dont_Reply_To��" 45 " $1� & strl en� " $2� & strlenC.��" 46 ( %s,%s@%s " $1 " $1 " $2� ' sprintf�3 Rmail_Dont_Reply_To/.�" 48 " $1�3 Rmail_Dont_Reply_To/d/b��" 51 3 Rmail_Dont_Reply_To� & strlow�3 Rmail_Dont_Reply_To*�" 53 4 Rmail_Message_Number+ + Null_String�4 Rmail_Message_Number��" 5 7 / Rmail_Directory� + file_status.��" 59 / Rmail_Directory# 448� % mkdir.��" 60 1 Unable to create / Rmail_Directory9� % error/c��" 62 / Rmail_Directory# 448� % chmod.��" 63 - chmod failed!� % error/c/b��" 66 2 Rmail_Ask_About_Cc� * is_defined.*�" 68 2 Rmail_Ask_About_Cc+! 0�2 Rmail_Ask_About_Cc/b,*�" 72 & folder+�" 74 ' Rmail: & folder9�" 72y1 rmail_buffer_name��" 77 9 mime_rfc1522_parse_buffer� * is_defined.��" 79 9 mime_rfc1522_parse_buffer $ mime� ( autoload��" 80 4 mime_qp_parse_buffer $ mime� ( autoload/b,*�" 83 & folder+��" 85 / Rmail_Directory & folder� & dircat & .index9�" 83y1 rmail_folder_file,*�" 93 % flags+ + getbuf_info�% flags�" 94 % flags# 128J! 2OF�% flags�" 95 % flags" 32OF�% flags�" 96 % flags# 256J�% flags��" 97 % flags� + setbuf_info��" 99" 63� 0 set_buffer_umaskP�" 91y6 rmail_set_buffer_flags,*�# 104 # dir $ file % flags+�# 105 + getbuf_info�% flagsP�# dir�$ file�# 107 / buffer_modified� $ file� & strlenC.w/b��# 110 # dir $ file� & dircat�$ file��# 111 $ file� , write_ bufferP��# 112 $ file# 384� % chmodP�# 102y8 rmail_save_buffer_secure,*�# 116 & folder ! n % total ( n_unread+*�# 118 $ cbuf+ ' whatbuf�$ cbuf* ! f % fline+��# 120$K Folder: %20s (%d/%d) messages. %d unread.\n�# 121 & folder ! n % total ( n_unread��# 12 0 ' sprintf�% fline*�# 123 % flags+��# 124 7 Rmail_Master_Index_File� ) read_fileP�# 125 6 rmail_set_buffer_flags�# 126 - push_spot_bob��# 128 % fline� + bol_fsearch.���# 130 . Folder: %20s ( & folder� ' sprintf� + bol_fsearch. # eob/b��# 131! 0� , set_r eadonly�# 132 + delete_line��# 133 % fline� & insert��# 134! 1� , set_readonly/b�# 136 8 rmail_save_buffer_secure�# 137 ( pop_spot��# 138 $ cbuf� & setbuf�# 116y9 rmail_update_master_index,*�# 142 & folder % delit+��# 144 3 Rmail_Folder_Buffer� ' buffer p.w/b*�# 146 $ file+� & folder� 1 rmail_folder_file�$ file* ! n+*�# 147 % total $ n_ok ( n_unread+��# 149 3 Rmail_Folder_Buffer� & setbuf��# 150! 0� , set_readonly��# 151 ) what_line� & string�! n�# 155 # eob�$$ \n� + bskip_chars�# 156 ) what_line�% to tal�# 158 $ bobp.�# 160! 0�% total ! 0�! n/c�# 163 # bob�# 164 % total�$ n_ok�# 165! 0�( n_unread.�# 168 ) what_char.�# 169" 68x3�$ n_ok/.�# 170" 45x3�( n_unread/j�# 172 & down_1.v/b�# 173 # bol/e��# 176 & folder $ n_ok % total ( n_unread� 9 rmail_up date_master_index�# 178 % widen�# 179 # bob�# 180 ) go_down_1�# 182 ! n . line_as_stringB.�# 184 + delete_line��# 185 ! n� & insert�# 186 ' newline/c�# 188 8 rmail_save_buffer_secure�# 190 % delit.��# 192 ' whatbuf� & delbufw/c�# 198 # bob��# 199$$ \n� + bol_fsearchP ) go_down_1�# 200 - push_mark_eob & narrow�# 142y1 rmail_save_folder,*�# 203 & folder+*�# 205 $ file+� & folder� 1 rmail_folder_file�$ file��# 206 1 Rmail_Folder_Name! 1� 1 rmail_save_folder��# 207 & folder� 1 rmail_buffer_name�3 Rmail_Fo lder_Buffer��# 208 $ file� ) find_fileP�# 209 6 rmail_set_buffer_flags��# 211 3 Rmail_Folder_Buffer� - rename_buffer�# 212 & folder�1 Rmail_Folder_Name�# 217 % widen�# 218 # bob�# 219 $ eobp.��# 222$* 0\n1\n \n� & insert/c�# 203y1 rmail_find_folder,*�# 2 27 & header - continue_flag * multi_flag+*�# 229 ! h " dh+�# 231 # bob��# 232 & header� & strlow & date: A.��# 238$[ ^Date:[ ]+[a-zA-Z,]* *0?\\([1-3]?\\d\\) +\\([a-zA-Z]+\\) +� * re_fsearch.��# 239 % %s-%s�! 1� 0 regexp_nth_match�! 2� 0 regexp_nth_mat ch� ' sprintfw/c��# 240$\ ^Date:[ ]+[a-zA-Z]+ \\([a-zA-Z]+\\) +0?\\([1-3]?\\d\\)[ ,]+� * re_fsearch.��# 241 % %s-%s�! 2� 0 regexp_nth_match�! 1� 0 regexp_nth_match� ' sprintfw/c�# 242 + Null_Stringw/c�# 245 �! h.��# 246 & header� + bol_fsearch/.���# 248 & header� & strlen� ( go_right�# 250 * skip_white�# 251 ) push_mark�# 252 # eol�# 254 - continue_flag..�# 256 & down_1/.�# 258 * skip_white�# 259 $ bolp.�# 261 ) go_left_1v/c/f/c�# 267 ) bufsubstr�" dh��# 268 ! h� & strlen. ! ,�! h/c�# 269 " dh�! h�# 270 * multi_flag.v/b/f���# 273 ! h$" \n ! � ( strtrans� ' strtrimw�# 227y0 rmail_get_header,�# 278 # bob�# 279 ) push_mark��# 280$" \n� + bol_fsearch. # eob/b�# 281 & narrow�# 282 # bob�# 276y7 rmail_narrow_to_headers,*�# 288 $ from+ + Null_String�$ from* $ date+ + Null_String�$ date* ' subject+ + Null_String�' subject�# 290 ) push_spot�# 291 7 rmail_narrow_to_headers��# 293 & From: ! 0! 0� 0 rmail_get_header�$ from��# 294 $ from� & strlen.� % From ! 0! 0� 0 rmail_get_header�$ from/b��# 296 & Dat e: ! 0! 0� 0 rmail_get_header�$ date��# 297 ) Subject: ! 0! 0� 0 rmail_get_header�' subject�# 299 % widen�# 300 ( pop_spot*�# 305 % width+" 25�% width*�# 306 # len+� $ from� ( strwidth�# len�# 307 # len % width?.*�# 309 " ch ( new_from+ �( new_from �# 310 $ from� % chars.�" ch��# 312 " ch� $ char�" ch��# 313 ( new_from " ch9� ( strwidth % width?.v/c�# 315 " ch�( new_from/��# 317 ( new_from�$ from��# 318 $ from� ( strwidth�# len/c�# 320 % width # len:. ! �$ from/i��# 322$3 %6s %s %s\n $ da te $ from ' subject� ' sprintf�# 286y5 rmail_extract_headers,*�# 331 $ cbuf+ ' whatbuf�$ cbuf* ! n+��# 332 3 Rmail_Folder_Buffer� & setbuf�# 333 # bob�# 334 - push_mark_eol�# 335 0 bufsubstr_delete�! n��# 336 ! n� & strlen.� ! n� ' integer�! n/.! 0�! n/ d�# 337�! n��# 338 ! n� & string�! n�# 339 # bob��# 340 ! n� & insert�# 341 $ eobp.��# 343$) \n1\n \n� & insert/c��# 346 $ cbuf� & setbuf�# 347 ! nw�# 329y3 rmail_make_filename,*�# 353 & folder+*�# 355 # dir+� / Rmail_Directory & folder� & dircat�# dir� �# 356 # dir� + file_status. # dirw/c��# 357 # dir# 448� % mkdir.��# 358 B Unable to create folder directory.� % error/c��# 359 # dir# 448� % chmodP��# 360 & folder! 0! 0! 0� 9 rmail_update_master_index�# 361 # dirw�# 353y3 rmail_create_folder,*�# 3 66 ! h+�# 368 ) push_spot�# 370 7 rmail_narrow_to_headers��# 371 # ?Q?� ' fsearch.�# 372 9 mime_rfc1522_parse_buffer/c��# 374 ; Content-Transfer-Encoding: ! 1! 0� 0 rmail_get_header�! h�# 376 # eob�# 377 % widen���# 379 ! h� & strlow 0 quoted-printable� ) is_substr.�# 381 ) push_mark�# 382 # eob�# 383 & narrow�# 384 4 mime_qp_parse_buffer�# 385 % widen/c�# 387 ( pop_spot�# 364y0 rmail_parse_mime,*�# 393 ' headers+*�# 394 $ cbuf+ ' whatbuf�$ cbuf*�# 395 ! n+ 3 rmail_make_filename�! n* $ file+��# 397 1 R mail_Folder_Name� 3 rmail_create_folder�$ file��# 398 $ file ! n� & dircat�$ file�# 399 # bob ) push_mark�$$ \n � * skip_chars * del_region�# 400 - push_mark_eob��# 401 $ file� 4 write_region_to_fileP�# 404 0 rmail_parse_mime�# 405 5 rmail_extract_header s�' headers��# 407 3 Rmail_Folder_Buffer� & setbuf�# 408 # eob��# 410 $ -%3s ! n� ' vinsert� ' headers� & insert��# 411 $ cbuf� & setbuf�# 391y4 rmail_output_newmail,*�# 415 $ from+*�# 417 . content_length+! 0�. content_length�# 419 - push_mark_eol��# 4 20" 10� 0 bol_fsearch_char.�# 421 # eob/b�# 422 & narrow��# 423$C ^\\CContent-Length:[ ]+\\(\\d+\\)$� * re_bsearch.���# 424! 1� 0 regexp_nth_match� ' integer�. content_length/c�# 426 # bob�# 427 % widen�# 428 - push_mark_eol�# 430 . content_length.��# 432" 10� 0 bol_fsearch_char.�# 434�. content_length�# 435 . content_length� . content_length� % rightA��# 436$" \n� * skip_chars��# 437 $ from� - re_looking_at $ eobpDC.�# 439 $ eobp. ' go_up_1/b�# 440 & narroww/c/c�# 445 * pop_mark_1�# 446 - push_mark_e ol/c.��# 451 $ from� * re_fsearch.��# 453$$ \n\n� + blooking_at.�# 455 ' go_up_1v/c�# 458 # eolu/c�# 462 # eobv/e�# 466 & narrow�# 415y4 rmail_newmail_narrow,*�# 470 $ mbox . newmail_folder+*�# 472 ! n+! 0�! n* $ from+$) ^\\cFrom �$ from��# 474 . newma il_folder� 1 rmail_find_folder�# 475 # eob ) push_spot��# 476 0 *rmail-newmail*� & setbuf�# 477 , erase_buffer��# 479 $ mbox� + insert_file! 0>.� 2 File not inserted.� % error/c�# 481 # bob ) push_mark�# 483! 0� $ from� * re_fsearchA.��# 485 : New mail with no messages!� ' message�# 486 * pop_mark_1�# 487 ( pop_spot�# 488! 0w/c�# 491 * del_region��# 492" 63� 0 set_buffer_umaskP.��# 495 $ from� 4 rmail_newmail_narrow�# 496�! n���# 497 9 Processing %d messages... ! n� ' sprintf� % flush�# 498 4 rmail_o utput_newmail�# 499 , erase_buffer�# 500 % widen�# 501 $ eobp.v/c�# 502 # del/e�# 507 ' whatbuf��# 508 3 Rmail_Folder_Buffer� & setbuf�# 509 # bob��# 510$$ \n� + bol_fsearchP�# 511 ) go_down_1 - push_mark_eob & narrow�# 512 ( pop_spot���# 514 & setbuf� �# 516 . newmail_folder! 1� 1 rmail_save_folder�# 517 ! nw�# 470�5 rmail_process_newmail,*�# 521 $ file ( tmp_mbox & folder+*�# 523 ! n " st+*�# 524 & nomail # cmd+*�# 525 ' getmail+� + Jed_Bin_Dir ' getmail� & dircat�' getmail��# 527 1 No new mail in % s $ file� ' sprintf�& nomail��# 529 $ file� ) stat_file�" st�# 532 " st $ NULLA. " st"' st_size! 0>/7.��# 538 & nomail� ' message�# 539! 0w/c��# 542 3 Getting new mail...� % flush��# 544 ' getmail� + file_status! 1B.��# 546 ' getmail + not found!9� % error/c��# 549 ( %s %s %s ' getmail $ file ( tmp_mbox� ' sprintf�# cmd�# 550 ) push_mark��# 551 # cmd� + pipe_region.��# 552 7 getmail returned error.� % error/c��# 554 ( tmp_mbox & folder� 5 rmail_process_newmail�! n�# 556 ! nw�# 521y; rmail_get_newmail_ from_file,��# 561 8 Rmail_Spool_Mailbox_File . Rmail_Tmp_Mbox 4 Rmail_Newmail_Folder� ; rmail_get_newmail_from_file�# 559y1 rmail_get_newmail,*�# 566 % flags+��# 567 7 Rmail_Master_Index_File� ) find_fileP��# 568! 1� , set_readonly�# 569 6 rmail_set_bu ffer_flags��# 570 1 Rmail_Root_Buffer� - rename_buffer�# 572 # bob��# 573 , Rmail-Folder� * use_keymap�# 564y1 rmail_folder_mode,��# 578 1 Rmail_Folder_Name! 1� 1 rmail_save_folder��# 579 1 Rmail_Root_Buffer� ' bufferp.� 1 Rmail_Root_Buffer� ' pop2buf/. �# 580 1 rmail_folder_mode/d�# 582 ) onewindow��# 583 6 Rmail_Mail_Buffer_Name� ' bufferp.��# 585 6 Rmail_Mail_Buffer_Name� & delbuf�# 586 + Null_String�4 Rmail_Message_Number/c�# 588 + Null_String�6 Rmail_Mail_Buffer_Name�# 589 - clear_message�# 576y1 rm ail_exit_folder*�# 592 4 Rmail_Headers_Hidden+! 0�4 Rmail_Headers_Hidden,*�# 596 $ mark+$$ \n�$ mark�# 598! 0�4 Rmail_Headers_Hidden��# 599! 0� , set_readonly�# 600 % widen�# 601 # bob ) push_mark��# 602$" \n� + bol_fsearch. # eob/b�# 603 & narrow�# 604 # bob��# 607 $ mark� + bol_fsearch.�# 609 ) go_down_1 ) push_spot�# 612 - push_mark_eob * del_region�# 615 # bob ) push_mark� $ mark� + bol_fsearchP�# 616 ) bufsubstr # eob & insert�# 617 ( pop_spot/.��# 621 $ mark� & insert�# 622 - push_mark_eob��# 623$" \n� + bskip_chars�# 624 ) bufsubstr�# 625 # bob�# 626 & insert�# 627 ' newline��# 628! 2� ' go_down/d�# 630 ) push_mark % widen # eob & narrow�# 631 # bob�! 1� , set_readonly�# 594y4 rmail_unhide_headers,*�# 638 * ok_headers+ L From,Subj,Cc,Organ ,In-Reply,Date,Reply-To,To�* ok_headers*�# 639 & header+�# 641 4 rmail_unhide_headers�# 642! 1�4 Rmail_Headers_Hidden�# 643 % widen # bob ) push_mark��# 644$" \n� + bol_fsearch. # eob/b�# 645 & narrow�# 646 # bob��# 647$$ \n� + bol_fsearch.� 6 Unable t o find marker.� % error/b��# 648! 0� , set_readonly�# 649 ) push_spot.�# 654 # eol $ trim��# 655$# \n � * looking_at�$# \n � * looking_atD.v/b�# 658 # del�# 659 $ trim�# 660 3 insert_single_space/e�# 663 ) goto_spot��# 667 * ok_headers ! ,� & strtok�.�# 669�& header.��# 671 & header� + bol_fsearch/.��# 673 ! �� & insert/f.�# 676 & down_1�# 677 * skip_white $ bolpNC/.�# 679 # bol��# 680 ! �� & insert/f�# 683 ) goto_spot/��# 685 ( pop_spot�# 686 # eol * go_right_1.�# 688 $ eobpN/.�# 690 # bol��# 691 ! �� * looking_at.�# 693 # del�# 694 # eol * go_right_1u/c�# 698 - push_mark_eol�$" \n� * skip_chars * del_region�# 699 # eol/f�# 702 % widen�# 703 # bob��# 704$$ \n� + bol_fsearchP�# 705 ) go_down_1�# 706 - push_mark_eob & narrow�# 707 # bob�# 636y2 rma il_hide_headers,�# 715 # bol�# 716 * go_right_1 * skip_white�# 717 ) push_mark��# 718 # 0-9� * skip_chars�# 719 ) bufsubstr�# 713y9 rmail_extract_file_number,*�# 722 $ flag+*�# 724 ! n+" 13�! n* % flags+ # RFE�% flags��# 726 $ flag� $ char�$ flag��# 72 7 % flags $ flag� ) is_substr�! n��# 728 ! n� + goto_column��# 729 $ flag� * looking_at.��# 731 $ flag� & insert�# 732 # del/b�# 722y. rmail_add_flag,*�# 740 $ flag+*�# 742 # buf $ file ! n " n1 ' pop_buf # ret+��# 744 3 Rmail_Folder_Buffer� ' bufferp.! 0w/b��# 745 3 Rmail_Folder_Buffer� ' pop2buf�# 747 9 rmail_extract_file_number�$ file��# 748 $ file� & strlen.! 0w/b�# 749 $ file�4 Rmail_Message_Number��# 750! 0� , set_readonly�# 751 # bol�" 45� / looking_at_char.�# 753 # del 3 insert_single_space/c �# 756 $ flag.� $ flag� . rmail_add_flag/c��# 758! 1� , set_readonly��# 760 - Rmail: %s(%s) 1 Rmail_Folder_Name $ file� ' sprintf�# buf�# 761 # buf�' pop_buf�# 762! 2�# ret�# 764 # buf 6 Rmail_Mail_Buffer_NameB� # buf� ' bufferpND.�# 769" -1�# ret��# 7 70 6 Rmail_Mail_Buffer_Name� ' bufferp.�# 772 6 Rmail_Mail_Buffer_Name�' pop_buf/c/c��# 776 ' pop_buf� . buffer_visible.��# 778 ' pop_buf� ' pop2buf�# 779 # ret! 2A.! 1�# ret/c/.�# 785 ) onewindow��# 786# 114� + window_info�! n��# 787 ' pop_buf� ' pop2 buf�# 788 . TOP_WINDOW_ROW�# 116� + window_infoA.��# 790 3 Rmail_Folder_Buffer� ' pop2buf��# 791 ' pop_buf� & sw2buf/c��# 793# 114� + window_info�" n1�# 796 " n1! 19�! n�# 797 ! n! 4:. * enlargewin/i��# 798 3 Rmail_Folder_Buffer� ' pop2buf��# 799 ' p op_buf� ' pop2buf/d�# 802 # ret" -1B. # retw/c��# 804" 63� 0 set_buffer_umaskP��# 805! 0� , set_readonly�# 806 % widen�# 807 , erase_buffer�# 808 # buf�6 Rmail_Mail_Buffer_Name���# 809 / Rmail_Directory 1 Rmail_Folder_Name� & dircat $ file� & dircat�$ file��# 810 $ file� + insert_file�! n.��# 814! 1� , set_readonly��# 815! 0� 8 set_buffer_modified_flag/n�# 818 ! n! 0=.�# 820 + mark_buffer��# 821 $ file� 4 write_region_to_fileP��# 822 / File not found!� % error/c�# 826 # bob��# 827 # buf� - rename_bu ffer�# 829 0 rmail_parse_mime�# 831 2 rmail_hide_headers�# 832 3 EXECUTE_ERROR_BLOCK�# 834 # retw�# 740y1 rmail_get_message,��# 840! 0� 1 rmail_get_message.w/b�# 842 4 Rmail_Headers_Hidden.�# 844 4 rmail_unhide_headers/.�# 846 2 rmail_hide_headers/d��# 847! 0� 8 set_buffer_modified_flag��# 848! 1� , set_readonly��# 849 3 Rmail_Folder_Buffer� ' pop2buf�# 838y4 rmail_toggle_headers,.��# 856 3 Rmail_Folder_Buffer� ' pop2buf/n��# 858! 0� 1 rmail_get_message! 1A.��# 860! 0� 7 update_sans_update_hook��# 861 ) page_down� $ call/c�# 864 3 EXECUTE_ERROR_BLOCK�# 852y4 rmail_scroll_forward,*�# 870 # str+ ) ^ *[>:|=]�# str.��# 873 3 Rmail_Folder_Buffer� ' pop2buf/n�# 876! 1�! 0� 1 rmail_get_messageA.��# 878! 0� & update�# 879 2 goto_top_of_window�# 880 ) go_down_1��# 881 # str� * re_fsearch..�# 885 ) push_mark & narrow # bol� # str� * re_fsearch % widen.�# 886 * skip_white $ eolp/7/.�# 893 & down_1.v/b/f��# 895! 1� ( recenter/c/c�# 899 3 EXECUTE_ERROR_BLOCK�# 868y1 rmail_skip_quotes,.��# 906 3 Rmail_Fo lder_Buffer� ' pop2buf/n��# 908! 0� 1 rmail_get_message! 1A.��# 910! 0� & update��# 911 ' page_up� $ call/c�# 914 3 EXECUTE_ERROR_BLOCK�# 902y5 rmail_scroll_backward,*�# 919 + opt_headers+ $ NULL�+ opt_headers�# 920 & _NARGS! 1A.�# 921�+ opt_headers/ c��# 923 3 Rmail_Folder_Buffer� ' pop2buf�# 924 $ mail�# 927 / buffer_modified.��# 929 F Mail already being composed. Erase it� * get_yes_no.! 0w/b/c��# 932! 1 + opt_headers� 2 mail_format_buffer�# 933! 1�# 917y8 rmail_format_mail_buffer,*�# 938 $ cb uf $ subj+��# 939" 70� 1 rmail_get_message.�# 941 $ beepw/b�# 945 ' whatbuf�$ cbuf�# 947 ) push_spot�# 948 # bob�# 949 % Fwd: �$ subj��# 950 ) Subject: � + bol_fsearch.��# 952! 9� ( go_right�# 953 ) push_mark�# 954 # eol��# 955 ) Fwd: [%s] ) bufsubstr� ' sprintf�$ subj/c�# 957 ( pop_spot�# 959 8 rmail_format_mail_buffer.w/b�# 962 # eob��# 963$A ----Begin Forwarded Message----\n� & insert��# 964 $ cbuf� & insbuf��# 965$? ----End Forwarded Message----\n� & insert�# 967 # bob��# 968 ) Subject: � + bol_fsea rch.�# 970 # eol��# 971 $ subj� & insert/c�# 973 # bob�# 974 # eol�# 936y5 rmail_forward_message,*�# 980 % flags+�# 982 + getbuf_info�% flags��# 983! 0� + setbuf_info�# 985 ) push_spot�# 986 # bob..�# 990 # eol��# 991$# \n � * looking_at�$# \n � * looki ng_atD/.�# 992 # del/f/.�# 994 & down_1/k�# 996 + getbuf_infoP��# 997 % flags� + setbuf_info�# 998 ( pop_spot�# 978y4 rmail_unfold_headers,*�$ 1001 $ from $ date " cc+*�$ 1003 # you+ # you�# you��$ 1005 " cc� & strlen� $ from� & strlenC. $ from�# you/c ��$ 1006 $ date� & strlen.��$ 1007$1 On %s, %s said:\n $ date # you� ' vinsert/.��$ 1009$* %s said:\n # you� ' vinsert/d�$ 1001y8 rmail_insert_attribution,*�$ 1012 $ from+*�$ 1014 # pos # len+.��$ 1020 $ from$. \\(([^()]*)\\)! 1� , string_match�# pos # pos/.��$ 1022! 1� 0 string_match_nth�# len�# pos��$ 1023 $ from! 1 # pos� + substrbytes� $ from # pos # len9! 19" -1� + substrbytes9�$ from/f��$ 1027 $ from ! " ! "� 4 str_uncomment_string�$ from.��$ 1033 $ from$? ,?\\([^,]*<\\([^>]*\\)>[^,]*\\)! 1� , string_match�# pos # pos/.*�$ 1035 $ pos1 $ len1+��$ 1037! 1� 0 string_match_nth�# len�# pos��$ 1038! 2� 0 string_match_nth�$ len1�$ pos1��$ 1040 $ from! 1 # pos� + substrbytes��$ 1041 $ from $ pos1! 19 $ len1� + substrbytes9��$ 1042 $ from # pos # len9! 19" -1� + substrbytes9�$ 1040�$ from/f����$ 1046 $ from$$ \n� + strcompress ! ! ,� ( strtrans ! ,� + strcompressw�$ 1012y9 rmail_parse_email_address,*�$ 1049 $ from+*�$ 1051 % sub_f ! n # num+�$ 1055 ! ,�$ 1056! 0�! n�$ 1057! 0�# num��$ 1 059 $ from� & strlow�$ from.��$ 1060 $ from ! n" 44� / extract_element�% sub_f % sub_f $ NULLB/.�$ 1062�! n*�$ 1063 $ pats+*�$ 1064 ' matches+�$ 1066 ! ^� 3 Rmail_Dont_Reply_To" 44" 92� ' strchop9 ! $9�$ pats��$ 1067 ( Int_Type}, string_match % sub_f $ pats! 1� ) array_map�' matches��$ 1068 ' matches� # any.�$ 1070 % sub_f�$ 1071�# num/b/f��$ 1074 # num� 7 create_delimited_string�$ 1049y9 rmail_apply_dont_reply_to,��$ 1079" 82� 1 rmail_get_message.�$ 1081 $ beepw/b*�$ 1085 $ subj " cc " to ' replyt o $ from % msgid+ $ NULL�% msgid*�$ 1086 $ date+ �$ date*�$ 1088 $ cbuf+ ' whatbuf�$ cbuf�$ 1090 ) push_spot*�$ 1091 . headers_hidden+ 4 Rmail_Headers_Hidden�. headers_hidden�$ 1092 4 rmail_unhide_headers�$ 1093 7 rmail_narrow_to_headers��$ 1094! 0� 8 set_buffer_modified_flag��$ 1095! 1� , set_readonly��$ 1097 * Reply-To: ! 1! 0� 0 rmail_get_header�' replyto��$ 1098 ' replyto� & strlen.��$ 1099 & From: ! 1! 0� 0 rmail_get_header�' replyto/b��$ 1101 $ To: ! 1! 1� 0 rmail_get_header�" to��$ 1103 ) Subject: ! 1! 0� 0 rmail_get_header�$ subj��$ 1104 $ subj� & strlen.�$ 1105 , (No Subject)�$ subj/b��$ 1107 , Message-ID: ! 1! 0� 0 rmail_get_header�% msgid��$ 1109 # Cc:! 1! 1� 0 rmail_get_header�" cc�$ 1111 2 Rmail_Ask_About_Cc� " cc� & strlenC.. �$ 1115 �" cc�$ 1116 , _clear_error/n��$ 1118 6 Include the cc: header� * get_yes_no.�$ 1119 + Null_String�" cc/b/c�$ 1122 ! , " to9�" cc���$ 1123 " cc� 9 rmail_parse_email_address� 9 rmail_apply_dont_reply_to�" cc��$ 1125 ' replyto� 9 rmail_parse_email _address�' replyto��$ 1127 & From: ! 1! 0� 0 rmail_get_header�$ from�$ 1129 # eob��$ 1131$4 ^Date:[ ]*\\(.*\\)$� * re_bsearch.��$ 1132! 1� 0 regexp_nth_match�$ date/c�$ 1134 % widen�$ 1136 . headers_hidden.�$ 1138 2 rmail_hide_headers��$ 1139! 0� 8 s et_buffer_modified_flag��$ 1140! 1� , set_readonly/c�$ 1143 ( pop_spot*�$ 1145 + opt_headers+ $ NULL�+ opt_headers�$ 1146 % msgid B.��$ 1147$1 In-Reply-To: %s\n % msgid� ' sprintf�+ opt_headers/c��$ 1149 + opt_headers� 8 rmail_format_mail_buffer.w/b�$ 1152 # bob.��$ 1155 # To:� * looking_at.�$ 1157 # eol��$ 1158 ' replyto� & insert/.��$ 1160 # Cc:� * looking_at.�$ 1162 # eol��$ 1163 " cc� & insert/.��$ 1165 ( Subject:� * looking_at.�$ 1167 # eol�$ 1168 ) push_spot��$ 1169 $ subj� & insert�$ 1170 ( pop_ spot��$ 1171 # Re:� * looking_at.� $ Re: � & insert/b/c/d/d/.�$ 1174 & down_1� ) X-Mailer:� * looking_atNC/k�$ 1176 # eob��$ 1178$% -- \n� + bol_bsearch.�$ 1179 $ up_1/c�$ 1181 ) push_mark�$ 1182 & narrow�$ 1184 , erase_buffer��$ 1186 $ cbuf� & insbuf�$ 1187 # bob��$ 1189 $ from $ date " cc� 8 rmail_insert_attribution�$ 1190 ) push_spot.�$ 1193 # bol��$ 1194" 62� + insert_char/.�$ 1196 & down_1/k�$ 1197 ' newline�$ 1198 ( pop_spot�$ 1199 % widen��$ 1201 " to� & strlen.�$ 1203 # bob # eol/b�$ 1077y+ rma il_reply,*�$ 1209 $ file+��$ 1211 = Are you sure you want to edit� * get_y_or_n.w/b��$ 1213" 69� 1 rmail_get_message.w/b���$ 1218 / Rmail_Directory 1 Rmail_Folder_Name� & dircat 4 Rmail_Message_Number� & dircat�$ file�$ 1220! 1� $ file� + file_statusB. ��$ 1221 1 Unable to read %s $ file� & verror/c��$ 1223! 0� 8 set_buffer_modified_flag��$ 1224 ' whatbuf� & delbuf��$ 1226 $ file� ) find_fileP�$ 1227 ) text_mode�$ 1229 4 set_buffer_no_backup�$ 1207y* rmail_edit,�$ 1235 ) push_mark.�$ 1236 & down_1�" 68� / looking_at_charC/./f�$ 1237 $ eobp.�$ 1239 * pop_mark_1��$ 1240 ; No more undeleted messages.� ' message�$ 1241! 0w/c�$ 1243 * pop_mark_0�$ 1244! 1�$ 1233y7 rmail_find_next_message,�$ 1249 ) push_mark.�$ 1250 $ up_1 # bol�" 68� / looking_at_cha rC/./f�$ 1251 $ bobp�" 68� / looking_at_charC.�$ 1253 * pop_mark_1��$ 1254 ; No more undeleted messages.� ' message�$ 1255! 0w/c�$ 1257 * pop_mark_0�$ 1258! 1�$ 1247y7 rmail_find_prev_message,�$ 1263 # bol�$ 1264 $ eolp. $ beepw/c��$ 1265" 68� / loo king_at_char.��$ 1267! 0� , set_readonly�$ 1268 # del�" 68� + insert_char��$ 1269! 1� , set_readonly/b�$ 1261y0 rmail_delete_cmd,�$ 1275 0 rmail_delete_cmd�$ 1276 7 rmail_find_prev_messageP�$ 1273y5 rmail_delete_backward,�$ 1281 0 rmail_delete_cmd�$ 1282 7 rmail_find_next_messageP�$ 1279y4 rmail_delete_forward,�$ 1287 - push_mark_eol��$ 1288" 68� 0 bol_bsearch_char.��$ 1290! 0� , set_readonly�$ 1291 # del 3 insert_single_space��$ 1292! 1� , set_readonly�$ 1293 * pop_mark_0w/c�$ 1296 * pop_mark_1� $ 1297 $ beep�$ 1285y. rmail_undelete,�$ 1302 7 rmail_find_next_message.�$ 1304 4 rmail_scroll_forward/c�$ 1300y2 rmail_next_message,�$ 1310 7 rmail_find_prev_message.�$ 1312 4 rmail_scroll_forward/c�$ 1308y2 rmail_prev_message,*�$ 1316 & folder+*�$ 13 18 ! n+��$ 1319 & folder� 1 rmail_find_folder�$ 1320 # bob�$ 1321 ) go_down_1��$ 1322 . line_as_string� ' integer�! n��$ 1323$$ \n� + bol_fsearchP�$ 1324 ) go_down_1�$ 1325 - push_mark_eob�$ 1326 & narrow��$ 1327 ' whatbuf� ' pop2buf��$ 1328 ! n� ) goto _line # bol��$ 1329 * Rmail-Read� * use_keymap��$ 1330 < Jed %b Folder. (%p) %t! 0� / set_status_line��$ 1331! 1� , set_readonly��$ 1332 1 rmail_folder_hook� . run_mode_hooks�$ 1316y3 rmail_select_folder,*�$ 1337 % slist+ + Null_String�% slist*�$ 1338 $ cbuf+ ' whatbuf�$ cbuf��$ 1340 1 Rmail_Root_Buffer� & setbuf�$ 1341 - push_spot_bob.��$ 1342 ( Folder: � + bol_fsearch/.��$ 1344! 8� ( go_right�$ 1345 * skip_white�$ 1346 ) push_mark��$ 1347 ! � % ffindP�$ 1348 ! , ) bufsubstr9�% slist/f�$ 1350 ( pop_spot��$ 1351 $ cbuf� & setbuf�$ 1352 % slist�$ 1335y7 rmail_build_folder_list,*�$ 1355 & folder+��$ 1357 / Rmail_Directory & folder� & dircat�& folder��$ 1358 & folder� + file_status! 2Aw�$ 1355�- folder_exists,*�$ 1361 . default_folder+*�$ 1363 & folder ' new_dir+��$ 1365 / Move to folder:�$ 1366 . default_folder�$ 1367 7 rmail_build_folder_list��$ 1365 ; read_string_with_completion�& folder��$ 1369 & folder� & strlenN.�$ 1370 $ NULLw/c�$ 1372 & folder 1 Rmail_Folder_NameA.�$ 1373 & folderw/c�$ 1375! 0� & folder� - folder_existsA.�$ 1377! 1�� C Folder %s does not exist, create it & folder� ' sprintf� * get_yes_noB.�$ 1378 $ NULLw/c��$ 1380 & folder� 3 rmail_create_folderP/c�$ 1383 & folderw�$ 1361�3 query_create_folder,*�$ 1388 ! n+*�$ 1389 $ file+ 8 Rmail_Spool_Mailbox_File�$ file*�$ 1390 & folder+�$ 1392 4 Rmail_Newmail_Folder�& folder�$ 1394" -1�" -1� / prefix_argumentB.��$ 1396 . Input MailBox:� 3 read_file_from_mini�$ file��$ 1397 $ file� & strlen.w/b��$ 1399 & folder� 3 query_create_ folder�& folder�$ 1400 & folder $ NULLA.w/c/c��$ 1404 $ file . Rmail_Tmp_Mbox & folder� ; rmail_get_newmail_from_file�! n�$ 1406 ! n.���$ 1408 0 %d new messages. ! n� ' sprintf� % flush��$ 1409 & folder� 3 rmail_select_folder/c�$ 1386y4 rmail_folder_newma il*�$ 1414 1 Rmail_Last_Folder+ + Null_String�1 Rmail_Last_Folder,*�$ 1421 # vis+! 0�# vis*�$ 1422 # buf+� - Rmail: %s(%s) 1 Rmail_Folder_Name 4 Rmail_Message_Number� ' sprintf�# buf��$ 1424 # buf� ' bufferp.��$ 1426 # buf� . buffer_visible�# vis��$ 142 7 # buf� & delbuf/c�$ 1429 # visw�$ 1419y6 rmail_validate_message,*�$ 1434 % new_n+�$ 1436 # eob��$ 1437$$ \n � + bskip_chars�$ 1438 # bol�$ 1439 9 rmail_extract_file_number�% new_n��$ 1440 % new_n� & strlen. ! 0�% new_n/b�$ 1441 % widen�$ 1443 # bob - push_mark_eol�$ 1444 ) bufsubstr % new_nB.�$ 1446 + delete_line��$ 1447 % new_n� & insert�$ 1448 ' newline/c��$ 1450$$ \n� + bol_fsearchP�$ 1451 ) go_down_1 - push_mark_eob & narrow�$ 1453 * pop_mark_1��$ 1454 1 Rmail_Folder_Name! 0� 1 rmail_save_folde r�$ 1432y< rmail_update_folder_and_save,*�$ 1460 ! n $ file ( new_file # dir % new_n+ ! 0�% new_n*�$ 1461 . update_message+! 0�. update_message*�$ 1462 ' res_fmt+ > Resequencing folder [%d/%d]...�' res_fmt*�$ 1463 $ nmax+.�$ 1467 < rmail_update_folder_a nd_save�$ 1468 ( pop_spot/n�$ 1471 ) push_spot��$ 1472! 0� , set_readonly��$ 1473 / Rmail_Directory 1 Rmail_Folder_Name� & dircat�# dir�$ 1475! 0�! n�$ 1476 # eob�$ 1477 ) what_line! 1:�$ nmax�$ 1478 # bob���$ 1480 ' res_fmt ! n $ nmax� ' sprintf� % fl ush.�$ 1482 9 rmail_extract_file_number�$ file� $ file� & strlen/.�$ 1484�! n��$ 1485 ! n� & string�% new_n�$ 1487 ! n" 10E.���$ 1488 ' res_fmt ! n $ nmax� ' sprintf� % flush/b�$ 1490 $ file % new_nB.��$ 1492 # dir $ file� & dircat�$ file��$ 1493 # dir % new_n� & dircat�( new_file��$ 1494 ( new_file� + file_status.��$ 1495 H File %s exists. Cannot rename %s to it.�$ 1496 ( new_file $ file��$ 1495 & verror/c��$ 1498 $ file ( new_file� + rename_file.��$ 1499 / Error renaming $ file� % error/c�$ 1501 # bo l�$ 1502 * go_right_1�$ 1503 ) push_mark�$ 1504 * skip_white��$ 1505 # 0-9� * skip_chars�$ 1506 * del_region��$ 1507 # %3s % new_n� ' vinsert�$ 1508 % new_n 4 Rmail_Message_NumberA.�$ 1510 6 rmail_validate_message�. update_message/c/c�$ 1514 & down_1.v/b/ f�$ 1518 < rmail_update_folder_and_save�$ 1520 ( pop_spot�$ 1521 # eol�$" \n� + bskip_chars # bol��$ 1522! 1� , set_readonly�$ 1523 . update_message� % new_n� ' integer� 4 Rmail_Message_Number� ' integer=D.�$ 1525 + Null_String�4 Rmail_Message_Number�$ 1526 4 rmail_scroll_forward/c��$ 1529 % done.� ' message�$ 1458y7 rmail_resequence_folder,*�$ 1536 & folder+ $ NULL�& folder* & header % old_n % new_n ( new_file ( old_file+*�$ 1537 * old_folder+ 1 Rmail_Folder_Name�* old_folder*�$ 1538 # buf # vis+�$ 15 40 & _NARGS.�$ 1541�& folder/c*�$ 1543 ' new_dir ' old_dir+� / Rmail_Directory 1 Rmail_Folder_Name� & dircat�' old_dir�$ 1545 9 rmail_extract_file_number�% old_n��$ 1546 % old_n� & strlen.w/b�$ 1550 & folder $ NULLA.! 0� & folder� - folder_existsA/7.��$ 1555 1 Rmail_Last_Folder� 3 query_create_folder�& folder/c�$ 1557 & folder $ NULLA.w/c��$ 1560 / Rmail_Directory & folder� & dircat�' new_dir�$ 1563 . line_as_string�& header��$ 1565 & folder� 1 rmail_find_folder�$ 1570 3 rmail_make_filename�% new_n��$ 15 71 ' new_dir % new_n� & dircat�( new_file��$ 1572 ' old_dir % old_n� & dircat�( old_file��$ 1574 ( old_file ( new_file� + rename_file.��$ 1576 * old_folder� 3 rmail_select_folder��$ 1577 6 Unable to rename file.� % error/c�$ 1579 # eob��$ 1580 & header� & insert�$ 1581 # bol�$ 1582 * go_right_1�$ 1583 ) push_mark�$ 1584 * skip_white��$ 1585 # 0-9� * skip_chars�$ 1586 * del_region��$ 1587 # %3s % new_n� ' vinsert�$ 1588 & folder�1 Rmail_Last_Folder�$ 1591 # bob��$ 1592$$ \n� + bol_fsearchP�$ 1593 ) go_do wn_1�$ 1594 - push_mark_eob�$ 1595 & narrow��$ 1597 * old_folder� 3 rmail_select_folder��$ 1598! 0� , set_readonly�$ 1599 # bob��$ 1600 & header� + bol_fsearchP�$ 1601 + delete_line�$ 1602 7 rmail_resequence_folder�$ 1534y6 rmail_output_to_folder,�$ 160 7 ) push_spot�$ 1608 + mark_buffer��$ 1609! 0� 1 set_region_hidden�$ 1610 ( pop_spot�$ 1605y4 rmail_unhide_deleted,�$ 1615 ) push_spot�$ 1616 4 rmail_unhide_deleted�$ 1617 # bob.��$ 1618" 68� 0 bol_fsearch_char/.��$ 1620! 1� / set_line_hidden�$ 1621 # eol/f�$ 1623 ( pop_spot�$ 1613y2 rmail_hide_deleted,*�$ 1634 $ file # dir ! n ( new_file+��$ 1636 5 Expunging messages...� % flush�$ 1637 ) push_mark.�$ 1640 7 rmail_resequence_folder�$ 1641 * pop_mark_0��$ 1642! 1� , set_readonly/n��$ 1644! 0� , set _readonly��$ 1645 / Rmail_Directory 1 Rmail_Folder_Name� & dircat�# dir�$ 1646 # bob.��$ 1647" 68� 0 bol_fsearch_char/.�$ 1649 9 rmail_extract_file_number�$ file��$ 1650 $ file� & strlen.u/b��$ 1656 # dir $ file� & dircat�$ file�$ 1657! 1� $ file� + fil e_statusB.��$ 1658 1 Unable to access $ file� % error/c��$ 1660 $ file� + delete_file.��$ 1661 1 Unable to delete $ file� % error/b�$ 1663 + delete_line/f�$ 1665 * pop_mark_1�$ 1666 7 rmail_resequence_folder�$ 1632y6 rmail_xpunge_deletions�$ 1670 * Rma il-Read�" $1��$ 1671 " $1� ( keymap_p.��$ 1673 " $1� + make_keymap�$ 1674" 32# 127! 1.���$ 1676 $ char�" $2��$ 1677 " $2 " $1� + undefinekey/h��$ 1680 1 rmail_skip_quotes ! " $1� ) definekey��$ 1681 5 rmail_delete_backward ! D " $1� ) definekey��$ 1 682 4 rmail_delete_forward ! d " $1� ) definekey��$ 1683 1 rmail_exit_folder ! q " $1� ) definekey��$ 1684 1 rmail_exit_folder ! Q " $1� ) definekey��$ 1685 4 rmail_folder_newmail ! g " $1� ) definekey��$ 1686 4 rmail_folder_newmail ! G " $1� ) definekey� �$ 1687 2 rmail_next_message ! n " $1� ) definekey��$ 1688 2 rmail_next_message ! N " $1� ) definekey��$ 1689 2 rmail_prev_message ! p " $1� ) definekey��$ 1690 2 rmail_prev_message ! P " $1� ) definekey��$ 1691 4 rmail_toggle_headers ! t " $1� ) defineke y��$ 1692 4 rmail_toggle_headers ! T " $1� ) definekey��$ 1693 4 rmail_scroll_forward ! " $1� ) definekey��$ 1694 4 rmail_scroll_forward$" \r " $1� ) definekey��$ 1695 5 rmail_scroll_backward " ^? " $1� ) definekey��$ 1696 6 rmail_xpunge_deletions ! x " $1� ) definekey��$ 1697 6 rmail_xpunge_deletions ! X " $1� ) definekey��$ 1698 + rmail_reply ! r " $1� ) definekey��$ 1699 + rmail_reply ! R " $1� ) definekey��$ 1700 5 rmail_forward_message ! f " $1� ) definekey��$ 1701 5 rmail_forward_message ! F " $1� ) definekey��$ 1702 6 rmail_output_to_folder ! o " $1� ) definekey��$ 1703 . rmail_undelete ! u " $1� ) definekey��$ 1704 . rmail_undelete ! U " $1� ) definekey��$ 1705 * rmail_edit ! E " $1� ) definekey��$ 1706 $ mail ! m " $1� ) definekey��$ 1707 $ mai l ! M " $1� ) definekey/b,�$ 1715 # bol��$ 1716 ( Folder: � * looking_at. $ beepw/b��$ 1717 ! � % ffindP�$ 1718 * skip_white�$ 1719 ) push_mark��$ 1720 " (� % ffind.��$ 1722! 0� ( pop_mark�$ 1723 $ beepw/b��$ 1727 ) bufsubstr� 3 rmail_select_folder�$ 1713y8 rmail_select_this_folder�$ 1735 , Rmail-Folder�" $1��$ 1736 " $1� ( keymap_p.��$ 1738 " $1� + make_keymap�$ 1739" 32# 127! 1.���$ 1741 $ char�" $2��$ 1742 " $2 " $1� + undefinekey/h��$ 1744 4 rmail_folder_newmail ! g " $1� ) definekey��$ 1745 4 rmail_folder_newmail ! G " $1� ) definekey��$ 1746 0 rmail_quit_rmail ! q " $1� ) definekey��$ 1747 0 rmail_quit_rmail ! Q " $1� ) definekey��$ 1748 8 rmail_select_this_folder ! " $1� ) definekey��$ 1749 8 rmail_select_this_folder$" \r " $1� ) defineke y��$ 1750 $ mail ! m " $1� ) definekey��$ 1751 $ mail ! M " $1� ) definekey/b,*�$ 1756 # lck+*�$ 1758 $ lpid ( this_pid+� & getpid� & string�( this_pid* & do_del+*�$ 1759 # lfn+ , ___LOCKED___�# lfn*�$ 1760 ) lock_file+� / Rmail_Directory # lfn� & dircat �) lock_file*�$ 1761 # ret+! 0�# ret* ( write_it+! 0�( write_it*�$ 1762 & errbuf+*�$ 1763 ' ourhost+� $ HOST� & getenv�' ourhost ' ourhost $ NULLA. �' ourhost/c*�$ 1764 ( lockhost+ + Null_String�( lockhost*�$ 1765 + lock_buffer+*�$ 1766 % flags+�$ 176 8 ! # lfn9�+ lock_buffer.��$ 1771 + lock_buffer� ' bufferp.��$ 1773 + lock_buffer� & setbuf��$ 1774! 0� 8 set_buffer_modified_flag��$ 1775 + lock_buffer� & delbuf/c/n�$ 1778 3 EXECUTE_ERROR_BLOCK��$ 1781 ) lock_file� ) read_fileP - clear_message�$ 1782 + getbuf_info�% flagsP��$ 1783 + lock_buffer % flags� + setbuf_info�$ 1784 4 set_buffer_no_backup�$ 1787 # bob ) push_mark��$ 1788" 58� * ffind_char.�$ 1790 ) bufsubstr�( lockhost�$ 1791 * go_right_1�$ 1792 ) push_mark/c�$ 1794 # eol ) bufsubstr�$ lpid� $ 1796 + delete_line��$ 1798 % %s:%s ' ourhost ( this_pid� ' vinsert�$ 1800 # lck.��$ 1802 ( lockhost� & strlen.�$ 1804 ( lockhost ' ourhostB.��$ 1806 S Pid %s on host %s is locking the mail file. Sorry.�$ 1807 $ lpid ( lockhost��$ 1806 & verror/c/c���$ 1812 $ lpid� ' integer! 0� $ kill. �$ lpid/c��$ 1814 $ lpid� & strlen $ lpid ( this_pidBC.��$ 1816 I Pid %s is locking mail directory. Sorry.�$ 1817 $ lpid��$ 1816 & verror/c�$ 1819 + save_buffer�$ 1823 , erase_buffer�$ 1824 6 rmail_set_buffer_flags�$ 1825! 1w/c�$ 1836 ( lockhost ' ourhostA $ lpid ( this_pidAC.��$ 1837 ) lock_file� + delete_fileP/c��$ 1840 + lock_buffer� ' bufferp.��$ 1842 + lock_buffer� & setbuf��$ 1843! 0� 8 set_buffer_modified_flag��$ 1844 + lock_buffer� & delbuf/c�$ 1846! 0w�$ 1756y5 rmail_check_lock_file,�$ 1851 1 rmail_exit_folder�$ 1853 8 rmail_save_buffer_secure��$ 1854 1 Rmail_Root_Buffer� & delbuf��$ 1855! 0� 5 rmail_check_lock_fileP�$ 1849y0 rmail_quit_rmail,*�$ 1861 ! n+��$ 1862! 1� 5 rmail_check_lock_file.w/b��$ 18 64 1 Rmail_Folder_Name! 1� 1 rmail_save_folder�$ 1865 + Null_String�3 Rmail_Folder_Buffer�$ 1867 1 rmail_folder_mode�$ 1869 1 rmail_get_newmail�! n�$ 1870 ! n.���$ 1872 0 %d new messages. ! n� ' sprintf� % flush��$ 1873 4 Rmail_Newmail_Folder� 3 rmail_se lect_folder/c�$ 1859y% rmail