.#ýü" 81$ globþ ' require*ü" 83 0 Dired_Quick_Help+n d:tag file, u:untag, x:delete tagged files, r:rename, h:more help, ?:this help°0 Dired_Quick_Help*ü" 84 , Dired_Buffer+' *dired*°, Dired_Buffer*ü" 85 7 Dired_Current_Directory+*ü" 86 5 Dired_Move_Tar get_Dir+ýü" 88 , Dired_Bufferþ ( keymap_p.ý , Dired_Bufferþ + make_keymap/býü" 90* dired_find$" \r , Dired_Bufferþ ) definekeyýü" 91* dired_find! f , Dired_Bufferþ ) definekeyýü" 92* dired_view! v , Dired_Bufferþ ) definekeyýü" 93) dired_tag! d , D ired_Bufferþ ) definekeyýü" 94/ . 1 dired_untag! u , Dired_Bufferþ ) definekeyýü" 95* dired_move! m , Dired_Bufferþ ) definekeyýü" 96, dired_delete! x , Dired_Bufferþ ) definekeyýü" 97/ . 1 dired_point" ^N , Dired_Bufferþ ) definekeyýü" 98/ . 1 d ired_point! n , Dired_Bufferþ ) definekeyýü" 99/ . 1 dired_point! , Dired_Bufferþ ) definekeyýü# 1003 . 1 chs dired_point" ^P , Dired_Bufferþ ) definekeyýü# 1013 . 1 chs dired_point! p , Dired_Bufferþ ) definekeyýü# 1033 . 1 chs dired_untag" ^? , Dired_Bufferþ ) definekeyýü# 1081 dired_flag_backup! ~ , Dired_Bufferþ ) definekeyýü# 109, dired_rename! r , Dired_Bufferþ ) definekeyýü# 1100 dired_reread_dir! g , Dired_Bufferþ ) definekeyýü# 111- describe_mode! h , Dired_Bufferþ ) definekeyý ü# 1120 dired_quick_help! ? , Dired_Bufferþ ) definekeyýü# 113* dired_quit! q , Dired_Bufferþ ) definekey,ýü# 117 , Dired_Bufferþ & delbufü# 115y* dired_quit,*ü# 120 " st+*ü# 122 ! iü# 123 $ mode+ " st"' st_mode°$ mode*ü# 124 ( is_types+ý# reg# di r# lnk# chr$ fifo$ sock# blkà°( is_types*ü# 125 * type_codes+ý" 45# 100# 108" 99# 112# 115" 98à°* type_codes*ü# 127 + mode_string+ý" 10 ) Char_Type!°+ mode_string" 45ýã + mode_string ü# 129! 0ý ( is_typesþ & length! 1:! 1.°! iýýü# 131 ! i ( is_types! $ modeþ ' stat_is.u/býü# 133 ! i * type_codes!ý! 0 + mode_string v/hü# 137 $ mode ' S_IRUSRF.# 114ý! 1 + mode_string /cü# 138 $ mode ' S_IWUSRF.# 119ý! 2 + mode_string /cü# 139 $ mode ' S_IXUSRF.# 120ý! 3 + mode_string /cü# 150 $ mode ' S_IRGRPF.# 114ý! 4 + mode_string /cü# 151 $ mode ' S_IWGRPF.# 119ý! 5 + mode_string /cü# 152 $ mode ' S_IXGRPF.# 120ý! 6 + mode_string /cü# 157 $ mode ' S_IROTHF.# 114ý! 7 + mode_string /cü# 158 $ mode ' S_IWOTHF.# 119ý! 8 + mode_string /cü# 159 $ mode ' S_IXOTHF.# 120ý! 9 + mode_string /cýýü# 164 + mode_stringþ 0 array_to_bstring + String_Typeþ ( typecastwü# 120…2 mode_to_modestring,*ü# 167 # str+*ü# 170 ( badchars+$& > \n"°( badcharsü# 172 # strý # str ( badcharsþ 0 str_delete_charsA.ü# 173 # strw/c*ü# 175 & newstr+! "°& newstrü# 176! ^ ( badchars9$" \\9°( badchars*ü# 177 ! i " i0+! 0°" i0* ! n+ý # strþ * strbytelen°! n.ýü# 179 # str ( badchars " i0þ , strskipbytes°! i ! i ! n=/.*ü# 181 " ch+ý ! i # str!°" chü# 182 & newstrýý " i0 ! i! 1:á # str!9°& newstrü# 183 & newstrý$' \\x%02X " chþ ' sprintf9°& newstrü# 184 ! i! 19°" i0/fü# 186 & newstrýý " i0 ! i! 1:á # str!9! "9°& newstrü# 188 & newstrwü# 167…- escape_string,*ü# 191 # pat+*ü# 193 ( this_dir+*ü# 194 " st+ý # patþ ) stat_ file°" stü# 195 " st $ NULLB.ý# dir " st"' st_modeþ ' stat_is/6.ü# 197 # pat°( this_dirýýü# 198 # pat! *þ + path_concatý # pat" .*þ + path_concatà°# pat/.ýü# 201 # patþ , path_dirname°( this_dir/d*ü# 203 $ file % files+ý # patþ $ glob°% files*ü# 204 ! i ! n+ý % filesþ & length°! n*ü# 205 % stats+ý ! n + Struct_Type!°% stats*ü# 206 % sizes+ý ! n + UInt64_Type!°% sizesýýü# 208 % filesþ * array_sort % files!°% filesü# 209! 0 ! n! 1:! 1.°! iýü# 211 ! i % files!°$ fileýü# 212 $ fileþ * lstat_file°" stü# 213 " st $ NULLA.u/cü# 215 " stý ! i % stats ü# 216 " st"' st_sizeý ! i % sizes /h*ü# 219 ( max_size+! 0°( max_sizeýü# 220 % sizesþ & length.ýü# 221 % sizesþ # max°( max_size/c*ü# 223 ) numdigits+! 0°) numdigits.ü# 226" 10´( max_sizeü# 227·) numdigits /.ü# 229 ( max_size/k*ü# 231 # fmt+/ %10s %6S %6S ý& %%%dS ) numdigitsþ ' sprintf9ü# 232$) %s %s%s\n9ü# 231°# fmt*ü# 234 + mode_string+ $ NULL°+ mode_string* $ mode+ $ NULL°$ mode*ü# 235 * six_months+ % _time$ 3600" 24;" 30;! 6;:°* six_monthsü# 237! 0 ! n! 1:! 1.°! iýü# 239 ! i % stats!°" stü# 240 " st $ NULLA.u/cü# 243 $ mode " st"' st_modeB.ü# 245 " st"' st_mode°$ modeýü# 246 " stþ 2 mode_to_modestring°+ mode_string/c*ü# 249 % mtime " tm+ü# 251 " st"( st_mtime°% mtimeýü# 252 % mtimeþ ) loca ltime°" tmü# 254 " tm $ NULLA.ü# 255, Jan 01 1980°% mtime/.ü# 258 % mtime * six_months=.ýü# 259) %b %d %Y " tmþ ( strftime°% mtime/.ýü# 261+ %b %d %H:%M " tmþ ( strftime°% mtime/d/d*ü# 263 ' symlink+ °' symlinkýü# 265 ! i % files!°$ fileýü# 267# l nk $ modeþ ' stat_is.ýýü# 269 ( this_dir $ fileþ + path_concatþ ( readlink°' symlinkü# 270 ' symlink $ NULLA.ü# 271" ??°' symlink/cü# 273$ -> ý ' symlinkþ - escape_string9°' symlink/cýýü# 276 $ fileþ - path_basenameþ - escape_string°$ fileýü# 278 # fmt ü# 279 + mode_string " st"& st_uid " st"& st_gid " st"' st_sizeü# 280 % mtime $ file ' symlinkþü# 278 ' vinsert/hü# 191…8 insert_directory_listing,*ü# 285 # dir+*ü# 287 $ file % flags+*ü# 296 ( want_dir+ýü# 297 # dirþ + file_status! 2A.ýýü# 299 # dir , Dired_Bufferþ & dircatþ . parse_filenameP°( want_dir/.ýü# 306 # dirþ . parse_filename°# dir°( want_dir/dýü# 308 ( want_dirþ 2 change_default_dir.ýü# 3090 Failed to chdir.þ % error/cü# 310 ( want_dir°7 Dired_Current_Directoryýü# 311 , Dired_Bufferþ & sw2 bufü# 312 + getbuf_info°% flagsPP°$ fileýü# 313 $ file 7 Dired_Current_Directory , Dired_Buffer % flagsþ + setbuf_infoýü# 314Q DIRED: %b (%m%n) (%p) | press '?' for help.! 0þ / set_status_lineýü# 315! 0þ , set_readonlyü# 316 , erase_bufferýü# 317 , Dired_Bufferþ * use_keymapýü# 318% dired! 0þ ( set_modeýü# 320 # dirþ 8 insert_directory_listingü# 322 # bobýü# 323# == þ & insertýü# 324 7 Dired_Current_Directoryþ & insertü# 325 ' newlineýü# 326! 0þ 8 set_buffer_modified_flagý! 1þ , set_readonly ýü# 327 þ % flushü# 285y. dired_read_dir,ýü# 332 0 Dired_Quick_Helpþ ' messageü# 330y0 dired_quick_help,ýü# 337 7 Dired_Current_Directoryþ . dired_read_dirü# 335y0 dired_reread_dir,*ü# 341 $ dirn+ü# 343 $ dirn! 0?. ) go_down_1/. $ dirn! 0=. ' go_up _1/c/dü# 345 . bol_skip_whiteýü# 346# 108þ / looking_at_char.ýü# 348" ->þ % ffindPü# 349 + bskip_white/.ü# 351 # eol/dýü# 353$$ ^ \nþ + bskip_charsü# 341y+ dired_point,ü# 359 # bolü# 360 $ bobp.w/cýü# 361! 0þ , set_readonlyü# 362 ) push_mark ) go_down _1ü# 363 * del_regionýü# 364! 0þ 8 set_buffer_modified_flagýü# 365! 1þ , set_readonlyýü# 366! 0þ + dired_pointü# 357y/ dired_kill_line,ü# 372 ) push_spotü# 373 ) push_markýü# 374" 34þ / looking_at_char.ýü# 376! 1þ ( go_rightýü# 377" 34þ * ffind_cha r.ýü# 378! 1þ ( go_right/c/.ýü# 380$% ^ \nþ * skip_chars/d*ü# 382 $ name+ý ) bufsubstrþ ' strtrim°$ nameü# 383 ( pop_spotýü# 385! 0 $ name!" 34A../.ýü# 389 $ nameþ $ eval°$ name/.ü# 391 ( AnyError/. °$ name/./‡/cü# 393 $ namewü# 370…9 extract_filena me_at_point,*ü# 406 $ name $ type # ext ( stat_buf+ü# 408 # bolü# 409 $ bobp.ü# 410 ! 0w/cýü# 412! 2þ ( go_rightü# 414! 1°$ typeýü# 415# 100þ / looking_at_char.! 2°$ type/.ýü# 416# 108þ / looking_at_char.! 3°$ type/c/dýü# 418! 0þ + dired_pointü # 419 9 extract_filename_at_point°$ nameü# 420 $ type! 3A.ýü# 423 $ nameþ ) stat_file°( stat_bufü# 424 ( stat_buf $ NULLB.ýü# 426# dir ( stat_buf"' st_modeþ ' stat_is.! 2°$ type/.ýü# 427# reg ( stat_buf"' st_modeþ ' stat_is.! 1°$ type/c/d/c/cü# 430 $ name $ typewü# 404y- dired_getfile,*ü# 435 $ type+.ýü# 436! 1þ + dired_point/oü# 438 - dired_getfile°$ typePü# 439 $ type! 1B.w/cýü# 441! 0þ , set_readonlyü# 442 # bolýü# 443" 68þ + insert_char # delýü# 444! 0þ 8 set_buffer_modified_flagýü# 445! 1 þ , set_readonlyü# 433y) dired_tag,*ü# 448 $ dirn+ü# 450 $ dirn! 0=.ü# 452 $ up_1.ý. Top of Buffer.þ % error/b/cü# 454 # bolýü# 455" 68þ / looking_at_char.ýü# 457! 0þ , set_readonlyýü# 458" 32þ + insert_char # delýü# 459! 0þ 8 set_buffer_modified_f lagýü# 460! 1þ , set_readonly/cü# 462 $ dirn! 0?.ýü# 463! 1þ + dired_point/cü# 448y+ dired_untag,*ü# 467 & prompt # msg + op_function+*ü# 469 $ lbuf+, *Deletions*°$ lbuf*ü# 470 % stack ! n % fails+ + Null_String°% fails*ü# 471 $ file+ýü# 473 , Dired _Bufferþ & setbufü# 474 - push_spot_bobü# 476 ) _stkdepth°% stack.ýü# 479 ) _stkdepth % stack:þ & _pop_nýü# 480 , Dired_Bufferþ & sw2bufýü# 481! 0þ , set_readonlyü# 482 # bob.ýü# 483" 37þ 0 bol_fsearch_char/.ýü# 485" 68þ + insert_char # del/fü# 487 ( pop_spotýü# 488! 0þ 8 set_buffer_modified_flagý! 1þ , set_readonly/nýü# 491! 0þ , set_readonly.ýü# 493" 68þ 0 bol_fsearch_char/.ýü# 495" 37þ + insert_char # delü# 496 - dired_getfileü# 497P/fü# 500 ) _stkdepth % stack:°! nü# 501 ! n.ý( No tags!þ % error/býü# 503 $ lbufþ & sw2bufü# 504 , erase_bufferü# 506 ! n.ü# 508 & insertü# 509 ' newline/iü# 511 # bobü# 512 8 buffer_format_in_columnsýü# 513 & promptþ * get_yes_no! 1A.ýü# 515 , Dired_Bufferþ & sw2bufü# 516 # bob.ýü# 517" 37þ 0 bol_fsearch_char /.ü# 519 - dired_getfileP°$ fileü# 520 # bolü# 521 ) push_spotýü# 522 7 Dired_Current_Directory $ fileþ & dircat°$ fileýü# 523 $ fileþ + op_functionM.ü# 525 ( pop_spotýü# 526 # msg $ file9þ % flushü# 527 ) push_markü# 528 ) go_down_1ü# 529 * del_region ) go_left_1/.ü# 533 ( pop_spotü# 534! $ file9±% failsýü# 535" 32þ + insert_char # del/d/f/cü# 540 3 EXECUTE_ERROR_BLOCKýü# 542 % failsþ & strlen.ýü# 5431 Operation Failed: % fails9þ ' message/cü# 467y6 dired_xop_tagged_files,ýü# 5482 Delete these fi les( Deleted }+ delete_fileþ 6 dired_xop_tagged_filesü# 546y, dired_delete,*ü# 551 $ file+*ü# 553 $ name+ü# 555 - dired_getfileP°$ nameýü# 556 5 Dired_Move_Target_Dir $ nameþ & dircat°$ nameýü# 558 $ file $ nameþ + rename_fileNü# 551y- dired_do_move,ýü # 563+ Move to dirþ 3 read_file_from_mini°5 Dired_Move_Target_Dirýü# 564 5 Dired_Move_Target_Dirþ + file_status! 2B.ýü# 5658 Expecting directory nameþ % error/cü# 567. Move these to 5 Dired_Move_Target_Dir9ýü# 568& Moved }- dired_do_moveþ 6 dired_xo p_tagged_filesü# 561y* dired_move,*ü# 574 $ name $ type+ü# 576 - push_spot_bobý! 0þ , set_readonly.ýü# 577# 126þ , fsearch_char/.ü# 579 - dired_getfile°$ type°$ nameü# 580 $ type! 1Aý $ name! ~ý $ nameþ & strlenþ , string_matchC.ü# 582 # bolýü# 583" 68þ + insert_char # del/cü# 585 # eol/fü# 587 ( pop_spotýü# 588! 0þ 8 set_buffer_modified_flagýü# 589! 1þ , set_readonlyü# 572y1 dired_flag_backup,*ü# 595 $ oldf $ type # len ! f ! n " nf " nd " od & status+ü# 597 - dired_getfile°$ type°$ oldfü# 598 $ type.w/býü# 599, Rename %s to $ oldfþ ' sprintfýþü# 600 3 read_file_from_mini°! nýü# 605 ! nþ + file_status°& statusü# 606 & status! 1A.ý9 File exists. Not renamed.þ % error/.ü# 607 & status! 2A.ý ! n $ oldfþ & dircat°! n/c/dýü# 612 ! nþ . parse_fil ename°" nf°" ndýü# 613 7 Dired_Current_Directory $ oldfþ & dircat°! fýü# 614 ! fþ . parse_filenameP°" odýü# 615 ! f ! nþ + rename_file.ý1 Operation Failed!þ % error/cýü# 616! 0þ , set_readonlyü# 618 " od " ndB.ü# 623 + delete_lineýü# 624! 0þ + dired_po int/.ýü# 628! 0þ + dired_pointü# 629 ) push_markýü# 630$% ^ \nþ * skip_charsü# 631 * del_regionýýü# 632 " nfþ - escape_stringþ & insertýü# 633! 1þ + dired_point/dýü# 635! 0þ 8 set_buffer_modified_flagýü# 636! 1þ , set_readonlyü# 593y, dired_rename,* ü# 694 # dir+ü# 695 & _NARGS! 1A.ü# 696°# dir/.ýü# 698* Directory:þ 3 read_file_from_mini°# dir/dýü# 699 # dirþ . dired_read_dirü# 700 0 dired_quick_helpýü# 701* dired_hookþ . run_mode_hooksü# 692y% dired,*ü# 706 $ name $ type+ü# 708 - dired_getfile°$ type°$ nameýü# 710 7 Dired_Current_Directory $ nameþ & dircat°$ nameü# 712 $ type! 1A.ýü# 714 $ nameþ ) read_file.ý4 Unable to read file.þ % error/býü# 715 ' whatbufþ ' pop2buf/.ü# 717 $ type! 2A.ýü# 719 $ nameþ . dired_read_dir/c/dü# 704y* dired_find ,*ü# 725 $ name $ type+ü# 727 - dired_getfile°$ type°$ nameýü# 729 7 Dired_Current_Directory $ nameþ & dircat°$ nameü# 730 $ type! 1A.ýü# 732 $ nameþ ) read_file.ý4 Unable to read file.þ % error/býü# 733 ' whatbufþ ' pop2bufü# 734 ) most_mode/cü# 723y* dired_view,ü# 741 * go_right_1ýü# 742 + LAST_SEARCHþ ' fsearch.ü# 743! 1w/cü# 745 / buffer_modified.ý8 buffer has been modifiedþ % error/cýü# 746 ' whatbufþ & delbufýü# 747 , Dired_Bufferþ ' pop2bufü# 748! 0wü# 739y2 dired_search_files,*ü# 753 # str $ name $ type+ýü# 755 , Dired_Bufferþ ' bufferp.ý6 *dired* not available.þ % error/býü# 757 , Dired_Buffer ' whatbufþ & strcmp.ýü# 759 + LAST_SEARCHþ & strlen.ý: No specified search stringþ % error/bü# 760 2 dired_search_files.w/cü# 761 ) go_down_1/.ýü # 765- dired_search: + Null_String + LAST_SEARCHþ ) read_mini°# strýü# 766 # strþ & strlen.ý5 Specify search stringþ % error/býü# 767 # strþ 2 save_search_string/d.ü# 772 - dired_getfile°$ type°$ nameü# 773 $ type! 1A.ýü# 775 7 Dired_Current_Directory $ nameþ & dircat°$ nameýü# 776 $ nameþ ) read_file.ý4 Unable to read file.þ % error/bü# 777 2 dired_search_files.ýü# 779 ' whatbufþ ' pop2bufw/c/c/.ü# 784 & down_1/kü# 751y, dired_search