....................................../////.===Shadow-Here===./////................................................ > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < > < ------------------------------------------------------------------------------------------------------------------- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////// RIFF¤ WEBPVP8 ˜ ðÑ *ôô>‘HŸK¥¤"§£±¨àð enü¹%½_F‘åè¿2ºQú³íªú`N¿­3ÿƒügµJžaÿ¯ÿ°~¼ÎùnúîÞÖô•òíôÁÉß®Sm¥Ü/ ‡ó˜f£Ùà<˜„xëJ¢Ù€SO3x<ªÔ©4¿+ç¶A`q@Ì“Úñè™ÍÿJÌ´ª-˜ÆtÊÛL]Ïq*‘Ý”ì#ŸÌÏãY]@ê`¿ /ªfkØB4·®£ó z—Üw¥Pxù–ÞLШKÇN¾AkÙTf½è'‰g gÆv›Øuh~ a˜Z— ïj*á¥t d£“uÒ ¨`K˜¹ßþ]b>˜]_ÏÔ6W—è2r4x•íÖ…"ƒÖNîä!¦å Ú}ýxGøÌ —@ ;ÆÚŠ=ɾ1ý8lªË¥ô ^yf®Œ¢u&2©nÙÇ›ñÂñŒ³ aPo['½»øFùà­+4ê“$!lövlüÞ=;N®3ð‚õ›DÉKòÞ>ÄÍ ¥ˆuߤ#ˆ$6ù™¥îŠ‡y’ÍB¼ çxÛ;X"WL£R÷͝*ó-¶Zu}º.s¸sšXqù–DþÿvªhüïwyŸ ¯é³lÀ:KCûÄ£Ëá\…­ ~—ýóî ¼ûûÜTÓüÇy…ŽÆvc»¾×U ñ¸žþоP÷¦ó:Ò¨¨5;Ð#&#ÖúñläÿÁœ GxÉ­/ñ‡áQðìYÉtÒwŽ¼GÔ´zàÒò ð*ëzƒ•4~H]Ø‹f ñÓÈñ`NåWçs'ÆÏW^ø¹!XžµmQ5ÃËoLœÎ: ÞËÍ¥J ù…î èo£ßPÎñ¶ž8.Œ]ʵ~5›ÙË-ù*8ÙÖß±~ ©¹rÓê‚j¶d¸{^Q'˜±Crß ÚH—#¥¥QlÀ×ëã‡DÜ«èî þ&Çæžî;ŽÏºò6ÒLÃXy&ZŒ'j‚¢Ù€IßÚù+–MGi‰*jE€‘JcÜ ÓÌ EÏÚj]o˜ Þr <¾U ûŪæÍ/šÝH¥˜b”¼ ÁñßX GP›ï2›4WŠÏà×£…íÓk†¦H·ÅíMh–*nó÷à]ÁjCº€b7<ب‹¨5車bp2:Á[UªM„QŒçiNMa#<5›áËó¸HýÊ"…×Éw¹¦ì2º–x<›»a±¸3Weü®FÝ⑱ö–î–³|LPÈ~çð~Çå‡|º kD¢µÏàÆAI %1À% ¹Ò – ”ϝS¦‰4&¶£°à Öý”û_Ò Áw°A«Å€?mÇÛgHÉ/8)á¾ÛìáöŽP í¨PŸNÙµº¦‡§Ùš"ÿ«>+ªÕ`Ê÷‡‚ß Õû˜þãÇ-PÍ.¾XV‘€ dÜ"þ4¹ ±Oú‘©t¥¦FªÄÃÄ•b‚znýu½—#cDs˜ÃiÑOˆñ×QO=*IAÊ,¶ŽZƒ;‡wøXè%EÐk:F±Ú” .Ѽ+Áu&Ç`."pÈÉw o&¿dE6‘’EqTuK@Ì¥ã™À(Êk(h‰,H}RÀIXÛš3µ1©_OqÚÒJAñ$ÊÙÜ;D3çŒ[þùœh¬Ã³™ö6ç†NY".Ú‰ï[ªŸŒ '²Ð öø_¨ÂÉ9u鶳ÒŠõTàîMØ#û¯gN‡bÙ놚X„ö …ÉeüÌ^J ‹€.œ$Æ)βÄeæW#óüßĺŸ€ ÀzwV 9oä»f4V*uB «Ë†¹ì¯žR霓æHXa=&“I4K;¯ç‹h×·"UŠ~<•â•ªVêª&ÍSÃÆÅ?ÔqÎ*mTM ˜›µwêd#[C¡©§‘D<©àb†–ÁœøvH/,í:¯( ²£|4-„Æövv„Yͼ™^Á$ˆ„¢Û[6yB.åH*V¨æ?$=˜Ñ€•î¦ñ·­(VlŸ‘ nÀt8W÷´Bûba?q9ú¶Xƒl«ÿ\ù¶’þòUÐj/õ¢Ìµ³g$ƒÎR!¸»|Oߍë’BhîÚÑ¢ñåŒJ„®„£2Ð3•ô02Nt…!£Í]Ïc½Qÿ?ˆ<&ÃA¾Ú,JˆijÌ#5yz„‰Î|ÊŽ5QÏ:‹ÐaóVÔxW—CpeÏzÐïíçôÿÅ_[hãsÐ_/ŽTÝ?BîˆííV$<¿i>²F¬_Eß¿ †bÊŒº­ÿ®Z H“C}”¬,Mp ý/Bá£w>˜YV°aƒúh+cŠ- r/[%|üUMHäQ°X»|û/@|°¥Ð !BÔ Ç¢Ä©š+Õì D«7ìN¶ŽðÔ " ƶ’ÖçtA‰Û×}{tþz­¾GÍ›k¹OEJR$ Â׃ «ëÁ"oÉôž$oUK(Ä)Ãz³Ê-‹êN[Ò3Œñbï8P 4ƒ×q¢bo|?<ÛX¬òÄÍ°L–±›(™ûG?ýË©ÚÄ–ÂDØÐ_Ç¡ô ¾–ÄÏø ×e8Ë©$ÄF¹Å‹ì[©óìl:F¾f´‹‹Xì²ï®\¬ôùƒ ÿat¥óèÒùHß0äe‚;ü×h:ÆWðHž=Ã8骣"kœ'Y?³}Tûè€>?0l›e1Lòñ„aæKÆw…hÖŠùW…ÈÆÄ0ši·›[pcwËþñiêíY/~-Á5˜!¿†A›™Mÿþ(±“t@â“ö2­´TG5yé]çå僳 .·ÍïçÝ7UÚ±Ð/Nè»,_Ï ùdj7\ï Wì4›„»c¸àešg#ÒÊ⥭áØo5‘?ÌdÝô¯ ¹kzsƒ=´#ëÉK›Ø´±-¥eW?‡çßtòTã…$Ý+qÿ±ƒ÷_3Ô¥í÷:æ–ž<·Ö‡‰Å¢ š‡%Ô—utÌÈìðžgÖÀz²À—ï÷Óîäõ{K'´È÷³yaÏÁjƒô}ž§®æÊydÕÈë5¯èˆõvÕ©ã*çD„ “z„Ó‡^^xÂ3M§A´JG‚öï 3W'ˆ.OvXè¡ÊÕª?5º7†˜(˜Ç¶#çê’¶!ÌdZK§æ 0fãaN]òY³RV ™î$®K2R¨`W!1Ôó\;Ý ýB%qæK•&ÓÈe9È0êI±žeŸß -ú@žQr¦ ö4»M¼Áè¹µmw 9 EÆE_°2ó„ŸXKWÁ×Hóì^´²GѝF©óäR†¦‰ç"V»eØ<3ùd3ÿÚ¤Žú“Gi" —‘_ÙËÎ~Üö¯¥½Î»üŸEÚŽåmÞþí ;ÞólËΦMzA"Âf(´òá;Éï(/7½ûñÌ­cïÕçлþÝz¾-ÍvÑ“pH­–ðÓj$¸Äû¤‚‘ãUBË-n“2åPkS5&‹Â|+g^œ®Ì͆d!OïäîU«c;{Û!ÅŽ«ëZ9Ókóˆ]¯ƒ›né `ÇÒ+tÆš (ØKá¾—=3œ®•vuMñg²\ï Ec€ 05±d™‡×iÇ×›UúvÌ¢£Èþ¡ÕØô¶ßÎA"ß±#Ö²ˆÊŸ¦*Ä~ij|àø.-¼'»Ú¥£h ofº¦‡VsR=N½„Î v˜Z*SÌ{=jÑB‹tê…;’HžH¯8–îDù8ñ¢|Q•bÛçš–‹m³“ê¨ åÏ^m¬Žãþ©ïêO‡½6] µÆ„Ooòü ²x}N¦Ë3ïé¿»€›HA˜m%çÞ/¿í7Fø“‹léUk)É°Œµ8Q8›:ÀŠeT*šõ~ôڝG6 ¢}`ùH­–”¡k ‰P1>š†®9z11!X wKfmÁ¦xÑ,N1Q”–æB¶M…ÒÃv6SMˆhU¬ÊPŽï‘öj=·CŒ¯u¹ƒVIЃsx4’ömÛýc塶7ßŠß 57^\wÒÐÆ k§h,Œý î«q^R½3]J¸ÇðN ‚çU¬ôº^Áì} ³f©Õœ§ˆã:FÄÈ‚é(€™?àýÓüè1Gô£¼éj‚OÅñ  #>×—ßtà 0G¥Åa뀐kßhc™À_ÉñÞ#±)GD" YîäË-ÿÙ̪ ¹™a¯´¢E\ÝÒö‚;™„ë]_ p8‰o¡ñ+^÷ 3‘'dT4œŽ ðVë½° :¬víÑ«£tßÚS-3¶“þ2 †üüʨòrš¹M{É_¤`Û¨0ìjœøJ‡:÷ÃáZ˜†@GP&œÑDGÏs¡þ¦þDGú‘1Yá9Ôþ¼ ûø…§÷8&–ÜÑnÄ_m®^üÆ`;ÉVÁJ£?â€-ßê}suÍ2sõA NÌúA磸‘îÿÚ»ƒìö·á¿±tÑÐ"Tÿü˜[@/äj¬€uüªìù¥Ý˜á8Ý´sõj 8@rˆð äþZÇD®ÿUÏ2ùôõrBzÆÏÞž>Ì™xœ“ wiÎ×7_… ¸ \#€MɁV¶¥üÕÿPÔ9Z‡ø§É8#H:ƒ5ÀÝå9ÍIŒ5åKÙŠ÷qÄ>1AÈøžj"µÂд/ªnÀ qªã}"iŸBå˜ÓÛŽ¦…&ݧ;G@—³b¯“•"´4í¨ôM¨åñC‹ïùÉó¯ÓsSH2Ý@ßáM‡ˆKÀªÛUeø/4\gnm¥‹ŸŒ qÄ b9ÞwÒNÏ_4Ég³ú=܆‚´ •â¥õeíþkjz>éÚyU«Íӝ݃6"8/ø{=Ô¢»G¥ äUw°W«,ô—¿ãㆅү¢³xŠUû™yŒ (øSópÐ 9\åTâ»—*oG$/×ÍT†Y¿1¤Þ¢_‡ ¼ „±ÍçèSaÓ 3ÛMÁBkxs‰’R/¡¤ˆÙçª(*õ„üXÌ´ƒ E§´¬EF"Ù”R/ÐNyÆÂ^°?™6¡œïJ·±$§?º>ÖüœcNÌù¯G ‹ñ2ŠBB„^·úìaz¨k:#¨Æ¨8LÎõލ£^§S&cŒÐU€ü(‡F±Š¼&P>8ÙÁ ‰ p5?0ÊƃZl¸aô š¼¡}gÿ¶zÆC²¹¬ÎÖG*HB¡O<º2#ñŒAƒ–¡B˜´É$¥›É:FÀÔx¾u?XÜÏÓvN©RS{2ʈãk9rmP¼Qq̳ è¼ÐFׄ^¡Öì fE“F4A…!ì/…¦Lƒ… … $%´¾yã@CI¬ á—3PþBÏNÿ<ý°4Ü ËÃ#ØÍ~âW«rEñw‹eùMMHß²`¬Öó½íf³:‹k˜¯÷}Z!ã¿<¥,\#öµÀ¯aÒNÆIé,Ћ–lŽ#Àæ9ÀÒS·I’½-Ïp Äz¤Š Â* ­íÄ9­< h>׍3ZkËU¹§˜ŒŠ±f­’¤º³Q ÏB?‹#µíÃ¥®@(Gs«†vI¥Mµ‹Á©e~2ú³ÁP4ìÕi‚²Ê^ö@-DþÓàlÜOÍ]n"µã:žpsŽ¢:! Aõ.ç~ÓBûH÷JCÌ]õVƒd «ú´QÙEA–¯¯Œ!.ˆˆëQ±ù œ·Ì!Õâ )ùL„ÅÀlÚè5@B…o´Æ¸XÓ&Û…O«˜”_#‡ƒ„ûÈt!¤ÁÏ›ÎÝŠ?c9 â\>lÓÁVÄÑ™£eØY]:fÝ–—ù+p{™ðè û³”g±OƒÚSù£áÁÊ„ä,ï7š²G ÕÌBk)~ÑiCµ|h#u¤¶îK¨² #²vݯGãeÖ϶ú…¾múÀ¶þÔñ‚Š9'^($¤§ò “š½{éúp÷J›ušS¹áªCÂubÃH9™D™/ZöØÁ‡¦ÝÙŸ·kð*_”.C‹{áXó€‡c¡c€§/šò/&éš÷,àéJþ‰X›fµ“C¨œ®r¬"kL‰Â_q…Z–.ÉL~O µ›zn‚¹À¦Öª7\àHµšÖ %»ÇníV[¥*Õ;ƒ#½¾HK-ÖIÊdÏEÚ#=o÷Óò³´Š: Ç?{¾+9›–‘OEáU·S€˜j"ÄaÜ ŒÛWt› á–c#a»pÔZÞdŽtWê=9éöÊ¢µ~ ë ;Öe‡Œ®:bî3±ýê¢wà¼îpêñ¹¾4 zc¾ðÖÿzdêŒÑÒŝÀ‰s6¤í³ÎÙB¿OZ”+F¤á‡3@Ñëäg©·Ž ˆèª<ù@É{&S„œÕúÀA)‰h:YÀ5^ÂÓŒ°õäU\ ùËÍû#²?Xe¬tu‰^zÒÔãë¼ÛWtEtû …‚g¶Úüâî*moGè¨7%u!]PhÏd™Ý%Îx: VÒ¦ôÊD3ÀŽKÛËãvÆî…N¯ä>Eró–ð`5 Œ%u5XkñÌ*NU%¶áœÊ:Qÿú»“úzyÏ6å-၇¾ ´ ÒÊ]y žO‘w2Äøæ…H’²f±ÎÇ.ª|¥'gîV•Ü .̘¯€šòü¤U~Ù†*¢!?ò wý,}´°ÔÞnïoKq5µb!áÓ3"vAßH¡³¡·G(ÐÎ0Îò¼MG!/ài®@—¬04*`…«é8ªøøló“ˆÊ”èù¤…ßÊoÿé'ËuÌÖ5×È¡§ˆˆfŽë9}hìâ_!!¯  B&Ëö¶‰ÀAÙNVŸ Wh›¸®XÑJì¨ú“¿÷3uj²˜¨ÍÎìë±aúŠÝå¯ð*Ó¨ôJ“yºØ)m°WýOè68†ŸÏ2—‰Ïüꪫٚ¥‹l1 ø ÏÄFjêµvÌbü¦èÝx:X±¢H=MÐß—,ˆÉÇ´(9ú¾^ÅÚ4¿m‡$âX‘å%(AlZo@½¨UOÌÕ”1ø¸jÎÀÃÃ_ µ‘Ü.œº¦Ut: Æï’!=¯uwû#,“pþÇúŒø(é@?³ü¥‘Mo §—s@Œ#)§ŒùkL}NOÆêA›¸~r½¼ÙA—HJ«eˆÖ´*¡ÓpÌŸö.m<-"³ûÈ$¬_6­åf£ïÚâj1y§ÕJ½@dÞÁr&Í\Z%D£Íñ·AZ Û³øüd/ªAi†/Й~  ‡âĮҮÏh§°b—›Û«mJžòG'[ÈYýŒ¦9psl ýÁ ®±f¦x,‰½tN ‚Xª9 ÙÖH.«Lo0×?͹m¡å†Ѽ+›2ƒF ±Ê8 7Hցϓ²Æ–m9…òŸï]Â1äN†VLâCˆU .ÿ‰Ts +ÅÎx(%¦u]6AF Š ØF鈄‘ |¢¶c±soŒ/t[a¾–û:s·`i햍ê›ËchÈ…8ßÀUÜewŒðNOƒõD%q#éû\9¤x¹&UE×G¥ Í—™$ð E6-‡¼!ýpãÔM˜ Âsìe¯ñµK¢Ç¡ùôléœ4Ö£”À Š®Ðc ^¨À}ÙËŸ§›ºê{ÊuÉC ×Sr€¤’fÉ*j!úÓ’Gsùìoîßîn%ò· àc Wp÷$¨˜)û»H ×8ŽÒ€Zj¤3ÀÙºY'Ql¦py{-6íÔCeiØp‘‡XÊîÆUߢ܂ž£Xé¼Y8þ©ëgñß}é.ÎógÒ„ÃØËø¯»™§Xýy M%@NŠ À(~áÐvu7&•,Ù˜ó€uP‡^^®=_E„jt’ 403WebShell
403Webshell
Server IP : 66.235.200.170  /  Your IP : 3.135.64.200
Web Server : Apache
System : Linux gator4410.hostgator.com 5.14.0-162.23.1.9991722448259.nf.el9.x86_64 #1 SMP PREEMPT_DYNAMIC Wed Jul 31 18:11:45 UTC 2024 x86_64
User : bmgxafte ( 1214)
PHP Version : 8.2.28
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : ON  |  Pkexec : ON
Directory :  /usr/share/emacs/27.2/lisp/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :

[ Back ]     

Current File : /usr/share/emacs/27.2/lisp/ido.elc
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'seq)
#@38 Return t if N is a fraction.

(fn N)
(defalias 'ido-fractionp #[257 "\211\247\205\211\300V\205\211\301X\207" [0.0 1.0] 3 (#$ . 423)])
(byte-code "\300\301\302\303\304\305\304\306\307\310\311\312\311\313\311\314\311\315&\210\316\317\320\321\322DD\323\324\325\326\327\330\301\311\331\332\333\334\335\304\301&\210\316\336\320\321\337DD\340\334\341\304\301&\210\316\342\320\321\343DD\344\334\345\304\301&\210\316\346\320\321\347DD\350\334\351\304\301&\210\316\352\320\321\353DD\354\334\341\304\301&\210\316\355\320\321\356DD\357\334\341\304\301&\210\316\360\320\321\361DD\362\334\363\304\301&\210\316\364\320\321\365DD\366\334\367\304\301&\210\316\370\320\321\371DD\372\334\373\304\301&\210\316\374\320\321\375DD\376\334\377\304\301&\210\316\201@\320\321\201ADD\201B\334\201C\304\301&\210\316\201D\320\321\201EDD\201F\334\341\304\301&\210\316\201G\320\321\201HDD\201I\334\341\304\301&\210\316\201J\320\321\201KDD\201L\334\341\304\301&\210\316\201M\320\321\201NDD\201O\334\341\304\301&\210\316\201P\320\321\201QDD\201R\307\201S\334\341\304\301&	\210\316\201T\320\321\201UDD\201V\334\341\304\301&\210\316\201W\320\321\201XDD\201Y\334\321\304\301&\210\316\201Z\320\321\201[DD\201\\\334\341\304\301&\210\316\201]\320\321\201^DD\201_\334\201`\304\301&\210\316\201a\320\321\201bDD\201c\334\201d\304\301&\210\316\201e\320\321\201fDD\201g\334\201h\304\301&\210\316\201i\320\321\201jDD\201k\334\341\304\301&\210\316\201l\320\321\201mDD\201n\334\201`\304\301&\210\316\201o\320\321\201pDD\201q\334\201r\304\301&\210\316\201s\320\321\201tDD\201u\334\201v\304\301&\210\316\201w\320\321\201xDD\201y\334\341\304\301&\210\316\201z\320\321\201{DD\201|\334\341\304\301&\210\316\201}\320\321\201~DD\201\334\341\304\301&\210\316\201\200\320\321\201\201DD\201\202\334\341\304\301&\210\316\201\203\320\321\201\204DD\201\205\334\201\206\304\301&\210\316\201\207\320\321\201\210DD\201\211\334\201\212\304\301&\210\316\201\213\320\321\201\214DD\201\215\334\201\216\304\301&\207" [custom-declare-group ido nil "Switch between files using substrings." :group extensions convenience :version "22.1" :link (emacs-commentary-link :tag "Commentary" "ido.el") (emacs-library-link :tag "Lisp File" "ido.el") (custom-manual "(ido) Top") (info-link "(ido) Customization") custom-declare-variable ido-mode funcall function #[0 "\300\207" [nil] 1] "Determines for which buffer/file Ido should be enabled.\nThe following values are possible:\n- `buffer': Turn only on Ido buffer behavior (switching, killing,\n  displaying...)\n- `file': Turn only on Ido file behavior (finding, writing, inserting...)\n- `both': Turn on Ido buffer and file behavior.\n-  nil: Turn off any Ido switching.\n\nSetting this variable directly does not take effect;\nuse either \\[customize] or the function `ido-mode'." :set #[514 "\300!\207" [ido-mode] 4 "\n\n(fn SYMBOL VALUE)"] :initialize custom-initialize-default :require (emacs-commentary-link "ido.el") :set-after (ido-save-directory-list-file ido-unc-hosts) :type (choice (const :tag "Turn on only buffer" buffer) (const :tag "Turn on only file" file) (const :tag "Turn on both buffer and file" both) (const :tag "Switch off all" nil)) ido-case-fold #[0 "\207" [case-fold-search] 1] "Non-nil if searching of buffer and file names should ignore case." boolean ido-ignore-buffers #[0 "\300\207" [("\\` ")] 1] "List of regexps or functions matching buffer names to ignore.\nFor example, traditional behavior is not to list buffers whose names begin\nwith a space, for which the regexp is `\\\\=` '.  See the source file for\nexample functions that filter buffer names." (repeat (choice regexp function)) ido-ignore-files #[0 "\300\207" [("\\`CVS/" "\\`#" "\\`.#" "\\`\\.\\./" "\\`\\./")] 1] "List of regexps or functions matching file names to ignore.\nFor example, traditional behavior is not to list files whose names begin\nwith a #, for which the regexp is `\\\\=`#'.  See the source file for\nexample functions that filter filenames." (repeat (choice regexp function)) ido-ignore-extensions #[0 "\300\207" [t] 1] "Non-nil means ignore files in `completion-ignored-extensions' list." ido-show-dot-for-dired #[0 "\300\207" [nil] 1] "Non-nil means to always put . as the first item in file name lists.\nThis allows the current directory to be opened immediately with `dired'." ido-file-extensions-order #[0 "\300\207" [nil] 1] "List of file extensions specifying preferred order of file selections.\nEach element is either a string with `.' as the first char, an empty\nstring matching files without extension, or t which is the default order\nfor files with an unlisted file extension." (repeat (choice string (const :tag "Default order" t))) ido-ignore-directories #[0 "\300\207" [("\\`CVS/" "\\`\\.\\./" "\\`\\./")] 1] "List of regexps or functions matching sub-directory names to ignore." (repeat (choice regexp function)) ido-ignore-directories-merge #[0 "\300\207" [nil] 1] "List of regexps or functions matching directory names to ignore during merge.\nDirectory names matched by one of the regexps in this list are not inserted\nin merged file and directory lists." (repeat (choice regexp function)) ido-default-file-method #[0 "\300\207" [raise-frame] 1] "How to visit a new file when using `ido-find-file'.\nPossible values:\n`selected-window' Show new file in selected window\n`other-window'	  Show new file in another window (same frame)\n`display'	  Display file in another window without selecting to it\n`other-frame'	  Show new file in another frame\n`maybe-frame'	  If a file is visible in another frame, prompt to ask if\n		  you want to see the file in the same window of the current\n  		  frame or in the other frame\n`raise-frame'     If a file is visible in another frame, raise that\n		  frame; otherwise, visit the file in the same window" (choice (const :tag "Visit in selected window" selected-window) (const :tag "Visit in other window" other-window) (const :tag "Display (no select) in other window" display) (const :tag "Visit in other frame" other-frame) (const :tag "Ask to visit in other frame" maybe-frame) (const :tag "Raise frame if already visited" raise-frame)) ido-default-buffer-method #[0 "\300\207" [raise-frame] 1] "How to switch to new buffer when using `ido-switch-buffer'.\nSee `ido-default-file-method' for details." (choice (const :tag "Show in selected window" selected-window) (const :tag "Show in other window" other-window) (const :tag "Display (no select) in other window" display) (const :tag "Show in other frame" other-frame) (const :tag "Ask to show in other frame" maybe-frame) (const :tag "Raise frame if already shown" raise-frame)) ido-enable-flex-matching #[0 "\300\207" [nil] 1] "Non-nil means that Ido will do flexible string matching.\nFlexible matching means that if the entered string does not\nmatch any item, any item containing the entered characters\nin the given sequence will match." ido-enable-regexp #[0 "\300\207" [nil] 1] "Non-nil means that Ido will do regexp matching.\nValue can be toggled within Ido using `ido-toggle-regexp'." ido-enable-prefix #[0 "\300\207" [nil] 1] "Non-nil means only match if the entered text is a prefix of file name.\nThis behavior is like the standard Emacs completion.\nIf nil, match if the entered text is an arbitrary substring.\nValue can be toggled within Ido using `ido-toggle-prefix'." ido-enable-dot-prefix #[0 "\300\207" [nil] 1] "Non-nil means to match leading dot as prefix.\nI.e. hidden files and buffers will match only if you type a dot\nas first char even if `ido-enable-prefix' is nil." ido-buffer-disable-smart-matches #[0 "\300\207" [t] 1] "Non-nil means not to re-order matches for buffer switching.\nBy default, Ido arranges matches in the following order:\n\n  full-matches > suffix matches > prefix matches > remaining matches\n\nwhich can get in the way for buffer switching." "24.3" ido-confirm-unique-completion #[0 "\300\207" [nil] 1] "Non-nil means that even a unique completion must be confirmed.\nThis means that \\[ido-complete] must always be followed by \\[ido-exit-minibuffer]\neven when there is only one unique completion." ido-cannot-complete-command #[0 "\300\207" [ido-completion-help] 1] "Command run when `ido-complete' can't complete any more.\nThe most useful values are `ido-completion-help', which pops up a\nwindow with completion alternatives, or `ido-next-match' or\n`ido-prev-match', which cycle the buffer list." ido-record-commands #[0 "\300\207" [t] 1] "Non-nil means that Ido will record commands in command history.\nNote that the non-Ido equivalent command is recorded." ido-max-prospects #[0 "\300\207" [12] 1] "Upper limit of the prospect list if non-zero.\nZero means no limit for the prospect list.\nFor a long list of prospects, building the full list for the\nminibuffer can take a non-negligible amount of time; setting this\nvariable reduces that time." integer ido-max-file-prompt-width #[0 "\300\207" [0.35] 1] "Upper limit of the prompt string.\nIf value is an integer, it specifies the number of characters of\nthe string.\nIf value is a floating point number, it specifies a fraction of\nthe frame width." (choice (integer :tag "Characters" :value 20) (restricted-sexp :tag "Fraction of frame width" :value 0.35 :match-alternatives (ido-fractionp))) ido-max-window-height #[0 "\300\207" [nil] 1] "Non-nil specifies a value to override `max-mini-window-height'." (choice (const :tag "Don't override" nil) (integer :tag "Number of lines" :value 1) (restricted-sexp :tag "Fraction of window height" :value 0.25 :match-alternatives (ido-fractionp))) ido-enable-last-directory-history #[0 "\300\207" [t] 1] "Non-nil means that Ido will remember latest selected directory names.\nSee `ido-last-directory-list' and `ido-save-directory-list-file'." ido-max-work-directory-list #[0 "\300\207" [50] 1] "Maximum number of working directories to record.\nThis is the list of directories where files have most recently been opened.\nSee `ido-work-directory-list' and `ido-save-directory-list-file'." ido-work-directory-list-ignore-regexps #[0 "\300\207" [nil] 1] "List of regexps matching directories which should not be recorded.\nDirectory names matched by one of the regexps in this list are not inserted in\nthe `ido-work-directory-list' list." (repeat regexp) ido-use-filename-at-point #[0 "\300\207" [nil] 1] "Non-nil means that Ido shall look for a filename at point.\nMay use `ffap-guesser' to guess whether text at point is a filename.\nIf found, use that as the starting point for filename selection." (choice (const :tag "Disabled" nil) (const :tag "Guess filename" guess) (other :tag "Use literal filename" t)) ido-use-url-at-point #[0 "\300\207" [nil] 1] "Non-nil means that ido shall look for a URL at point.\nIf found, call `find-file-at-point' to visit it." ido-enable-tramp-completion #[0 "\300\207" [t] 1] "Non-nil means that Ido shall perform tramp method and server name completion.\nA tramp file name uses the following syntax: /method:user@host:filename." ido-record-ftp-work-directories #[0 "\300\207" [t] 1] "Non-nil means record FTP file names in the work directory list." ido-merge-ftp-work-directories #[0 "\300\207" [nil] 1] "If nil, merging ignores FTP file names in the work directory list." ido-cache-ftp-work-directory-time #[0 "\300\207" [1.0] 1] "Maximum time to cache contents of an FTP directory (in hours).\n\\<ido-file-completion-map>\nUse \\[ido-reread-directory] in prompt to refresh list.\nIf zero, FTP directories are not cached." number ido-slow-ftp-hosts #[0 "\300\207" [nil] 1] "List of slow FTP hosts where Ido prompting should not be used.\nIf an FTP host is on this list, Ido automatically switches to the non-Ido\nequivalent function, e.g. `find-file' rather than `ido-find-file'." (repeat string) ido-slow-ftp-host-regexps #[0 "\300\207" [nil] 1] "List of regexps matching slow FTP hosts (see `ido-slow-ftp-hosts')." (repeat regexp)] 18)
#@49 Cached value from the function `ido-unc-hosts'.
(defvar ido-unc-hosts-cache t (#$ . 12393))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313&	\210\300\314\302\303\315DD\316\306\317\312\313&\210\300\320\302\303\321DD\322\306\323\312\313&\210\300\324\302\303\325DD\326\306\327\312\313&\210\300\330\302\303\331DD\332\306\333\312\313&\210\300\334\302\303\335DD\336\306\317\312\313&\210\300\337\302\303\340DD\341\306\333\312\313&\210\300\342\302\303\343DD\344\306\327\312\313&\210\300\345\302\303\346DD\347\306\350\312\313&\210\300\351\302\303\352DD\353\306\354\312\313&\210\300\355\302\303\356DD\357\306\333\312\313&\210\300\360\302\303\361DD\362\306\363\312\313&\210\300\364\302\303\365DD\366\306\367\312\313\370\371&	\210\300\372\302\303\373DD\374\306\317\312\313&\210\300\375\302\303\376DD\377\306\201@\312\313&\210\300\201A\302\303\201BDD\201C\306\201D\312\313&\210\300\201E\302\303\201FDD\201G\306\201H\312\313&\210\300\201I\302\303\201JDD\201K\306\201L\312\313&\210\201M\201I\201N\201O#\210\300\201P\302\303\201QDD\201R\306\201S\312\313&\210\300\201T\302\303\201UDD\201V\370\201W\306\201X\312\313&	\210\300\201Y\302\303\201ZDD\201[\306\317\312\313&\210\201\\\201]\201^\201_\312\313%\210\201\\\201`\201a\201b\312\313%\210\201\\\201c\201d\201e\312\313%\210\201\\\201f\201g\201h\370\201W\312\313&\210\201\\\201i\201j\201k\312\313%\210\201\\\201l\201m\201n\312\313%\210\300\201o\302\303\201pDD\201q\306\201H\312\313&\210\300\201r\302\303\201sDD\201t\306\201H\312\313&\210\300\201u\302\303\201vDD\201w\306\201H\312\313&\210\300\201x\302\303\201yDD\201z\306\201H\312\313&\207" [custom-declare-variable ido-unc-hosts funcall function #[0 "\300\207" [nil] 1] "List of known UNC host names to complete after initial //.\nIf value is a function, that function is called to search network for\nhosts on first use of UNC path." :type (choice (repeat :tag "List of UNC host names" string) (function-item :tag "Use `NET VIEW'" :value ido-unc-hosts-net-view) (function :tag "Your own function")) :set #[514 "L\210\301\211\207" [ido-unc-hosts-cache t] 4 "\n\n(fn SYMBOL VALUE)"] :group ido ido-downcase-unc-hosts #[0 "\300\207" [t] 1] "Non-nil if UNC host names should be downcased." boolean ido-ignore-unc-host-regexps #[0 "\300\207" [nil] 1] "List of regexps matching UNC hosts to ignore.\nCase is ignored if `ido-downcase-unc-hosts' is set." (repeat regexp) ido-cache-unc-host-shares-time #[0 "\300\207" [8.0] 1] "Maximum time to cache shares of an UNC host (in hours).\n\\<ido-file-completion-map>\nUse \\[ido-reread-directory] in prompt to refresh list.\nIf zero, UNC host shares are not cached." number ido-max-work-file-list #[0 "\300\207" [10] 1] "Maximum number of names of recently opened files to record.\nThis is the list of the file names (sans directory) which have most recently\nbeen opened.  See `ido-work-file-list' and `ido-save-directory-list-file'." integer ido-work-directory-match-only #[0 "\300\207" [t] 1] "Non-nil means to skip non-matching directories in the directory history.\nWhen some text is already entered at the `ido-find-file' prompt, using\n\\[ido-prev-work-directory] or \\[ido-next-work-directory] will skip directories\nwithout any matching entries." ido-auto-merge-work-directories-length #[0 "\300\207" [0] 1] "Automatically switch to merged work directories during file name input.\nThe value is number of characters to type before switching to merged mode.\nIf zero, the switch happens when no matches are found in the current directory.\nAutomatic merging is disabled if the value is negative." ido-auto-merge-delay-time #[0 "\300\207" [0.7] 1] "Delay in seconds to wait for more input before doing auto merge." ido-auto-merge-inhibit-characters-regexp #[0 "\300\207" [#1="[][*?~]"] 1 #1#] "Regexp matching characters which should inhibit automatic merging.\nWhen a (partial) file name matches this regexp, merging is inhibited." regexp ido-merged-indicator #[0 "\300\207" [#2="^"] 1 #2#] "The string appended to first choice if it has multiple directory choices." string ido-max-dir-file-cache #[0 "\300\207" [100] 1] "Maximum number of working directories to be cached.\n\\<ido-file-completion-map>\nThis is the size of the cache of `file-name-all-completions' results.\nEach cache entry is time stamped with the modification time of the\ndirectory.  Some systems, like Windows, have unreliable directory\nmodification times, so you may choose to disable caching on such\nsystems, or explicitly refresh the cache contents using the command\n`ido-reread-directory' command (\\[ido-reread-directory]) in the minibuffer.\nSee also `ido-dir-file-cache' and `ido-save-directory-list-file'." ido-max-directory-size #[0 "\300\207" [nil] 1] "Maximum size (in bytes) for directories to use Ido completion.\n\\<ido-completion-map>\nIf you enter a directory with a size larger than this size, Ido will\nnot provide the normal completion.  To show the completions, use \\[ido-toggle-ignore]." (choice (const :tag "No limit" nil) (integer :tag "Size in bytes" 30000)) ido-big-directories #[0 "\300\207" [nil] 1] "List of directory pattern strings that should be considered big.\nIdo won't attempt to list the contents of directories matching\nany of these regular expressions when completing file names." (repeat regexp) :version "27.1" ido-rotate-file-list-default #[0 "\300\207" [nil] 1] "Non-nil means that Ido will always rotate file list to get default in front." ido-enter-matching-directory #[0 "\300\207" [only] 1] "Additional methods to enter sub-directory of first/only matching item.\nIf value is `first', enter first matching sub-directory when typing a slash.\nIf value is `only', typing a slash only enters the sub-directory if it is\nthe only matching item.\nIf value is t, automatically enter a sub-directory when it is the only\nmatching item, even without typing a slash." (choice (const :tag "Never" nil) (const :tag "Slash enters first directory" first) (const :tag "Slash enters first and only directory" only) (other :tag "Always enter unique directory" t)) ido-create-new-buffer #[0 "\300\207" [prompt] 1] "Specify whether a new buffer is created if no buffer matches substring.\nChoices are `always' to create new buffers unconditionally, `prompt' to\nask user whether to create buffer, or `never' to never create new buffer." (choice (const always) (const prompt) (const never)) ido-setup-hook #[0 "\300\207" [nil] 1] "Hook run after the Ido variables and keymap have been setup.\nThe dynamic variable `ido-cur-item' contains the current type of item that\nis read by Ido; possible values are file, dir, buffer, and list.\nAdditional keys can be defined in `ido-completion-map'." hook ido-separator #[0 "\300\207" [nil] 1] "String used by Ido to separate the alternatives in the minibuffer." (choice string (const nil)) make-obsolete-variable "set 3rd element of `ido-decorations' instead." nil ido-decorations #[0 "\300\207" [("{" "}" " | " " | ..." "[" "]" " [No match]" " [Matched]" " [Not readable]" " [Too big]" " [Confirm]")] 1] "List of strings used by Ido to display the alternatives in the minibuffer.\nThere are between 11 and 13 elements in this list:\n1st and 2nd elements are used as brackets around the prospect list,\n3rd element is the separator between prospects (ignored if\n`ido-separator' is set),\n4th element is the string inserted at the end of a truncated list of prospects,\n5th and 6th elements are used as brackets around the common match string which\ncan be completed using TAB,\n7th element is the string displayed when there are no matches, and\n8th element is displayed if there is a single match (and faces are not used),\n9th element is displayed when the current directory is non-readable,\n10th element is displayed when directory exceeds `ido-max-directory-size',\n11th element is displayed to confirm creating new file or buffer.\n12th and 13th elements (if present) are used as brackets around the sole\nremaining completion.  If absent, elements 5 and 6 are used instead." (repeat string) ido-use-virtual-buffers #[0 "\300\207" [nil] 1] "If non-nil, refer to past (\"virtual\") buffers as well as existing ones.\nThe options are:\n  nil:  Do not use virtual buffers.\n  t:    Always use virtual buffers.\n  auto: Use virtual buffers if the current input matches no existing buffer.\n\nEssentially it works as follows: Say you are visiting a file and\nthe buffer gets cleaned up by midnight.el.  Later, you want to\nswitch to that buffer, but find it's no longer open.  With virtual\nbuffers enabled, the buffer name stays in the buffer list (using\nthe `ido-virtual' face, and always at the end), and if you select\nit, it opens the file back up again.  This allows you to think\nless about whether recently opened files are still open or not.\nMost of the time you can quit Emacs, restart, and then switch to\na file buffer that was previously open as if it still were.\n\nThis feature relies upon the `recentf' package, which will be\nenabled if this variable is configured to a non-nil value." "24.1" (choice (const :tag "Always" t) (const :tag "Automatic" auto) (const :tag "Never" nil)) ido-use-faces #[0 "\300\207" [t] 1] "Non-nil means use Ido faces to highlighting first match, only match and\nsubdirs in the alternatives." custom-declare-face ido-first-match ((t :weight bold)) "Face used by Ido for highlighting first match." ido-only-match ((((class color)) :foreground "ForestGreen") (t :slant italic)) "Face used by Ido for highlighting only match." ido-subdir ((((min-colors 88) (class color)) :foreground "red1") (((class color)) :foreground "red") (t :underline t)) "Face used by Ido for highlighting subdirs in the alternatives." ido-virtual ((t :inherit font-lock-builtin-face)) "Face used by Ido for matching virtual buffer names." ido-indicator ((((min-colors 88) (class color)) :foreground "yellow1" :background "red1" :width condensed) (((class color)) :foreground "yellow" :background "red" :width condensed) (t :inverse-video t)) "Face used by Ido for highlighting its indicators." ido-incomplete-regexp ((t :inherit font-lock-warning-face)) "Ido face for indicating incomplete regexps." ido-make-file-list-hook #[0 "\300\207" [nil] 1] "List of functions to run when the list of matching files is created.\nEach function on the list may modify the dynamically bound variable\n`ido-temp-list' which contains the current list of matching files." ido-make-dir-list-hook #[0 "\300\207" [nil] 1] "List of functions to run when the list of matching directories is created.\nEach function on the list may modify the dynamically bound variable\n`ido-temp-list' which contains the current list of matching directories." ido-make-buffer-list-hook #[0 "\300\207" [nil] 1] "List of functions to run when the list of matching buffers is created.\nEach function on the list may modify the dynamically bound variable\n`ido-temp-list' which contains the current list of matching buffer names." ido-rewrite-file-prompt-functions #[0 "\300\207" [nil] 1] "List of functions to run when the find-file prompt is created.\nEach function on the list may modify the following dynamically bound\nvariables:\n  dirname   - the (abbreviated) directory name\n		 to be modified by the hook functions\n  max-width - the max width of the resulting dirname; nil means no limit\n  prompt    - the basic prompt (e.g. \"Find File: \")\n  literal   - the string shown if doing \"literal\" find; set to nil to omit\n  vc-off    - the string shown if version control is inhibited; set to nil to omit\n  prefix    - either nil or a fixed prefix for the dirname\n\nThe following variables are available, but should not be changed:\n  `ido-current-directory' - the unabbreviated directory name\n  item - equals `file' or `dir' depending on the current mode."] 10)
#@495 Alist of rewriting rules for directory names in Ido prompts.
A list of elements of the form (FROM . TO) or (FROM . FUNC), each
meaning to rewrite the directory name if matched by FROM by either
substituting the matched string by TO or calling the function FUNC
with the current directory name as its only argument and using the
return value as the new directory name.  In addition, each FUNC may
also modify the dynamic variables described for the variable
`ido-rewrite-file-prompt-functions'.
(defvar ido-rewrite-file-prompt-rules nil (#$ . 24242))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\210\300\312\302\303\313DD\314\306\315\310\311&\210\300\316\302\303\317DD\320\306\321\310\311&\210\300\322\302\303\323DD\324\306\325\310\311&\210\300\326\302\303\327DD\330\331\332\306\307\310\311&	\210\300\333\302\303\334DD\335\306\336\310\311&\210\300\337\302\303\340DD\341\306\342\310\311&\210\300\343\302\303\344DD\345\306\325\310\311&\207" [custom-declare-variable ido-completion-buffer funcall function #[0 "\300\207" [#1="*Ido Completions*"] 1 #1#] "Name of completion buffer used by Ido.\nSet to nil to disable completion buffers popping up." :type string :group ido ido-completion-buffer-all-completions #[0 "\300\207" [nil] 1] "Non-nil means to show all completions in completion buffer.\nOtherwise, only the current list of matches is shown." boolean ido-all-frames #[0 "\300\207" [visible] 1] "Argument to pass to `walk-windows' when Ido is finding buffers.\nSee documentation of `walk-windows' for useful values." (choice (const :tag "Selected frame only" nil) (const :tag "All existing frames" t) (const :tag "All visible frames" visible) (const :tag "All frames on this terminal" 0)) ido-minibuffer-setup-hook #[0 "\300\207" [nil] 1] "Ido-specific customization of minibuffer setup.\n\nThis hook is run during minibuffer setup if Ido is active.\nIt is intended for use in customizing Ido for interoperation\nwith other packages.  For instance:\n\n  (add-hook \\='ido-minibuffer-setup-hook\n	    (lambda () (setq-local max-mini-window-height 3)))\n\nwill constrain Emacs to a maximum minibuffer height of 3 lines when\nIdo is running.  Copied from `icomplete-minibuffer-setup-hook'." hook ido-save-directory-list-file #[0 "\300\301\302\"\207" [locate-user-emacs-file "ido.last" ".ido.last"] 3] "File in which the Ido state is saved between invocations.\nVariables stored are: `ido-last-directory-list', `ido-work-directory-list',\n`ido-work-file-list', and `ido-dir-file-cache'.\nMust be set before enabling Ido mode." :version "24.4" ido-read-file-name-as-directory-commands #[0 "\300\207" [nil] 1] "List of commands which use `read-file-name' to read a directory name.\nWhen `ido-everywhere' is non-nil, the commands in this list will read\nthe directory using `ido-read-directory-name'." (repeat symbol) ido-read-file-name-non-ido #[0 "\300\207" [nil] 1] "List of commands which shall not read file names the Ido way.\nWhen `ido-everywhere' is non-nil, the commands in this list will read\nthe file name using normal `read-file-name' style." (repeat symbol) ido-before-fallback-functions #[0 "\300\207" [nil] 1] "List of functions to call before calling a fallback command.\nThe fallback command is passed as an argument to the functions."] 10)
#@30 Keymap for all Ido commands.
(defvar ido-common-completion-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\303\316\317#\210\303\320\321#\210\303\322\323#\210\303\324\325#\210\303\326\327#\210\303\330\327#\210\303\331\325#\210\303\332\333#\210\303\334\335#\210\303\336\337#\210\303\340\341#\210\303\342\337#\210\303\343\327#\210\303\344\325#\210\303\345\346#\210\303\347\350#\210\303\351\352#\210\303\353\354#\210\211\207" [minibuffer-local-map make-sparse-keymap set-keymap-parent define-key "" ido-toggle-ignore "" ido-toggle-case "" ido-edit-input "	" ido-complete " " ido-complete-space "\n" ido-select-text "
" ido-exit-minibuffer "" ido-toggle-prefix "" ido-prev-match "" ido-next-match [67108910] [67108908] "" ido-toggle-regexp "" ido-undo-merge-work-directory [(control 32)] ido-restrict-to-matches [(meta 32)] ido-take-first-match [(control 64)] [right] [left] "?" ido-completion-help "" ido-magic-backward-char "" ido-magic-forward-char "" ido-magic-delete-char] 5) (#$ . 27521))
#@45 Keymap for Ido file and directory commands.
(defvar ido-file-dir-completion-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\303\316\317#\210\303\320\321#\210\303\322\323#\210\303\324\323#\210\303\325\323#\210\303\326\327#\210\303\330\331#\210\303\332\333#\210\303\334\335#\210\303\336\337#\210\303\340\341#\210\303\342\343#\210\303\344\345#\210\303\346\347#\210\303\350\321#\210\303\351\352#\210\303\353\354#\210\303\355\317#\210\303\356\357#\210\211\207" [ido-common-completion-map make-sparse-keymap set-keymap-parent define-key "" ido-enter-switch-buffer "" ido-fallback-command "" ido-enter-dired [down] ido-next-match-dir [up] ido-prev-match-dir [(meta up)] ido-prev-work-directory [(meta down)] ido-next-work-directory [backspace] ido-delete-backward-updir "" [remap delete-backward-char] [remap backward-kill-word] ido-delete-backward-word-updir [(control backspace)] ido-up-directory "\f" ido-reread-directory [(meta 100)] ido-wide-find-dir-or-delete-dir [(meta 98)] ido-push-dir [(meta 118)] ido-push-dir-first [(meta 102)] ido-wide-find-file-or-pop-dir [(meta 107)] ido-forget-work-directory [(meta 109)] ido-make-directory [(meta 110)] [(meta 111)] ido-prev-work-file [(meta control 111)] ido-next-work-file [(meta 112)] [(meta 115)] ido-merge-work-directories] 5) (#$ . 28622))
#@31 Keymap for Ido file commands.
(defvar ido-file-completion-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\211\207" [ido-file-dir-completion-map make-sparse-keymap set-keymap-parent define-key "" ido-delete-file-at-head "" ido-copy-current-word "" ido-copy-current-file-name [(meta 108)] ido-toggle-literal] 5) (#$ . 30020))
#@33 Keymap for Ido buffer commands.
(defvar ido-buffer-completion-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\211\207" [ido-common-completion-map make-sparse-keymap set-keymap-parent define-key "" ido-enter-find-file "" ido-fallback-command "" ido-kill-buffer-at-head [33554434] ido-bury-buffer-at-head "" ido-toggle-virtual-buffers] 5) (#$ . 30411))
#@50 History of files selected using `ido-find-file'.
(defvar ido-file-history nil (#$ . 30850))
#@56 History of buffers selected using `ido-switch-buffer'.
(defvar ido-buffer-history nil (#$ . 30948))
#@93 List of last selected directory names.
See `ido-enable-last-directory-history' for details.
(defvar ido-last-directory-list nil (#$ . 31054))
#@160 List of actual working directory names.
The current directory is inserted at the front of this list whenever a
file is opened with `ido-find-file' and family.
(defvar ido-work-directory-list nil (#$ . 31203))
#@187 List of actual work file names.
Opening a file with `ido-find-file' and similar functions
inserts the current file name (relative to its containing directory)
at the front of this list.
(defvar ido-work-file-list nil (#$ . 31419))
#@109 List of `file-name-all-completions' results.
Each element in the list is of the form (DIR (MTIME) FILE...).
(defvar ido-dir-file-cache nil (#$ . 31657))
#@150 List of items to ignore in current Ido invocation.
Intended to be let-bound by functions which call Ido repeatedly.
Should never be set permanently.
(defvar ido-ignore-item-temp-list nil (#$ . 31817))
#@43 Currently active keymap for Ido commands.
(defvar ido-completion-map nil (#$ . 32024))
#@96 Point where minibuffer input ends and completion info begins.
Copied from `icomplete-eoinput'.
(defvar ido-eoinput 1 (#$ . 32117))
(make-variable-buffer-local 'ido-eoinput)
#@57 Stores the string that is common to all matching files.
(defvar ido-common-match-string nil (#$ . 32296))
#@65 Non-nil means we need to regenerate the list of matching items.
(defvar ido-rescan nil (#$ . 32408))
#@48 Non-nil means we are rotating list of matches.
(defvar ido-rotate nil (#$ . 32515))
#@45 Stores the user's string as it is typed in.
(defvar ido-text nil (#$ . 32605))
#@58 The initial string for the user's string it is typed in.
(defvar ido-text-init nil (#$ . 32690))
#@51 Stores the user's strings when user hits M-b/M-f.
(defvar ido-input-stack nil (#$ . 32793))
#@46 List of files currently matching `ido-text'.
(defvar ido-matches nil (#$ . 32891))
#@61 Report "[No Match]" when no completions matches `ido-text'.
(defvar ido-report-no-match t (#$ . 32980))
#@121 Flag to monitor how `ido-find-file' exits.
If equal to `takeprompt', we use the prompt as the file name to be
selected.
(defvar ido-exit nil (#$ . 33091))
#@40 Current directory for `ido-find-file'.
(defvar ido-current-directory nil (#$ . 33252))
#@31 Current completion predicate.
(defvar ido-predicate nil (#$ . 33345))
#@29 Delay timer for auto merge.
(defvar ido-auto-merge-timer nil (#$ . 33421))
#@161 Non-nil means use Ido completion feedback.
Is set by Ido functions to the current `minibuffer-depth',
so that it doesn't interfere with other minibuffer usage.
(defvar ido-use-mycompletion-depth 0 (#$ . 33503))
#@45 Non-nil if an incomplete regexp is entered.
(defvar ido-incomplete-regexp nil (#$ . 33720))
#@125 Non-nil means to explicitly cursor on entry to minibuffer.
Value is an integer which is number of chars to right of prompt.
(defvar ido-initial-position nil (#$ . 33819))
#@175 List of virtual buffers, that is, past visited files.
This is a copy of `recentf-list', pared down and with faces applied.
Only used if `ido-use-virtual-buffers' is non-nil.
(defvar ido-virtual-buffers nil (#$ . 33997))
(defvar ido-fallback nil)
#@24 

(fn &optional MERGE)
(defalias 'ido-active #[256 "\211\203\207\302\303!\205	\304 U\207" [ido-use-merged-list ido-use-mycompletion-depth boundp ido-completing-read minibuffer-depth] 3 (#$ . 34249)])
(defvar ido-trace-enable nil)
#@29 

(fn P &optional S RETVAL)
(defalias 'ido-trace #[769 "\203$\302\303!	\212\214\211q\210\304;\203\202\305\306\"\307\261\210+\210\207" [ido-trace-enable deactivate-mark get-buffer-create " *IDO Trace*" ": " format "%S" "\n"] 9 (#$ . 34490)])
#@12 

(fn ARG)
(defalias 'ido-toggle-trace #[257 "\211\206?\211\203\302\303!\210\304\305!\211\205)\203 \306!\202)\307\310\211#\210\310\211\207" [ido-trace-enable truncate-lines message "IDO trace on" get-buffer " *IDO Trace*" kill-buffer pop-to-buffer t] 7 (#$ . 34750) "P"])
#@41 Tell if FILE exists locally.

(fn FILE)
(defalias 'ido-local-file-exists-p #[257 "\301\302!)\207" [file-name-handler-alist nil file-exists-p] 3 (#$ . 35041)])
#@54 Return list of UNC host names.

(fn &optional QUERY)
(defalias 'ido-unc-hosts #[256 "<\203	\202<	<\203	\202<\211\203/\306!\203/\307\310\311\312\313#!\210 \307\314!\210	\202<\211\2039\314\211\202<\306!\203\223\n\314\211\211\211\203\212@\262A\262\f\205X
\262\203v@\262A\262\315\"\203Z\314\262\314\262\202Z\203G\n\203\202\227\262B\262\202G\316\317\"\262)\266\211\207" [ido-unc-hosts ido-unc-hosts-cache ido-downcase-unc-hosts case-fold-search ido-process-ignore-lists ido-ignore-unc-host-regexps fboundp message propertize "Searching for UNC hosts..." face highlight nil string-match sort string<] 10 (#$ . 35208)])
#@60 Query network for list of UNC host names using `NET VIEW'.
(defalias 'ido-unc-hosts-net-view #[0 "\300\301\302!r\211q\210\303\304\305\306\307!\310\"\311$\216\312\313\314\"\210eb\210\315\316\300\314#\203.\317\320!B\262\202*\210\211\207" [nil generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205	\302\300!\207" vconcat vector [buffer-name kill-buffer] 2 shell-command "net view" t re-search-forward "^\\\\\\\\\\([[:graph:]]+\\)" match-string 1] 8 (#$ . 35880)])
#@22 

(fn &optional DIR)
(defalias 'ido-is-tramp-root #[256 "\205\f\302\303\206	\"\207" [ido-enable-tramp-completion ido-current-directory string-match "\\`/[^/]+[@:]\\'"] 4 (#$ . 36362)])
#@22 

(fn &optional DIR)
(defalias 'ido-is-unc-root #[256 "\301 \205\f\211\206\n\302\230\207" [ido-current-directory ido-unc-hosts "//"] 3 (#$ . 36558)])
#@22 

(fn &optional DIR)
(defalias 'ido-is-unc-host #[256 "\301 \205
\302\303\206\f\"\207" [ido-current-directory ido-unc-hosts string-match "\\`//[^/]+/\\'"] 4 (#$ . 36717)])
#@22 

(fn &optional DIR)
(defalias 'ido-is-root-directory #[256 "\211\206\262\211\303\230\206&	\304>\203\305\306\"\206&\n\203\"\307!\207\305\310\"\207" [ido-current-directory system-type ido-enable-tramp-completion "/" (windows-nt ms-dos) string-match "\\`[a-zA-Z]:[/\\]\\'" ido-is-tramp-root "\\`/[^:/][^:/]+:\\'"] 4 (#$ . 36899)])
#@22 

(fn &optional DIR)
(defalias 'ido-is-ftp-directory #[256 "\302\203	\303\202\n\304\206	\"\207" [ido-enable-tramp-completion ido-current-directory string-match "\\`/[^/:][^/:]+:" "\\`/[^/:][^/:]+:/"] 4 (#$ . 37246)])
#@22 

(fn &optional DIR)
(defalias 'ido-is-slow-ftp-host #[256 "\204	\205H\211\206
\n\211\262\205H\304\203\305\202\306\"\205H\307\310\224\310\225#\211\235\206F	\211\203C\304@\"\204C\211A\262\2020\211\262\262\207" [ido-slow-ftp-hosts ido-slow-ftp-host-regexps ido-current-directory ido-enable-tramp-completion string-match "\\`/\\([^/]+[@:]\\)*\\([^@/:][^@/:]+\\):" "\\`/\\([^/:]*@\\)?\\([^@/:][^@/:]+\\):/" substring 2] 6 (#$ . 37475)])
#@23 

(fn &optional TIME)
(defalias 'ido-time-stamp #[256 "\300!\301\245\207" [float-time 3600] 3 (#$ . 37939)])
#@23 

(fn &optional TIME)
(defalias 'ido-cache-ftp-valid #[256 "\247\205\301V\205\211?\206\302 ZW\207" [ido-cache-ftp-work-directory-time 0 ido-time-stamp] 3 (#$ . 38055)])
#@23 

(fn &optional TIME)
(defalias 'ido-cache-unc-valid #[256 "\247\205\301V\205\211?\206\302 ZW\207" [ido-cache-unc-host-shares-time 0 ido-time-stamp] 3 (#$ . 38240)])
#@22 

(fn &optional DIR)
(defalias 'ido-may-cache-directory #[256 "\211\206\262\303!\203	\204\n\304>\203\305\207\306!\203\"\307 \207\310!\203+\311 \207\312!\2033\305\207\313\207" [ido-current-directory ido-enable-tramp-completion system-type ido-is-root-directory (windows-nt ms-dos) nil ido-is-unc-host ido-cache-unc-valid ido-is-ftp-directory ido-cache-ftp-valid ido-directory-too-big-p t] 3 (#$ . 38422)])
#@27 

(fn LIST &optional SEP)
(defalias 'ido-pp #[513 "\304\211\211\211\305\306!\307\261\210J\262\203U@\211:\203$\211@\202%\211\211;\2034\211G\310U\2034\304\262\211\203=\311p\"\210A\211\262\203P\211\203P\206N\312c\210\266\202\313c,\207" [eval-expression-print-length print-length eval-expression-print-level print-level nil "\n;; ----- " symbol-name " -----\n(\n " 0 prin1 "\n " "\n)\n"] 7 (#$ . 38850)])
#@58 Save Ido history and cache information between sessions.
(defalias 'ido-save-history #[0 "\205L	\205L\305\306!\307\310\311\312\313\314!\315\"\316$\216r\211q\210\317 \210\320c\210\321\322\300!\210\322\323!\210\322\324!\210\322\325\326\"\210\f<\203B\322\304!\210\202E\327c\210\330	\331\"+\262\207" [ido-last-directory-list ido-save-directory-list-file version-control buffer-file-coding-system ido-unc-hosts-cache get-buffer-create " *ido session*" never make-byte-code 0 "\301\300!\207" vconcat vector [kill-buffer] 2 erase-buffer ";;; -*- coding: utf-8 -*-\n" utf-8 ido-pp ido-work-directory-list ido-work-file-list ido-dir-file-cache "\n\n " "\n;; ----- ido-unc-hosts-cache -----\nt\n" write-file nil] 7 (#$ . 39284) nil])
#@137 Load Ido history and cache information from previous session.
With prefix argument, reload history unconditionally.

(fn &optional ARG)
(defalias 'ido-load-history #[256 "\211\204\f\203Z	\204Z\306!\307C\310!\203X\211\311\312!\240\210\313\314\315\316\317!\320\"\321$\216r\211\242q\210\322 \210\323!\210\3241R\325p!\325p!\325p!\325p!\325p!\2110\202V\210\202W\210*\266\326 \207" [ido-save-directory-list-file ido-last-directory-list ido-work-directory-list ido-work-file-list ido-dir-file-cache ido-unc-hosts-cache expand-file-name nil file-readable-p get-buffer-create " *ido session*" make-byte-code 0 "\301\300\242!\207" vconcat vector [kill-buffer] 2 erase-buffer insert-file-contents (error) read ido-wash-history] 9 (#$ . 40024) "P"])
#@99 Clean-up Ido history and cache information.
Removes badly formatted data and ignored directories.
(defalias 'ido-wash-history #[0 "<\2050\305\203,@:\203%@@;\203%@A;\203%@B\262A\262\202\211\237\266\202	<\205^	\305\203Z@;\203S\n\204M\306@!\204S@B\262A\262\2028\211\237\266\202<\205\201\305\203}@;\203v@B\262A\262\202f\211\237\266\202\f<\205,\f\305\203(@<\203!@G\307V\203!@@@A@@AA;\205\3101\270\311\312\"?0\202\274\210\202\305\203\305\313!\202\365:\205A\247\205@\314=\203\344\306!\205\315A!\202\365@\316=\205\317!\205\320A!\205\211\321\203@;\203A\262\202\372\305\262\305\262\202\372\262\266\203\203!@B\262A\262\202\211\211\237\266\202	\203G\322	!\305\211\203F\323@!\210\211A\262\2026\210\305\203l@\262A\262\324\312@G\305@$\210\324\312AG\305A$\210\202I\266	\305\203\207@\262A\262\324\312G\305$\210\202p\266\305\203\242@\262A\262\324\312G\305$\210\202\213\266\f\305\211\205\324@\262A\262<\203\247\203\247@\262A\262\211:\204\270\324\312G\305$\210\202\270\207" [ido-last-directory-list ido-work-directory-list ido-record-ftp-work-directories ido-work-file-list ido-dir-file-cache nil ido-is-ftp-directory 2 (error) time-equal-p 0 ido-may-cache-directory ftp ido-cache-ftp-valid unc ido-is-unc-host ido-cache-unc-valid t reverse ido-record-work-directory set-text-properties] 8 (#$ . 40786) nil])
(defalias 'ido-kill-emacs-hook #[0 "\300 \207" [ido-save-history] 1])
(defalias 'ido-common-initialization #[0 "\300\301\302\"\210\300\303\304\"\207" [add-hook minibuffer-setup-hook ido-minibuffer-setup choose-completion-string-functions ido-choose-completion-string] 3])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315&\207" [custom-declare-variable ido-everywhere funcall function #[0 "\300\207" [nil] 1] "Non-nil if Ido-Everywhere mode is enabled.\nSee the `ido-everywhere' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `ido-everywhere'." :set custom-set-minor-mode :initialize custom-initialize-default :group ido :type boolean] 12)
#@315 Toggle use of Ido for all buffer/file reading.

If called interactively, enable Ido-Everywhere mode if ARG is
positive, and disable it if ARG is zero or negative.  If called from
Lisp, also enable the mode if ARG is omitted or nil, and toggle it if
ARG is `toggle'; disable the mode otherwise.

(fn &optional ARG)
(defalias 'ido-everywhere #[256 "\301 \302\300\303=\203\304\300!?\202\305!\306V\"\210\307\304\310!\311\"\211\304\310!=\204+\302\310\"\210\210\307\304\312!\313\"\211\304\312!=\204?\302\312\"\210\210\203V\314\315\316\317B\311\320$\210\314\315\321\322B\313\320$\210\323\324\304\300!\203b\325\202c\326\"\210\327\330!\203\215\331\300!\210\301 \203{\211\301 \232\203\215\332\333\334\304\300!\203\210\335\202\211\336#\266\210\337 \210\304\300!\207" [ido-everywhere current-message set-default toggle default-value prefix-numeric-value 0 advice--remove-function read-file-name-function ido-read-file-name read-buffer-function ido-read-buffer advice--add-function :override #[0 "\300\301!\207" [default-value read-file-name-function] 2] #[257 "\300\301\"\207" [set-default read-file-name-function] 4 "\n\n(fn GV--VAL)"] nil #[0 "\300\301!\207" [default-value read-buffer-function] 2] #[257 "\300\301\"\207" [set-default read-buffer-function] 4 "\n\n(fn GV--VAL)"] run-hooks ido-everywhere-hook ido-everywhere-on-hook ido-everywhere-off-hook called-interactively-p any customize-mark-as-set "" message "Ido-Everywhere mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 43051) (byte-code "\206\301C\207" [current-prefix-arg toggle] 1)])
(defvar ido-everywhere-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\305\306\307\310\300!\205\307\211%\207" [ido-everywhere-map ido-everywhere-hook variable-documentation put "Hook run after entering or leaving `ido-everywhere'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" add-minor-mode ido-everywhere nil boundp] 6)
(defvar ido-minor-mode-map-entry nil)
#@481 Toggle Ido mode on or off.
With ARG, turn Ido mode on if arg is positive, off otherwise.
Turning on Ido mode will remap (via a minor-mode keymap) the default
keybindings for the `find-file' and `switch-to-buffer' families of
commands to the Ido versions of these functions.
However, if ARG arg equals `files', remap only commands for files, or
if it equals `buffers', remap only commands for buffer switching.
This function also adds a hook to the minibuffer.

(fn &optional ARG)
(defalias 'ido-mode #[256 "\211\204
?\2050\303\2020\211\304\267\202#\303\2020\305\2020\306\2020\211\2020\307!\310V\203/\303\2020\311\301	\203:\312\202;\313!\210\203\357\314 \210\315 \210\316\317\320\"\210\321 \322>\203\250\323\324\325#\210\323\326\327#\210\323\330\331#\210\323\332\333#\210\323\334\335#\210\323\336\337#\210\323\340\341#\210\323\342\343#\210\323\344\345#\210\323\346\347#\210\323\350\351#\210\323\352\353#\210\323\354\355#\210\323\356\357#\210\360>\203\330\323\361\362#\210\323\363\364#\210\323\365\366#\210\323\367\370#\210\323\371\372#\210\323\373\374#\210\323\375\376#\210\n\203\343\n\241\210\202\356\300B\377\201@\n\"\210\210\201A\201B!\205
\201C\201D\203	\201E\202\f\201F\"\207" [ido-mode ido-everywhere ido-minor-mode-map-entry both #s(hash-table size 6 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (t 19 files 23 buffers 27 file 31 buffer 31 both 31)) file buffer prefix-numeric-value 0 nil 1 -1 ido-common-initialization ido-load-history add-hook kill-emacs-hook ido-kill-emacs-hook make-sparse-keymap (file both) define-key [remap find-file] ido-find-file [remap find-file-read-only] ido-find-file-read-only [remap find-alternate-file] ido-find-alternate-file [remap write-file] ido-write-file [remap insert-file] ido-insert-file [remap list-directory] ido-list-directory [remap dired] ido-dired [remap find-file-other-window] ido-find-file-other-window [remap find-file-read-only-other-window] ido-find-file-read-only-other-window [remap find-alternate-file-other-window] ido-find-alternate-file-other-window [remap dired-other-window] ido-dired-other-window [remap find-file-other-frame] ido-find-file-other-frame [remap find-file-read-only-other-frame] ido-find-file-read-only-other-frame [remap dired-other-frame] ido-dired-other-frame (buffer both) [remap switch-to-buffer] ido-switch-buffer [remap switch-to-buffer-other-window] ido-switch-buffer-other-window [remap switch-to-buffer-other-frame] ido-switch-buffer-other-frame [remap insert-buffer] ido-insert-buffer [remap kill-buffer] ido-kill-buffer [remap display-buffer] ido-display-buffer [remap display-buffer-other-frame] ido-display-buffer-other-frame add-to-list minor-mode-map-alist called-interactively-p any message "Ido mode %s" "enabled" "disabled"] 6 (#$ . 45089) "P"])
(byte-code "\300\301\302\303#\210\304\301\305\306#\207" [defalias ido-init-completion-maps ignore "" make-obsolete "it does nothing." "25.1"] 4)
#@433 Set up the completion keymap used by Ido.

Create a keymap, bind `ido-completion-map' to it, and depending
on what is being completed (`ido-cur-item') set its parent keymap
to one of:

  `ido-common-completion-map'
  `ido-file-dir-completion-map'
  `ido-file-completion-map'
  `ido-buffer-completion-map'

If option `ido-context-switch-command' is non-nil or `viper-mode'
is enabled then some keybindings are changed in the keymap.
(defalias 'ido-setup-completion-map #[0 "\306 \307\300!\205	\211\203\310\311\312#\210	\313\267\202c\n\203)\310\314\n#\210\310\315\312#\210\211\203?\310\316\317#\210\310\320\317#\210\310\321\322#\210\323	\324=\203K\202L\f\"\210\202i\n\203[\310\325\n#\210\323
\"\210\202i\323\"\210\211\207" [viper-mode ido-cur-item ido-context-switch-command ido-file-completion-map ido-file-dir-completion-map ido-buffer-completion-map make-sparse-keymap boundp define-key [remap viper-intercept-ESC-key] ignore #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (dir 25 file 25 buffer 81)) "" "" [remap viper-backward-char] ido-delete-backward-updir [remap viper-del-backward-char-in-insert] [remap viper-delete-backward-word] ido-delete-backward-word-updir set-keymap-parent file "" ido-common-completion-map ido-completion-map] 6 (#$ . 48066)])
#@29 

(fn DIR &optional FIX-IT)
(defalias 'ido-final-slash #[513 "\300!\262\301\302\"\203\207\303!\203\207\211\203\304P\207\305\207" [ido-name string-match "/\\'" ido-is-tramp-root "/" nil] 5 (#$ . 49403)])
#@10 

(fn S)
(defalias 'ido-no-final-slash #[257 "\211GS\211\300V\203H\301=\203\302\300#\202\207" [0 47 substring] 6 (#$ . 49625)])
#@12 

(fn DIR)
(defalias 'ido-nonreadable-directory-p #[257 "\301\302!\205\303!?\205\304!\205\305!?)\207" [ido-enable-tramp-completion nil ido-final-slash ido-is-unc-host file-directory-p file-readable-p] 3 (#$ . 49770)])
#@12 

(fn DIR)
(defalias 'ido-directory-too-big-p #[257 "\304\211\305\306\307\310\311\312!\313\"\314\315%\n\"\206;\247\205;\316!\205;\317!?\205;\320!\205;\321\322!!\3238\262V*\207" [case-fold-search ido-enable-tramp-completion ido-big-directories ido-max-directory-size nil seq-some make-byte-code 257 "\211\300\302\303\304#)\207" vconcat vector [inhibit-changing-match-data nil t string-match] 8 "\n\n(fn REGEXP)" ido-final-slash ido-is-unc-host file-directory-p file-attributes file-truename 7] 8 (#$ . 50005)])
#@38 

(fn DIR &optional SUBDIR NO-MERGE)
(defalias 'ido-set-current-directory #[769 "\203\306\307\"\204\310\311\"\262\312\211?\2030P\262\203*\306\307\"\2040\310\311\"\262\203>\313!\203>\314!\210\f\232\203F\312\207\315!\203Z\316\317\"\210\312\211\311\207\316\320\"\210\203o\313!\203o\314!\210\321!\211?\205{\322!\311\207" [ido-enable-tramp-completion ido-use-merged-list ido-try-merged-list ido-completion-buffer ido-current-directory ido-directory-nonreadable string-match "\\`/[^/]*@\\'" ido-final-slash t nil get-buffer kill-buffer ido-is-unc-root ido-trace "unc" "cd" ido-nonreadable-directory-p ido-directory-too-big-p ido-directory-too-big] 7 (#$ . 50542)])
#@22 

(fn &optional DIR)
(defalias 'ido-set-current-home #[256 "\300\301\206\302!!\207" [ido-set-current-directory expand-file-name "~/"] 4 (#$ . 51257)])
#@95 Add (COMMAND ARG) to `command-history' if `ido-record-commands' is non-nil.

(fn COMMAND ARG)
(defalias 'ido-record-command #[514 "\205\n\301\302D\"\207" [ido-record-commands add-to-history command-history] 6 (#$ . 51417)])
#@20 

(fn ITEM PROMPT)
(defalias 'ido-make-prompt #[514 "\306>\203\302\203\302\307!	\203 \310	!\203 \311\312 	_!\202!	\313\302!\205,\n\205,\314\2056\f?\2056\315\316
\316\211\203q\211@:\203j\317@@\"\203j\211@A;\203b\320@A\321\316	$\202h\211@A!\262\211A\262\202;)\322\323!\210\206}\324\206\202\324\206\207\324	G	\203\273	\325V\203\273\211\nV\203\273\326[\"\317\327\"\330\203\264\326\"\202\265P\266\202\202\275\n\262\260\207\207" [ido-current-directory ido-max-file-prompt-width ido-find-literal ido-saved-vc-hb vc-handled-backends ido-rewrite-file-prompt-rules (file dir) abbreviate-file-name floatp floor frame-width boundp "(literal) " "[-VC] " nil string-match replace-match t run-hooks ido-rewrite-file-prompt-functions "" 0 substring "/" "..." case-fold-search] 19 (#$ . 51651)])
#@396 Perform the `ido-read-buffer' and `ido-read-file-name' functions.
Return the name of a buffer or file selected.
PROMPT is the prompt to give to the user.
DEFAULT if given is the default item to start with.
If REQUIRE-MATCH is non-nil, an existing file must be selected.
If INITIAL is non-nil, it specifies the initial input string.

(fn ITEM PROMPT HIST &optional DEFAULT REQUIRE-MATCH INITIAL)
(defalias 'ido-read-internal #[1539 "p\306\307\306\307\211\211\211\211\211\211\211\211\211\306\307	\n\307@ABCDEFGHIJ\310 \210	:\203M	@\nATB\202O	K\307L\311\312!\210\211\204\242\313\314K\"\210\307M\306N\307O\315P\203\334\316=\203\214\317\f!\203\207\320\f!\202\277\202\277;\203\245\321>\203\240\322\f!\202\277\202\277\323=\205\277Q\205\277\324RS\"\211\205\275\211A\262\211FT\235\203\313\307F\313\325F\"\210F\203\331\326U\307\262G\203\344\307H@\203\233
\327>\203\233A\204\233DCV\330K@\331=
\332=#\313\333\"\210\211\204S
\332=\2038\315R\257\307\211DC\307V\306A@\331=\2051\331\307@\202\231DCV\306A@\331=\205L\331\307@\202\231\211\334\267\202g\307@\202\231\306\307@\202\231KR\257\335@A@!\210\336K!\203\202\315K\211D\307C\211V\307N\306\211A@\313\337\306\"\210\266A\203\251\307\211AN\202\365J\340\267\202\365\307CW?\205\303X?\205\303\341F!D\202\365\307CW?\205\333X?\205\333\342F!D\202\365\307C\343F!D\202\365\307C\344F!D\307BG\203\306H\307G\345 \210V\203
\331=\203\306Y\206 \346\347!\205 '\306\f\350 T\307\211Z[\\]^'\307M\3512N\352\353\"K\307K_\307%0\262.\313\354\"\210`\203h\355`!\203h\356`!\210\313\357M\"\210M\360\267\202#@\331=\203X\361 \203X\307@\306A\202X\306\262P\262\307M\202XJ\362>\2033\307aM\363=RK\306\315K\211\203-\203\323\3641\314\365\366P\367!P\307%0\202\324\210P\202\324\262\370!\206\335\371\262\322!\262\306\262\372!\204\373\374\375\"!\203\255\3761\377\306\"\210\3060\202\210\201d\201e!\210\201f\201g!\210\307\203\255\335\307M\201h=#\210K\307\262\202\255)\266\202X\201i1F\201j\366P\"0\202H\210K\202X\306A\202X\306\262\202X\201k \203\211\201l\201mR\"\203X\201n\201oR\"K\335\201n\201gR\"!\210\306\262\202X\201p \204XM\201q=\203\276JPBLBL\201rJ\322\201sR\326\201t#!K\313\201uL\"\210\335\370\201sR\326\201t#!!\210\306\262\202X\313\201vL\"\210L@LAL\335RPP!\210\211@J\211AK\210\202X\313\201wL\"\210L\203XL@LAL\335RPP!\210\211@J\211AK\210\202\377\202X\n\203S\n\201x>\204SX\203A\201yRP!\202E\201z \204S\201{\201|!\210\202XM\201}=\204aV\204e\202l\201~V@!\262\201>\203}\306\262\202X\201\200\230\204X\201\201\230\203\251\201p \204\243\335\370\201sR\326\201t#!!\210\306\262\202X\201lb\203\267\201\202\202\272\201\203\"\203\363\201p \203\363\201\204!\204\363\335R\"\210\313\201\205\"\210\201\206 \203\355\201\207M\306\262\202X\306\262\202X\201lc\201\210>\203\201\211\202\201\212\"\203\335\370!!\210\306\262\202X\201l\201\213\"\203-\201\214!\210\202X\336!\203\234Q\203S\324RS\"\211\203I\211\241\210\202RRBSBS\210\335R\"\210L\203\226\307L@\211\262\203\222\201yRAP!\203\222LA\211L\203\207\335RA\"\210\202\213\211AK\211@J\202_\210\202X\306\262\202X\306\262\202X\201\215
:\203\267
@\206\304\201\216\202\304
\203\301
\202\304\201\216\"\210.\207" [ido-case-fold ido-enable-prefix ido-enable-regexp ido-show-confirm-message ido-pre-merge-state ido-try-merged-list t nil ido-setup-completion-map run-hooks ido-setup-hook ido-trace "\n_LOOP_" "" buffer bufferp buffer-name (file dir) file-name-nondirectory file assoc "new default" 0 (t wide) ido-make-merged-file-list auto wide "merged" #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (t 345 input-pending-p 351)) ido-set-current-directory ido-final-slash "Merged" #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (file 432 dir 456 buffer 480 list 492)) ido-make-file-list ido-make-dir-list ido-make-buffer-list ido-make-choice-list ido-set-matches boundp max-mini-window-height minibuffer-depth ido read-from-minibuffer ido-make-prompt "read-from-minibuffer" get-buffer kill-buffer "\n_EXIT_" #s(hash-table size 15 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (refresh 629 done 650 edit 663 chdir 663 keep 845 dired 851 fallback 851 find-file 851 switch-to-buffer 851 insert-buffer 851 insert-file 851 updir 857 push 857 pop 979 pop-all 1015)) input-pending-p (file dir) edit (quit) read-file-name "[EDIT] " expand-file-name file-name-directory "/" file-directory-p yes-or-no-p format "Create directory %s? " (error) make-directory ido-use-merged-list ido-keep-item-list ido-rotate-temp ido-ignored-list ido-cur-list icomplete-mode ido-default-item ido-process-ignore-lists-inhibit ido-process-ignore-lists ido-entry-buffer ido-cur-item ido-text-init ido-input-stack ido-exit ido-rescan ido-rotate ido-text ido-enable-last-directory-history ido-current-directory ido-last-directory-list ido-ignore-item-temp-list ido-initial-position ido-matches ido-directory-nonreadable ido-directory-too-big ido-max-window-height history-add-new-input show-paren-mode ido-use-mycompletion-depth ido-require-match ido-completing-read ido-completion-map ido-completion-buffer read-file-name-function ido-enable-tramp-completion system-type message "Could not create directory" sit-for 1 chdir (quit) read-string ido-is-tramp-root string-match "\\`\\(/\\([^/]+[:@]\\)*\\)\\([^/]+\\)[:@]\\'" match-string 3 ido-is-root-directory push dir substring -1 "push" "pop" "pop-all" (confirm confirm-after-completion) file-exists-p ido-existing-item-p error "Must specify valid item" takeprompt ido-name (buffer list) "./" "../" ".[:@]\\'" ".:\\'" ido-local-file-exists-p "tramp prefix" ido-is-slow-ftp-host fallback (windows-nt ms-dos) "\\`[a-zA-Z]:\\|[/\\][^/\\]" "/[^/]" "\\`~" ido-set-current-home add-to-history minibuffer-history] 28 (#$ . 52497)])
#@137 Edit absolute file name entered so far with Ido; terminate by RET.
If cursor is not at the end of the user input, move to end of input.
(defalias 'ido-edit-input #[0 "m\204\304\207\203\305@!\202	\306\307 \207" [ido-matches ido-text ido-text-init ido-exit nil ido-name edit exit-minibuffer] 2 (#$ . 58665) nil])
#@68 

(fn METHOD &optional FALLBACK PROMPT DEFAULT INITIAL SWITCH-CMD)
(defalias 'ido-buffer-internal #[1537 "\204\306\307\206\f\310\"\210\311\206\310!\207\312\211\312\211\312.\205*.\313=?/\314 \315\316\2066\317\320&\3120\321\267\202\213\322	\323>\203S	\202U1\312\211\211\2112&\202I\322\324\325\312\326\3122\327&\202I\3123	\206{\206{\3104\306\3074\"\210\3114!)\202I\204\223\312\202IG\330U\203\236\312\202I\331!\203\314\332\333\"\210\324=\203\303\334\335\"\210\336\212\337\331!!\210`)!\202I\340\n\341#\202I/\203\3555\203\355\3425\"\211\262\203\355\340\343A!\n\341#\202I6\344=\203\204\345\346\347\"!\204\312\202I6\350=\203\204\351\352\"\202I6\344=\203/\204/\345\346\347\"!\204/\312\202I\332\333\"\210\353!\262\354\355!\203C\355!\210\340\n\341#-\207" [ido-mode ido-fallback ido-context-switch-command ido-current-directory ido-directory-nonreadable ido-directory-too-big run-hook-with-args ido-before-fallback-functions switch-to-buffer call-interactively nil auto confirm-nonexistent-file-or-buffer ido-read-internal buffer "Buffer: " ido-buffer-history #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (find-file 70 insert-file 96 fallback 110)) ido-file-internal (other-window other-frame) insert insert-file "Insert file: " ido-enter-insert-buffer 0 get-buffer add-to-history buffer-name-history ido-record-command insert-buffer push-mark insert-buffer-substring ido-visit-buffer t assoc find-file-noselect prompt y-or-n-p format-message "No buffer matching `%s', create one? " never message "No buffer matching `%s'" get-buffer-create fboundp set-buffer-major-mode ido-use-virtual-buffers ido-enable-virtual-buffers ido-exit ido-default-file-method ido-text read-buffer-function this-command ido-virtual-buffers ido-create-new-buffer] 18 (#$ . 58993)])
#@22 

(fn &optional DIR)
(defalias 'ido-record-work-directory #[256 "\247\205T\305V\205T\211\206	\211\262\203G\211G\305V\203G\n\306\211\203:\203:\307@\"\2033\306\262\211A\262\202 \203E\310\f\"B)\210\fGV\205TS\f\233\306\241\207" [ido-max-work-directory-list ido-current-directory ido-work-directory-list-ignore-regexps case-fold-search ido-work-directory-list 0 nil string-match delete] 6 (#$ . 60896)])
(defalias 'ido-forget-work-directory #[0 "\205\"	\205\"\306	\"\n\205\"\307 \210\310\311\211
\311\f\312 \207" [ido-current-directory ido-work-directory-list ido-use-merged-list ido-exit ido-try-merged-list ido-text delete ido-undo-merge-work-directory refresh t exit-minibuffer ido-text-init ido-rotate-temp] 4 nil nil])
#@13 

(fn NAME)
(defalias 'ido-record-work-file #[257 "\247\205*\302V\205*	\203	@\232\204\211\303	\"B	GV\205*S	\233\304\241\207" [ido-max-work-file-list ido-work-file-list 0 delete nil] 5 (#$ . 61660)])
#@12 

(fn DIR)
(defalias 'ido-expand-directory #[257 "\301\302\206!\303\"\207" [default-directory ido-final-slash expand-file-name t] 4 (#$ . 61879)])
#@73 

(fn METHOD &optional FALLBACK DEFAULT PROMPT ITEM INITIAL SWITCH-CMD)
(defalias 'ido-file-internal #[1793 "\204\306\262\307\310!\307\211\211
\203!\311 \203*\312\262\313@\2027\314\f!\211?\2056\315\f!\306=\203\257A\204HB\203\257\307\316\317!\210A\203lC\203l\320\321 \206_\322 !\203l\317@\312\262\202\256B\203\256B\323=\203}\324 \202\325 \211\262\203\256\326\327\"\204\256\330!\331!\203\234\332!\202\255\331\333!!\203\255\333!\334!\262	\210\210\307\335\336!\205\270\337\211\307DEFG\211\204\354G\312H\340\n\206\331\341\342\343=\205\343I\344 \f&\262)@\345\267\202Y\f\307JK\206\n\206\346L\347\350L\"\210\351L!*\202\341\352\f\353>\203 \f\202\"M\307\211\211N%\202\341\352\354\355\356\307N\357&\202\341\360\267\202G\361\202H\362\202H\363\fN\206O\364P!\202\341\365 \202\341\366\267\202\265\367!\210\fK\370 \210\371!\202\341\367!\210\fK\370 \210\372!\202\341\211\373\232\203\211\364\262\374\fP\312\"\375\376\337#\331!\203\253\377\"\210\370!\210
!\202,\331\f!\203%\201O!\203\330\377\f\"\210\370 \210
\f!\210
\363=\205,\201P\330!!\202,\326\201Q\"\203\366\fP\262\377\"\210\370 \210
!\202,\201R\201S\201T\"!\203\377\"\210\370!\210\201U!\210
!\202,\377\201V\"\202,\201W\201X!\266\202\202\341\367!\210\fK\fP\262\377\201Y\"\210\201Z\201[\"\210\370 \210\201Y\312\"\202\341\367!\210\fP\262\377\"\210\370 \210\347\350\f\"\210\n!\202\341\367!\210\fP\262\377D\203\215\201\\\202\220\201]\"\210\201Z\201[\"\210\370 \210\201^D\203\256\201_\202\261\201`\"\202\341\211\205\341\367!\210\fP\262\377\346\"\210\201Z\201[\"\210\370 \210\201a\201b\307D#
\".	\207" [ido-fallback ido-directory-too-big ido-directory-nonreadable ido-context-switch-command ido-current-directory ido-mode file nil ido-expand-directory ido-is-slow-ftp-host t fallback ido-nonreadable-directory-p ido-directory-too-big-p require ffap ffap-fixup-url ffap-url-at-point ffap-gopher-at-point guess ffap-guesser ffap-string-at-point string-match "\\`http:/" expand-file-name file-directory-p file-name-as-directory file-name-directory file-name-nondirectory boundp vc-handled-backends -1 ido-read-internal "Find file: " ido-file-history alt-file confirm-nonexistent-file-or-buffer #s(hash-table size 5 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (fallback 243 switch-to-buffer 275 insert-buffer 299 dired 312 ffap 340)) find-file run-hook-with-args ido-before-fallback-functions call-interactively ido-buffer-internal (other-window other-frame) insert insert-buffer "Insert buffer: " ido-enter-insert-file #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (other-window 319 other-frame 323)) dired-other-window dired-other-frame dired "" find-file-at-point #s(hash-table size 9 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (alt-file 352 alt-file-other-window 368 dired 384 dired-other-window 384 dired-other-frame 384 list-directory 384 write 561 read-only 601 insert 632)) ido-record-work-file ido-record-work-directory find-alternate-file find-alternate-file-other-window "." ido-final-slash substring 0 ido-record-command ido-exit ido-use-url-at-point ido-use-filename-at-point ffap-url-regexp ido-find-literal ido-work-file-index ido-work-directory-index ido-saved-vc-hb minibuffer-completing-file-name buffer-file-name read-file-name-function default-directory this-command ido-default-buffer-method ido-text file-exists-p dired-goto-file "[[*?]" y-or-n-p format "Directory %s does not exist.  Create it? " make-directory-internal make-directory error "No such directory" write-file add-to-history file-name-history insert-file-literally insert-file insert-file-1 insert-file-contents-literally insert-file-contents ido-visit-buffer find-file-noselect] 20 (#$ . 62036)])
(defalias 'ido-existing-item-p #[0 "??\207" [ido-matches] 1])
(defalias 'ido-set-common-completion #[0 "\304\211	\203#\n\204#;\203#G\305V\203#\306	\"\211\262\203#\211\211\207" [ido-common-match-string ido-matches ido-enable-regexp ido-text nil 0 ido-find-common-substring] 4])
#@62 Try and complete the current pattern amongst the file names.
(defalias 'ido-complete #[0 "\306\206\343	\307>\203S\310\311\n\"\203S\312\nP!\313\314!!\204%\315\316!\202N\317!\2032\320!\210\202J\314!\2069\321\322!\317!\203H\320!\210\211\266\323\324 \262\202\343\203d\306\n\323\324 \202\343\204x\205\343\325\211 !\202\343G\326U\203\275!\203\226\321\230\203\226\310\327\330@!\"\204\275\331\330@!!\204\275\"\204\252\324 \202\343#?$\332 `|\210\330@!c\202\343%\262\211\333>\204\334\211\n\232\204\334#?$\332 `|\210\211c\202\343\325\211 !\207" [ido-incomplete-regexp ido-cur-item ido-text ido-current-directory ido-text-init ido-exit nil (file dir) string-match "[$]" substitute-in-file-name file-exists-p file-name-directory message "Expansion generates non-existing directory name" file-directory-p ido-set-current-directory "/" file-name-nondirectory refresh exit-minibuffer call-interactively 1 ".[@:]\\'" ido-name ido-local-file-exists-p minibuffer-prompt-end (t nil) ido-directory-too-big ido-matches ido-completion-buffer ido-cannot-complete-command this-command ido-enable-tramp-completion ido-confirm-unique-completion ido-enable-prefix ido-rescan ido-common-match-string] 6 (#$ . 66262) nil])
#@56 Try completion unless inserting the space makes sense.
(defalias 'ido-complete-space #[0 ";\203Q	;\203QG	GV\203	GH\303U\202K\n\203J\304\305	!\306P\n\211\203D\307\310@!\"\203=\304\262\311\262\202&\211A\262\202&\266\203\202K\304\203Q\306c\207\312 \207" [ido-common-match-string ido-text ido-matches 32 nil regexp-quote " " string-match ido-name t ido-complete] 7 (#$ . 67533) nil])
#@149 Undo or redo last Ido directory merge operation.
If no merge has yet taken place, toggle automatic merging option.

(fn &optional TEXT TRY REFRESH)
(defalias 'ido-undo-merge-work-directory #[768 "\2031\306A@!\210\206@\3078\3108\3118\312\211?\312\313\312\314 \207\2037\312\207\203A\312\211\207\f\203J\315\211\207
?\205Q\316 \207" [ido-pre-merge-state ido-text-init ido-cur-list ido-ignored-list ido-matches ido-use-merged-list ido-set-current-directory 2 3 4 nil refresh exit-minibuffer t ido-merge-work-directories ido-try-merged-list ido-keep-item-list ido-rescan ido-exit] 5 (#$ . 67941) nil])
#@327 Move forward in user input or perform magic action.
If no user input is present, or at end of input, perform magic actions:
C-x C-b ... C-f  switch to `ido-find-file'.
C-x C-f ... C-f  fallback to non-Ido `find-file'.
C-x C-d ... C-f  fallback to non-Ido brief `dired'.
C-x d ... C-f    fallback to non-Ido `dired'.

(fn ARG)
(defalias 'ido-magic-forward-char #[257 "\211\204m\204\302!d`Z^u\207\303>\203\304 \207	\203\"\305	!\207\306=\205*\307 \207" [ido-cur-item ido-context-switch-command prefix-numeric-value (file dir) ido-fallback-command call-interactively buffer ido-enter-find-file] 4 (#$ . 68580) "P"])
#@323 Move backward in user input or perform magic action.
If no user input is present, or at start of input, perform magic actions:
C-x C-f C-b  switch to `ido-switch-buffer'.
C-x C-d C-b  switch to `ido-switch-buffer'.
C-x d C-b    switch to `ido-switch-buffer'.
C-x C-b C-b  fallback to non-Ido `switch-to-buffer'.

(fn ARG)
(defalias 'ido-magic-backward-char #[257 "\211\204`\304 V\203\305!`\304 Z^[u\207	=\203*\n\306>\205)o?\205=\307 \207\n\310=\2033\311 \207\203;\312!\207\313 \207" [last-command this-command ido-cur-item ido-context-switch-command minibuffer-prompt-end prefix-numeric-value (file dir) ido-push-dir buffer ido-fallback-command call-interactively ido-enter-switch-buffer] 4 (#$ . 69210) "P"])
#@173 Delete following char in user input or perform magic action.
If at end of user input, perform magic actions:
C-x C-f ... C-d  enter `dired' on current directory.

(fn ARG)
(defalias 'ido-magic-delete-char #[257 "\211\204m\204\302\303!d`Z^!\207\203\304\207	\305>\205 \306 \207" [ido-context-switch-command ido-cur-item delete-char prefix-numeric-value nil (file dir) ido-enter-dired] 5 (#$ . 69940) "P"])
#@38 Toggle the value of `ido-case-fold'.
(defalias 'ido-toggle-case #[0 "?\302\211\207" [ido-case-fold ido-rescan t] 2 (#$ . 70359) nil])
#@42 Toggle the value of `ido-enable-regexp'.
(defalias 'ido-toggle-regexp #[0 "?\302\211\207" [ido-enable-regexp ido-rescan t] 2 (#$ . 70502) nil])
#@42 Toggle the value of `ido-enable-prefix'.
(defalias 'ido-toggle-prefix #[0 "?\302\211\207" [ido-enable-prefix ido-rescan t] 2 (#$ . 70655) nil])
#@58 Toggle ignoring files specified with `ido-ignore-files'.
(defalias 'ido-toggle-ignore #[0 "m\204`\305 V\203\305 b\207\203\306\307!\210\310\202	?\n\311\312 \207" [ido-directory-too-big ido-process-ignore-lists ido-text ido-text-init ido-exit minibuffer-prompt-end message "Reading directory..." nil refresh exit-minibuffer] 2 (#$ . 70808) nil])
#@39 Toggle version control for this file.
(defalias 'ido-toggle-vc #[0 "\205	\306=\205\n?\205\f\307	\310 \207" [ido-mode ido-cur-item vc-handled-backends ido-saved-vc-hb ido-text ido-text-init file keep exit-minibuffer ido-exit] 2 (#$ . 71171) nil])
#@38 Toggle literal reading of this file.
(defalias 'ido-toggle-literal #[0 "\205	\306=\205\n?\307\310 \207" [ido-mode ido-cur-item ido-find-literal ido-text ido-text-init ido-exit file keep exit-minibuffer] 2 (#$ . 71434) nil])
#@101 Toggle the use of virtual buffers.
See `ido-use-virtual-buffers' for explanation of virtual buffer.
(defalias 'ido-toggle-virtual-buffers #[0 "\205	\306=\205\n?\205\307\310\311 \207" [ido-mode ido-cur-item ido-enable-virtual-buffers ido-text ido-text-init ido-exit buffer always refresh exit-minibuffer] 2 (#$ . 71674) nil])
#@154 Read current directory again.
May be useful if cached version is no longer valid, but directory
timestamp has not changed (e.g. with FTP or on Windows).
(defalias 'ido-reread-directory #[0 "\205\"	\306>\205\"\307 \203\310\202\311!\210\f\310\f\312
\313 \207" [ido-mode ido-cur-item ido-unc-hosts-cache ido-current-directory ido-text ido-text-init (file dir) ido-is-unc-root t ido-remove-cached-dir refresh exit-minibuffer ido-rotate-temp ido-exit] 2 (#$ . 72017) nil])
#@66 Exit minibuffer, but make sure we have a match if one is needed.
(defalias 'ido-exit-minibuffer #[0 "\203\306>\203	\307=\204\n=\204\310\311 \205$
?\205$\312 \207" [ido-require-match ido-cur-item last-command this-command ido-show-confirm-message ido-incomplete-regexp (confirm confirm-after-completion) dir t ido-existing-item-p exit-minibuffer] 2 (#$ . 72503) nil])
#@129 Select the buffer or file named by the prompt.
If no buffer or file exactly matching the prompt exists, maybe create a new one.
(defalias 'ido-select-text #[0 "\301\302 \207" [ido-exit takeprompt exit-minibuffer] 1 (#$ . 72891) nil])
#@153 Fallback to non-Ido version of current command.
The optional FALLBACK-COMMAND argument indicates which command to run.

(fn &optional FALLBACK-COMMAND)
(defalias 'ido-fallback-command #[256 "G\211\304V\203S\211\262H	B\202\210\305\211\306 \207" [ido-text unread-command-events ido-exit ido-fallback 0 fallback exit-minibuffer] 5 (#$ . 73133) nil])
#@46 Drop into `find-file' from buffer switching.
(defalias 'ido-enter-find-file #[0 "\301\302 \207" [ido-exit find-file exit-minibuffer] 1 (#$ . 73497) nil])
#@52 Drop into `ido-switch-buffer' from file switching.
(defalias 'ido-enter-switch-buffer #[0 "\301\302 \207" [ido-exit switch-to-buffer exit-minibuffer] 1 (#$ . 73658) nil])
#@40 Drop into `dired' from file switching.
(defalias 'ido-enter-dired #[0 "\301\302 \207" [ido-exit dired exit-minibuffer] 1 (#$ . 73836) nil])
#@45 Drop into `insert-buffer' from insert file.
(defalias 'ido-enter-insert-buffer #[0 "\301\302 \207" [ido-exit insert-buffer exit-minibuffer] 1 (#$ . 73983) nil])
#@45 Drop into `insert-file' from insert buffer.
(defalias 'ido-enter-insert-file #[0 "\301\302 \207" [ido-exit insert-file exit-minibuffer] 1 (#$ . 74151) nil])
#@50 Go up one directory level.

(fn &optional CLEAR)
(defalias 'ido-up-directory #[256 "\211?\205\304\305\306 \207" [ido-text ido-text-init ido-exit ido-rotate-temp updir t exit-minibuffer] 2 (#$ . 74315) "P"])
#@80 Delete char backwards, or at beginning of buffer, go up one level.

(fn COUNT)
(defalias 'ido-delete-backward-updir #[257 "\303 `U\203\211?\205:\304\305!\207\203%@	\230\203%\306\307	\310\311#\305\211#\207\n\312\267\2024\n\313!!\207\n \207\314\313![!\207" [ido-pre-merge-state ido-text this-original-command minibuffer-prompt-end ido-up-directory t ido-undo-merge-work-directory substring 0 -1 #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (viper-backward-char 43 viper-del-backward-char-in-insert 49)) prefix-numeric-value delete-char] 6 (#$ . 74534) "P"])
#@85 Delete all chars backwards, or at beginning of buffer, go up one level.

(fn COUNT)
(defalias 'ido-delete-backward-word-updir #[257 "\301 `U\203\211?\205!\302\303!\207\304=\203\305!!\207\306\305!!\207" [this-original-command minibuffer-prompt-end ido-up-directory t viper-delete-backward-word prefix-numeric-value backward-kill-word] 4 (#$ . 75146) "P"])
#@34 

(fn &optional INCR MUST-MATCH)
(defalias 'ido-get-work-directory #[512 "G	\305\306\n\203\nG\305U\203\306\262W\203x\\\262T\262\305V\2035Y\203?\305\262\202?\305W\203?S\2628\262\211\203r\211\232\204r\307!\203r\203l\310\f\311=\203e\312!\202h\313!!\203r\262\202\306\262\202\211\203~\207" [ido-work-directory-list ido-work-directory-index ido-text ido-current-directory ido-cur-item 0 nil file-directory-p ido-set-matches-1 file ido-make-file-list-1 ido-make-dir-list-1] 9 (#$ . 75516)])
#@43 Change to next working directory in list.
(defalias 'ido-prev-work-directory #[0 "\305\306\"\211\205\307!\210\310\n\311\312 \207" [ido-work-directory-match-only ido-exit ido-text ido-text-init ido-rotate-temp ido-get-work-directory 1 ido-set-current-directory refresh t exit-minibuffer] 3 (#$ . 76057) nil])
#@47 Change to previous working directory in list.
(defalias 'ido-next-work-directory #[0 "\305\306\"\211\205\307!\210\310\n\311\312 \207" [ido-work-directory-match-only ido-exit ido-text ido-text-init ido-rotate-temp ido-get-work-directory -1 ido-set-current-directory refresh t exit-minibuffer] 3 (#$ . 76378) nil])
#@82 Search (and merge) work directories for files matching the current input string.
(defalias 'ido-merge-work-directories #[0 "\306\211\307\306\310 \207" [ido-use-merged-list ido-try-merged-list ido-exit ido-text ido-text-init ido-rotate-temp t refresh exit-minibuffer] 2 (#$ . 76704) nil])
#@99 Prompt for FILE to search for using `find', starting from current directory.

(fn &optional FILE)
(defalias 'ido-wide-find-file #[256 "\211\204\306\3071\310\311	P\n\"0\202\210\312\262)\211G\313V\205.\306\314\315\211\306\316 \207" [enable-recursive-minibuffers ido-current-directory ido-text ido-use-merged-list ido-try-merged-list ido-exit t (quit) read-string "Wide find file: " "" 0 wide refresh exit-minibuffer ido-text-init ido-rotate-temp] 4 (#$ . 77004) nil])
#@97 Prompt for DIR to search for using `find', starting from current directory.

(fn &optional DIR)
(defalias 'ido-wide-find-dir #[256 "\211\204\306\3071\310\311	P\n\"0\202\210\312\262)\211G\313V\2051\306\314\315\316\306\"\306\317 \207" [enable-recursive-minibuffers ido-current-directory ido-text ido-use-merged-list ido-try-merged-list ido-exit t (quit) read-string "Wide find directory: " "" 0 wide refresh ido-final-slash exit-minibuffer ido-text-init ido-rotate-temp] 4 (#$ . 77492) nil])
#@162 Prompt for DIR to search for using `find', starting from current directory.
If input stack is non-empty, delete current directory component.

(fn &optional DIR)
(defalias 'ido-wide-find-dir-or-delete-dir #[256 "\203\301\302!\207\303 \207" [ido-input-stack ido-delete-backward-word-updir 1 ido-wide-find-dir] 3 (#$ . 78006) nil])
#@40 Use first matching item as input text.
(defalias 'ido-take-first-match #[0 "\205
\303@!\304\305 \207" [ido-matches ido-text-init ido-exit ido-name refresh exit-minibuffer] 2 (#$ . 78344) nil])
#@71 Move to previous directory in file name, push current input on stack.
(defalias 'ido-push-dir #[0 "\301\302 \207" [ido-exit push exit-minibuffer] 1 (#$ . 78548) nil])
#@69 Move to previous directory in file name, push first match on stack.
(defalias 'ido-push-dir-first #[0 "\203	\303@!\304\305 \207" [ido-matches ido-text ido-exit ido-name push exit-minibuffer] 2 (#$ . 78722) nil])
#@103 Pop directory from input stack back to input.
With \[universal-argument], pop all elements.

(fn ARG)
(defalias 'ido-pop-dir #[257 "\205\211\203\f\302\202
\303\304 \207" [ido-input-stack ido-exit pop-all pop exit-minibuffer] 2 (#$ . 78946) "P"])
#@12 

(fn ARG)
(defalias 'ido-wide-find-file-or-pop-dir #[257 "\203\301!\207\302 \207" [ido-input-stack ido-pop-dir ido-wide-find-file] 3 (#$ . 79204) "P"])
#@68 Prompt for DIR to create in current directory.

(fn &optional DIR)
(defalias 'ido-make-directory #[256 "\211\204\306\307\310	P\n\"\262)\211G\311V\2053	P\262\312!?\2053\313\306\"\210\314!\210\315\316\306\317 \207" [enable-recursive-minibuffers ido-current-directory ido-text ido-exit ido-text-init ido-rotate-temp t read-string "Make directory: " 0 file-exists-p make-directory ido-set-current-directory refresh nil exit-minibuffer] 4 (#$ . 79367) nil])
#@13 

(fn INCR)
(defalias 'ido-get-work-file #[257 "G	\\\302\303V\203Y\203\"\303\262\202\"\303W\203\"S\2628\262\207" [ido-work-file-list ido-work-file-index nil 0] 6 (#$ . 79840)])
#@43 Change to next working file name in list.
(defalias 'ido-prev-work-file #[0 "\302\303!\211\205
\211\304\305 \207" [ido-text-init ido-exit ido-get-work-file 1 refresh exit-minibuffer] 2 (#$ . 80042) nil])
#@47 Change to previous working file name in list.
(defalias 'ido-next-work-file #[0 "\302\303!\211\205
\211\304\305 \207" [ido-text-init ido-exit ido-get-work-file -1 refresh exit-minibuffer] 2 (#$ . 80255) nil])
#@93 Insert file name of current buffer.
If repeated, insert text from buffer instead.

(fn ALL)
(defalias 'ido-copy-current-file-name #[257 "\306!\206	\307!\211\205\310!\211\205@\204-	\n=\204-\311!\232\203-\312\313\"\2041\211\2028\314\315\211\224T#\316\317\320 \207" [ido-entry-buffer last-command this-command ido-current-directory ido-text-init ido-exit buffer-file-name buffer-name file-name-nondirectory file-name-directory string-match "\\.[^.]*\\'" substring 0 refresh nil exit-minibuffer ido-try-merged-list] 7 (#$ . 80473) "P"])
#@77 Insert current word (file or directory name) from current buffer.

(fn ALL)
(defalias 'ido-copy-current-word #[257 "rq\210`\306\211\211	\203\307 U\204\307 \262\202F\310 \210`\262\306\210`\262b\210\311\312\313#\2034\313u\210`\262\314\315\313#\210\211`U\203F\306\262\211\205N\316`\"\266\204)\211\204Y\306\202\211\317\320\"\203j\211\306\321\211\202\204\317\322\"\203}
P\306\321\211\202\204\211\306\323\211\205\211\324 \207" [ido-entry-buffer mark-active ido-text-init ido-try-merged-list ido-exit ido-current-directory nil mark beginning-of-line re-search-backward "[^-_a-zA-Z0-9:./\\~@]" 1 re-search-forward "[-_a-zA-Z0-9:./\\~@]*" buffer-substring-no-properties string-match "\\`[~/]" chdir "/" refresh exit-minibuffer] 9 (#$ . 81033) "P"])
#@60 Put first element of `ido-matches' at the end of the list.
(defalias 'ido-next-match #[0 "\205A@\303	\"\303\"\304\211\262\207" [ido-matches ido-cur-list ido-rescan ido-chop nil] 4 (#$ . 81818) nil])
#@61 Put last element of `ido-matches' at the front of the list.
(defalias 'ido-prev-match #[0 "\205\303!@\304	\"\304\"\305\211\262\207" [ido-matches ido-cur-list ido-rescan last ido-chop nil] 4 (#$ . 82034) nil])
#@125 Find next directory in match list.
If work directories have been merged, cycle through directories for
first matching file.
(defalias 'ido-next-match-dir #[0 "\203 	\205H	@\211A\211G\304V\203\305\211A@\"\241\210\306\211\207	G\304\211W\2038\307	8!\2048\211T\262\202#\211W\205F\305	8\"\211\266\202\207" [ido-use-merged-list ido-matches ido-rescan ido-cur-list 1 ido-chop nil ido-final-slash] 6 (#$ . 82261) nil])
#@129 Find previous directory in match list.
If work directories have been merged, cycle through directories
for first matching file.
(defalias 'ido-prev-match-dir #[0 "\203!	\205J	@\211A\211G\304V\203\305\306!@\"\241\210\307\211\207	G\211S\211\310V\203:\311	8!\204:\211S\262\202%\211\310V\205H\305	8\"\211\266\202\207" [ido-use-merged-list ido-matches ido-rescan ido-cur-list 1 ido-chop last nil 0 ido-final-slash] 7 (#$ . 82698) nil])
#@190 Set current item list to the currently matched items.

When argument REMOVEP is non-nil, the currently matched items are
instead removed from the current item list.

(fn &optional REMOVEP)
(defalias 'ido-restrict-to-matches #[256 "\205\211\203\305	\"\202\211\306\307\310\311 \207" [ido-matches ido-cur-list ido-text-init ido-rescan ido-exit seq-difference "" nil keep exit-minibuffer] 5 (#$ . 83154) "P"])
#@84 Remove all elements before ELEM and put them at the end of ITEMS.

(fn ITEMS ELEM)
(defalias 'ido-chop #[514 "\300\211\211\204'@\262\232\203\301\237\"\262\202A\262B\262\202\207" [nil append] 8 (#$ . 83580)])
#@13 

(fn ITEM)
(defalias 'ido-name #[257 "\211:\203\211@\207\207" [] 2 (#$ . 83815)])
(defalias 'ido-all-completions #[0 "\305\211\n\306\267\202\307!\202 \310!\202 \311 \202 \f\202 \305*\207" [ido-directory-too-big ido-process-ignore-lists ido-cur-item ido-current-directory ido-choice-list nil #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (file 10 dir 16 buffer 22 list 27)) ido-make-file-list-1 ido-make-dir-list-1 ido-make-buffer-list-1] 2])
#@12 

(fn A B)
(defalias 'ido-file-lessp #[514 "\300!\300!\231\207" [ido-no-final-slash] 5 (#$ . 84315)])
#@12 

(fn A B)
(defalias 'ido-file-extension-lessp #[514 "\300\301\302\301\302\211&\302\211\303=?\205q\301W\203-[S\262\262\262\211\262\303\262\2021S\262\301U\203;\202qH\304U\203L\305$\202q\306V\203aH\304U\204aS\262\202L\307V\203p\305$\202q\207" [compare-strings 0 nil t 46 ido-file-extension-aux 2 1] 10 (#$ . 84425)])
#@20 

(fn A B N LESSP)
(defalias 'ido-file-extension-aux #[1028 "\300\"\300\"\203*\211\203*U\203\202<\203$V\202<W\202<\2033?\202<\211\203;\202<\207" [ido-file-extension-order] 8 (#$ . 84792)])
#@12 

(fn S N)
(defalias 'ido-file-extension-order #[514 "\301\302\211\203@@\303=\203\262A\262\2029\304\302@\301\302\211&\303=\2035\262\302\262\2029A\262T\262\202\206E\211\207" [ido-file-extensions-order 0 nil t compare-strings] 14 (#$ . 85016)])
#@22 

(fn ITEMS PROMOTE)
(defalias 'ido-sort-merged-list #[514 "\301\302\"\303\211\211\203S@\262A\262\203D@@@\230\203D\211\203)A\202*@A@AB\241\210\203A\230\203\304\262\202@ADB\262\303\262\202\207" [ido-current-directory sort #[514 "\211@@\231\207" [] 4 "\n\n(fn A B)"] nil t] 9 (#$ . 85296)])
#@42 

(fn DIR FILE &optional PREFIX FINDDIR)
(defalias 'ido-wide-find-dirs-or-files #[1026 "\301\302\303\304\305\306\307\310!\203\311\202\312\310\203\313\202\314
\314Q!\315\203.\316\202/\317\320\260!!\"\"\302\211\211\211\203q@\262A\262\321!\203:\322!\203:\323!\262\324!\262\203g\325\326\"\202hBB\262\202:\207" [ido-case-fold delq nil mapcar #[257 "\301\302#?\205\n\211\207" [ido-ignore-files ido-ignore-item-p t] 5 "\n\n(fn NAME)"] split-string shell-command-to-string "find " shell-quote-argument " -iname " " -name " "" "*" " -type " "d" "f" " -print" file-name-absolute-p file-exists-p file-name-directory file-name-nondirectory ido-final-slash t] 17 (#$ . 85628)])
#@80 Create a list of directory names based on a merged directory list.

(fn ITEMS)
(defalias 'ido-flatten-merged-list #[257 "\300\203'@\211@A\211\203\211@PB\262\211A\262\202\266A\262\202\211\207" [nil] 7 (#$ . 86344)])
#@23 

(fn TEXT AUTO WIDE)
(defalias 'ido-make-merged-file-list-1 #[771 "\306\307!\203\207\203\207\203\310	\311\312\313#\n\314$\262\202\315\311\312\313#!\316P\306\211\211\211\203\202@\262@\262A\262\317\"\204oAA\262\203o@\262A\262\320\"\203I\317\f\"\204I\211BB\262\202I\203-\321 \203-\306\262\314\262\202-\266\202\203\226\310	\n\306$\262\202
\205\240G\312V\306\211\203\265	\235\204\265	B\262\203@\262A\262\203;\203\204\325\322!\204\323!\203\324=\203\351\325\314\"\202\355\326\314\"\211\262\203\203\374\327!\262\211\203\211\244\262\203\265\321 \203\265\306\262\314\262\202\265)\266\211\207" [ido-dir-file-cache ido-current-directory ido-enable-prefix ido-ignore-directories-merge ido-ignore-directories ido-work-directory-list nil ido-final-slash ido-wide-find-dirs-or-files substring 0 -1 t regexp-quote "[^/:]*/\\'" ido-ignore-item-p string-match input-pending-p ido-is-ftp-directory file-directory-p file ido-make-file-list-1 ido-make-dir-list-1 ido-set-matches-1 ido-text ido-merge-ftp-work-directories ido-cur-item] 13 (#$ . 86582)])
#@23 

(fn TEXT AUTO WIDE)
(defalias 'ido-make-merged-file-list #[771 "\306\307\310\"\210\3111[\3121E\306\3132@\313\306\314 \206%\315#\262\n	=\2033\306\316\202<\n\203;\306\202<\211)\266\2020)0\202K\210\316\317\320!\211\262\316=\205W\314\211\2620\202d\210\316\262\306\211\211\210\211\203t\211<\203t\321\"\262
\204}\203\244\211<\203\244G\322V\203\244\323\"\211\203\243\211@=\204\243\324\"\262\211B\262\210\307\306!\210\211\207" [inhibit-quit throw-on-input quit-flag ido-try-merged-list ido-use-merged-list ido-rotate-temp nil message "Searching for `%s'...." (quit) (quit) #1=#:input input-pending-p ido-make-merged-file-list-1 t eval (ignore nil) ido-sort-merged-list 0 assoc delq ido-rotate-file-list-default] 11 (#$ . 87742)])
#@72 Return list of non-ignored buffer names.

(fn &optional FRAME VISIBLE)
(defalias 'ido-make-buffer-list-1 #[512 "\300\301\302\303\304\305\306\307!\310\"\311\312%\313!\"\"\207" [delq nil mapcar make-byte-code 257 "\302!\303	\"\206
\211\300\235?\205\211\207" vconcat vector [ido-ignore-buffers buffer-name ido-ignore-item-p] 5 "\n\n(fn X)" buffer-list] 11 (#$ . 88523)])
#@364 Return the current list of buffers.
Currently visible buffers are put at the end of the list.
The hook `ido-make-buffer-list-hook' is run after the list has been
created to allow the user to further modify the order of the buffer names
in this list.  If DEFAULT is non-nil, and corresponds to an existing buffer,
it is put to the start of the list.

(fn DEFAULT)
(defalias 'ido-make-buffer-list #[257 "\303\304!\305\306 \"\211\203\244\210\202\211	\203\307\310\"\203*\311\"B\312\302!\2037\n\2037\313 \210\314\315!\210)\207" [ido-temp-list ido-predicate ido-enable-virtual-buffers ido-get-buffers-in-frames current ido-make-buffer-list-1 selected-frame seq-filter #[257 "\301!B!\207" [ido-predicate get-buffer] 5 "\n\n(fn NAME)"] delete boundp ido-add-virtual-buffers-to-list run-hooks ido-make-buffer-list-hook] 7 (#$ . 88907)])
#@132 Add recently visited files, and bookmark files, to the buffer list.
This is to make them appear as if they were "virtual buffers".
(defalias 'ido-add-virtual-buffers-to-list #[0 "\204\300\306!\210\307\211\310\n\311\312!\205 \313\307\314\312\315\303!\205\"\"\"\211\203s\211@\316!\262\317\232\2039\316\320!!\262\317\232\203B\211\262\317\232\204l\307\321!)\204l\322	\"\204l
\235\204l\323\"\204lB	BA\266\202\202!\266	\205\241\203\230	\211\203\227\211@\324\325@G\326\327@%\210A\266\202\202\210
\314\330	\"\237\244\211\207" [recentf-mode ido-virtual-buffers recentf-list bookmark-alist file-name-handler-alist ido-temp-list 1 nil append fboundp bookmark-get-filename delq mapcar boundp file-name-nondirectory "" directory-file-name get-file-buffer assoc ido-ignore-item-p put-text-property 0 face ido-virtual car ido-ignore-buffers ido-use-faces] 10 (#$ . 89767)])
#@152 Return the current list of choices.
If DEFAULT is non-nil, and corresponds to an element of choices,
it is put to the start of the list.

(fn DEFAULT)
(defalias 'ido-make-choice-list #[257 "\211\203\302	\"\211	B	)\207" [ido-choice-list ido-temp-list delete] 4 (#$ . 90681)])
#@73 Move the elements from ITEMS to the end of `ido-temp-list'.

(fn ITEMS)
(defalias 'ido-to-end #[257 "\301\302\"\210\203
\244\207\211\211\207" [ido-temp-list mapc #[257 "\301\"\211\207" [ido-temp-list delq] 4 "\n\n(fn ELEM)"]] 4 (#$ . 90969)])
#@12 

(fn DIR)
(defalias 'ido-file-name-all-completions-1 #[257 "\301!\203\302\207\203~\303\304\"\203~\211GS\3051\"\306\307\"0\202&\210\202)\206O\310\230?\205O\311!\205O\312\313!\205O\313!\205O\303\314\"\205O\306\307\315P\"\211\203|\211@GV\203|\316@\317#\316\320\"\230\203|\321\322\323\324\325\326!\327\"\330\331%\"\202}\211\207\306\307\"\207" [ido-enable-tramp-completion ido-nonreadable-directory-p nil string-match "\\`/[^/]+[:@]\\'" (error) file-name-all-completions "" "/ftp:" file-remote-p fboundp tramp-ftp-file-name-p ":\\'" "./" substring 0 1 mapcar make-byte-code 257 "\301\300\"\207" vconcat vector [substring] 4 "\n\n(fn C)"] 10 (#$ . 91227)])
#@83 Return name of all files in DIR.
Uses and updates `ido-dir-file-cache'.

(fn DIR)
(defalias 'ido-file-name-all-completions #[257 "\302!\203
\303\304\305\306!\"\207\247\203\340\307V\203\340\211;\203\340\211G\307V\203\340\310!\203\340\311	\"\211A@\312!\313!\206<\211?\205C\314!\211\3158\262\316\203\221\203d@\317=\205_\320A!\262\202\204\203y@\321=\205t\322A!\262\202\204\203\204\323\"\262\211\204\221\324	\"\316\262\204\326\203\243\321\325 B\262\202\264\203\264\326!\203\264\317\325 B\262\203\310\327\n!BB\262	B	GV\203\326S	\233\316\241\210\205\337AA\207\327!\207" [ido-max-dir-file-cache ido-dir-file-cache ido-is-unc-root mapcar #[257 "\300\301\"\203\207\211\302P\207" [string-match "/\\'" "/"] 4 "\n\n(fn HOST)"] ido-unc-hosts t 0 ido-may-cache-directory assoc ido-is-ftp-directory ido-is-unc-host file-attributes 5 nil ftp ido-cache-ftp-valid unc ido-cache-unc-valid time-equal-p delq ido-time-stamp file-readable-p ido-file-name-all-completions-1] 12 (#$ . 91920)])
#@49 Remove DIR from `ido-dir-file-cache'.

(fn DIR)
(defalias 'ido-remove-cached-dir #[257 "\205 \211;\205 \211G\301V\205 \302\"\211\205\303\"\211\262\207" [ido-dir-file-cache 0 assoc delq] 5 (#$ . 92979)])
#@121 Return list of non-ignored files in DIR
If MERGED is non-nil, each file is cons'ed with DIR.

(fn DIR &optional MERGED)
(defalias 'ido-make-file-list-1 #[513 "\300!\204\301!\204\302!\205*\303\304\305\306\307\310\311\312		\"\313\"\314\315%\316!\"\"\207" [ido-is-tramp-root ido-is-unc-root file-directory-p delq nil mapcar make-byte-code 257 "\303\n\304#?\205\301\203\211\300B\207\211\207" vconcat vector [ido-ignore-files ido-ignore-item-p t] 5 "\n\n(fn NAME)" ido-file-name-all-completions] 12 (#$ . 93201)])
#@257 Return the current list of files.
Currently visible files are put at the end of the list.
The hook `ido-make-file-list-hook' is run after the list has been
created to allow the user to further modify the order of the file names
in this list.

(fn DEFAULT)
(defalias 'ido-make-file-list #[257 "\306!\307	\n\203\310\202\311\"\312!\204$\313\314\315\316\317	\"\"!\210)\313\314\315\316\320	\"\"!\210\211\203{\211	\235\203{\f\204@
\203r\211	@\232\204{	\315\203aA\203aA@\232\204aA\262\202IA\262\315\241\210\211	\244\210\210\202{\321	\"\211	B\203\211\321\322	\"\322	B\323\324!\210	)\207" [ido-current-directory ido-temp-list ido-file-extensions-order default-directory ido-rotate-temp ido-rotate-file-list-default ido-make-file-list-1 sort ido-file-extension-lessp ido-file-lessp ido-is-tramp-root ido-to-end delq nil mapcar #[257 "\301\302\"\203
\303!\203\304!?\205\305\306!)\205\211\207" [file-name-handler-alist string-match ".:\\'" ido-local-file-exists-p ido-final-slash nil get-file-buffer] 4 "\n\n(fn X)"] #[257 "\300\301\"\205\211\207" [string-match "\\`\\."] 4 "\n\n(fn X)"] delete "." run-hooks ido-make-file-list-hook ido-show-dot-for-dired] 7 (#$ . 93734)])
#@126 Return list of non-ignored subdirs in DIR.
If MERGED is non-nil, each subdir is cons'ed with DIR.

(fn DIR &optional MERGED)
(defalias 'ido-make-dir-list-1 #[513 "\300!\204\f\301!\205$\302\303\304\305\306\307\310\311		\"\312\"\313\314%\315!\"\"\207" [ido-is-tramp-root file-directory-p delq nil mapcar make-byte-code 257 "\303!\205\304\n\"?\205\301\203\211\300B\207\211\207" vconcat vector [ido-ignore-directories ido-final-slash ido-ignore-item-p] 4 "\n\n(fn NAME)" ido-file-name-all-completions] 12 (#$ . 94957)])
#@211 Return the current list of directories.
The hook `ido-make-dir-list-hook' is run after the list has been
created to allow the user to further modify the order of the
directory names in this list.

(fn DEFAULT)
(defalias 'ido-make-dir-list #[257 "\305!\306	\307\"\310\311\312\313\314	\"\"!\210\211\203`\211	\235\203`\n\204%\203W\211	@\232\204`	\312\203FA\203FA@\232\204FA\262\202.A\262\312\241\210\211	\244\210\210\202`\315	\"\211	B\315\316	\"\f\204m\316	B\317\320!\210	)\207" [ido-current-directory ido-temp-list ido-rotate-temp ido-rotate-file-list-default ido-input-stack ido-make-dir-list-1 sort ido-file-lessp ido-to-end delq nil mapcar #[257 "\300\301\302#\303\230\205\211\207" [substring 0 1 "."] 5 "\n\n(fn X)"] delete "." run-hooks ido-make-dir-list-hook] 7 (#$ . 95496)])
#@236 Return the list of buffers that are visible in the current frame.
If optional argument CURRENT is given, restrict searching to the current
frame, rather than all frames, regardless of value of `ido-all-frames'.

(fn &optional CURRENT)
(defalias 'ido-get-buffers-in-frames #[256 "\302\303\304\302?\205	#\210)\207" [ido-bufs-in-frame ido-all-frames nil walk-windows ido-get-bufname] 5 (#$ . 96317)])
#@76 Used by `ido-get-buffers-in-frames' to walk through all windows.

(fn WIN)
(defalias 'ido-get-bufname #[257 "\302\303!!\211\235\206\211	\235?\205\211B\211\207" [ido-bufs-in-frame ido-ignore-item-temp-list buffer-name window-buffer] 4 (#$ . 96726)])
#@64 Return list of matches in ITEMS.

(fn ITEMS &optional DO-FULL)
(defalias 'ido-set-matches-1 #[513 "\n?\205\n\306!\211\203\307\310\311#\202\f\203\211\202\"\312!\211\203+\313\202,\314P\n\2037\315P\2028\211C\205d
\316=\205E+?\205d\f?\205d\317\320\"?\205d\315\203a\321\202b\314\322R\205\211\205\211
\316=\205u+?\205\211\f?\205\211\317\320\"?\205\211\323P\205\225\n?\205\225\315P,?\206\251-?\206\251\n\206\251G\310U\324C\324C\324C\324C\324.\3251\336\326\327\330\331\332\333&	\334\"\335\336%\"0\202\347\337.A\240\262\210\242\203\373\340\341\242\"\210\211\242\242\244\240\210\242\203\340\342
	\242E\"\210\211\242\242\244\240\210\242\203-\340\343
\n\242E\"\210\211\242\242\244\240\210\211\242\204w/\203wG\344V\203w\f\204w\312\345\310H!!\346\347\307\344\"\314#P\240\210\n\203c\315\n\242P\240\210\326\327\330\350\332\333\"\351\"\335\336%\"\210\352\242\337\")\207" [ido-case-fold case-fold-search ido-enable-prefix ido-text ido-enable-regexp ido-cur-item ido-final-slash substring 0 -1 regexp-quote ".*/" "" "\\`" buffer string-match "\\$\\'" "/" "\\'" "/\\'" nil (invalid-regexp) mapc make-byte-code 257 "\311!\304\204(\211G\312V\203\235\312H\313U\203\211\312H\313U\202%\211\312H\313U?\203\235\314\300\242\"\203\235\315=\203W;\203D\211\230\204W\211\316!\230\203W\310\310\242B\240\210\202\235\301\203l\314\301\"\203l\305\305\242B\240\210\202\235\302\203\201\314\302\"\203\201\306\306\242B\240\210\202\235\303\203\226\314\303\"\203\226\307\307\242B\240\210\202\235\310\310\242B\240\210\210\317\207" vconcat vector [ido-name 0 46 string-match buffer buffer-name t ido-text ido-cur-item ido-default-item ido-entry-buffer] 5 "\n\n(fn ITEM)" t ido-trace "prefix match" "suffix match" "full match" 1 string mapconcat #[257 "\300\301!\302\303\301!!R\207" ["[^" string "]*" regexp-quote] 7 "\n\n(fn C)"] "\302!\303\300\242\"\205\301\301\242B\240\207" [ido-name string-match] delete-consecutive-dups ido-buffer-disable-smart-matches ido-enable-dot-prefix ido-process-ignore-lists ido-incomplete-regexp ido-enable-flex-matching] 30 (#$ . 96989)])
#@57 Set `ido-matches' to the list of items matching prompt.
(defalias 'ido-set-matches #[0 "\205\304\305	!\n?\"\306\211\207" [ido-rescan ido-cur-list ido-rotate ido-matches ido-set-matches-1 reverse nil] 3 (#$ . 99194)])
#@96 Return t if the buffer or file NAME should be ignored.

(fn NAME RE-LIST &optional IGNORE-EXT)
(defalias 'ido-ignore-item-p #[770 "\235\203\306\207	\205\302\205\302\307 \310\311\312\313\314!\315\"\316$\216\205'\n\205'\f\317\211G\317\203w@\262;\203SG\211\262Y\203p\320\nZ\"\230\202a\321!\203`\n!\202a\317\203p\306\262\317\262\317\262	\2020A\262\2020\203\260@\262;\203\216\322\"\202\234\321!\203\233\n!\202\234\317\203\250\306\262\317\262	\202wA\262	\202w\203\273	B)\266\206)\262\207" [ido-ignore-item-temp-list ido-process-ignore-lists ido-ignore-extensions completion-ignored-extensions ido-case-fold case-fold-search t match-data make-byte-code 0 "\301\300\302\"\207" vconcat vector [set-match-data evaporate] 3 nil substring functionp string-match ido-ignored-list] 14 (#$ . 99422)])
#@80 Return common string following SUBS in each element of ITEMS.

(fn ITEMS SUBS)
(defalias 'ido-find-common-substring #[514 "\304\211\211	\203\f\202\305!\306\307\"\262\310\304\"\262\306\311\"\262\n\312\"\211\313=\2032\2023\211)\262)\207" [ido-change-word-sub ido-enable-regexp ido-case-fold completion-ignore-case nil regexp-quote mapcar ido-word-matching-substring delq ido-makealist try-completion t] 7 (#$ . 100289)])
#@139 Return part of WORD before first match to `ido-change-word-sub'.
If `ido-change-word-sub' cannot be found in WORD, return nil.

(fn WORD)
(defalias 'ido-word-matching-substring #[257 "\303\n\304!\"\211\205\305\304!\"\262)\207" [ido-case-fold case-fold-search ido-change-word-sub string-match ido-name substring] 5 (#$ . 100735)])
#@41 Return dotted pair (RES . 1).

(fn RES)
(defalias 'ido-makealist #[257 "\211\300B\207" [1] 3 (#$ . 101079)])
#@29 

(fn CHOICE &rest IGNORED)
(defalias 'ido-choose-completion-string #[385 "\304 \205:\203\305!\203\306!\210\304\307!\203\"\310\311\2026\312!\204/\311\2026\313	\"\210\314\315 \210\307\207" [ido-completion-buffer ido-current-directory ido-text ido-exit ido-active get-buffer kill-buffer t "" done ido-final-slash ido-set-current-directory refresh exit-minibuffer] 5 (#$ . 101194)])
#@52 Select the window showing `ido-completion-buffer'.
(defalias 'ido-switch-to-completions #[0 "\301\302\"\206\303 \210\301\302\"\211\205\304!\210o\205\305\306!\207" [ido-completion-buffer get-buffer-window 0 ido-completion-help select-window next-completion 1] 3 (#$ . 101602) nil])
#@59 Show possible completions in the `ido-completion-buffer'.
(defalias 'ido-completion-help #[0 "\306	\205	\307	!\306\211\n=\203W\203W\306p\310\306\211#\210q\210\311!\262\312d\"\203M\f\2046\313\305!\203>\314e\"\210\202P\315\305!\210\316\211\262\316\262\202P\317 \210\211q\266\202Z\316\262	\205\343\205\343r\320	!q\210p\321 \210\306\211 !\316\211\"\316#$\322 \210\323\324!\210+\211%\325&\203\256\326\327!\210\306\211&'\330 (\316\331 \210)\206\325(\202\325*\203\277\332)\206\273(!\202\325\204\307\f\203\314\330 \202\325\333)\206\324(!\334\"\335!\262\336!\210)\266\202\207" [ido-rescan ido-completion-buffer last-command this-command ido-completion-buffer-all-completions ido-completion-buffer-full nil get-buffer display-buffer get-buffer-window pos-visible-in-window-p boundp set-window-start make-local-variable t scroll-other-window get-buffer-create kill-all-local-variables erase-buffer run-hooks temp-buffer-setup-hook sort message "Reading directory..." ido-all-completions ido-set-matches ido-flatten-merged-list copy-sequence ido-file-lessp display-completion-list internal-temp-output-buffer-show default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only standard-output ido-directory-too-big ido-ignored-list ido-cur-list ido-matches ido-use-merged-list] 10 (#$ . 101898) nil])
#@118 Kill the buffer at the head of `ido-matches'.
If cursor is not at the end of the user input, delete to end of input.
(defalias 'ido-kill-buffer-at-head #[0 "m\204	`\306 |\207\307\310@!A@\311!\203K\211\203(\311!\203(\311!\262\312!\2044\307\211\202i\313!\203?\314!\262\211\f\315\316 \202i\317\"\205i\320\317\"A\"\320\"\307\211)\207" [ido-matches enable-recursive-minibuffers ido-rescan ido-default-item ido-text ido-text-init line-end-position t ido-name get-buffer kill-buffer bufferp buffer-name refresh exit-minibuffer assoc delete ido-exit ido-virtual-buffers recentf-list ido-cur-list] 7 (#$ . 103308) nil])
#@47 Bury the buffer at the head of `ido-matches'.
(defalias 'ido-bury-buffer-at-head #[0 "\306\307@!A@\310!\205\311!\210\211\312\313 )\207" [ido-matches enable-recursive-minibuffers ido-default-item ido-text ido-text-init ido-exit t ido-name get-buffer bury-buffer refresh exit-minibuffer] 5 (#$ . 103967) nil])
#@176 Delete the file at the head of `ido-matches'.
Trash the file if `delete-by-moving-to-trash' is non-nil.
If cursor is not at the end of the user input, delete to end of input.
(defalias 'ido-delete-file-at-head #[0 "m\204	`\306 |\207\307\310@!\211\203\nP\262\211\205U\311!\205U\312!?\205U\313\n!\205U\204=\314\315\316Q!\205U\317\320\"\210\311!\203N\307\211\202U\321@
\"\211)\207" [ido-matches enable-recursive-minibuffers ido-current-directory delete-by-moving-to-trash ido-rescan ido-cur-list line-end-position t ido-name file-exists-p file-directory-p file-writable-p yes-or-no-p "Delete " "? " delete-file trash delq] 6 (#$ . 104294) nil])
#@143 Switch to BUFFER according to METHOD.
Record command in `command-history' if optional RECORD is non-nil.

(fn BUFFER METHOD &optional RECORD)
(defalias 'ido-visit-buffer #[770 "\301!\203\302!\262\303\211\304\267\202Q\203\305\306\"\210\306!\202\214\203-\305\307\"\210\310!\202\214\311!\202\214\311\312\"\202\214\313!\210\314\315 !\202\214\316!\202\214\317>\203\203\320!\211\262\203\321=\204p\322\323!\203\324!\262\314!\210\325!\202\214\203\211\305\307\"\210\307!\207" [window-system bufferp buffer-name nil #s(hash-table size 6 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (kill 19 other-window 35 display 51 display-even-when-displayed 57 other-frame 64 display-other-frame 75)) ido-record-command kill-buffer switch-to-buffer switch-to-buffer-other-window display-buffer t switch-to-buffer-other-frame select-frame-set-input-focus selected-frame display-buffer-other-frame (raise-frame maybe-frame) ido-buffer-window-other-frame raise-frame y-or-n-p "Jump to frame? " window-frame select-window] 8 (#$ . 104968)])
#@130 Return window pointer if BUFFER is visible in another frame.
If BUFFER is visible in the current frame, return nil.

(fn BUFFER)
(defalias 'ido-buffer-window-other-frame #[257 "\300\301!\235?\205\302\303\"\207" [ido-get-buffers-in-frames current get-buffer-window 0] 5 (#$ . 106061)])
#@1631 Switch to another buffer.
The buffer is displayed according to `ido-default-buffer-method' -- the
default is to show it in the same window, unless it is already visible
in another frame.

As you type in a string, all of the buffers matching the string are
displayed if substring-matching is used (default).  Look at
`ido-enable-prefix' and `ido-toggle-prefix'.  When you have found the
buffer you want, it can then be selected.  As you type, most keys have
their normal keybindings, except for the following: \<ido-buffer-completion-map>

RET	Select the buffer at the front of the list of matches.
	If the list is empty, possibly prompt to create new buffer.

\[ido-select-text]	Use the current input string verbatim.

\[ido-next-match]	Put the first element at the end of the list.
\[ido-prev-match]	Put the last element at the start of the list.
\[ido-complete]	Complete a common suffix to the current string that matches
	all buffers.  If there is only one match, select that buffer.
	If there is no common suffix, show a list of all matching buffers
	in a separate window.
\[ido-edit-input]	Edit input string.
\[ido-fallback-command]	Fallback to non-ido version of current command.
\[ido-toggle-regexp]	Toggle regexp searching.
\[ido-toggle-prefix]	Toggle between substring and prefix matching.
\[ido-toggle-case]	Toggle case-sensitive searching of buffer names.
\[ido-completion-help]	Show list of matching buffers in separate window.
\[ido-enter-find-file]	Drop into `ido-find-file'.
\[ido-kill-buffer-at-head]	Kill buffer at head of buffer list.
\[ido-toggle-ignore]	Toggle ignoring buffers listed in `ido-ignore-buffers'.
(defalias 'ido-switch-buffer #[0 "\301!\207" [ido-default-buffer-method ido-buffer-internal] 2 (#$ . 106359) nil])
#@175 Switch to another buffer and show it in another window.
The buffer name is selected interactively by typing a substring.
For details of keybindings, see `ido-switch-buffer'.
(defalias 'ido-switch-buffer-other-window #[0 "\300\301\302\"\207" [ido-buffer-internal other-window switch-to-buffer-other-window] 3 (#$ . 108112) nil])
#@339 Display a buffer in another window but don't select it.

If ACTION (the prefix argument interactively), display the buffer
in another windown even if it's already displayed in the current
window.

The buffer name is selected interactively by typing a substring.
For details of keybindings, see `ido-switch-buffer'.

(fn &optional ACTION)
(defalias 'ido-display-buffer #[256 "\300\203	\301\202\n\302\303\304\211\211\305&\207" [ido-buffer-internal display-even-when-displayed display display-buffer nil ignore] 8 (#$ . 108447) "P"])
#@165 Display a buffer preferably in another frame.
The buffer name is selected interactively by typing a substring.
For details of keybindings, see `ido-switch-buffer'.
(defalias 'ido-display-buffer-other-frame #[0 "\300\301\302\303\211\211\304&\207" [ido-buffer-internal display-other-frame display-buffer-other-frame nil ignore] 7 (#$ . 108989) nil])
#@134 Kill a buffer.
The buffer name is selected interactively by typing a substring.
For details of keybindings, see `ido-switch-buffer'.
(defalias 'ido-kill-buffer #[0 "\300\301\302\303\304p!\305\306&\207" [ido-buffer-internal kill kill-buffer "Kill buffer: " buffer-name nil ignore] 7 (#$ . 109345) nil])
#@178 Insert contents of a buffer in current buffer after point.
The buffer name is selected interactively by typing a substring.
For details of keybindings, see `ido-switch-buffer'.
(defalias 'ido-insert-buffer #[0 "\300\301\302\303\304\211\305&\207" [ido-buffer-internal insert insert-buffer "Insert buffer: " nil ido-enter-insert-file] 7 (#$ . 109655) nil])
#@174 Switch to another buffer and show it in another frame.
The buffer name is selected interactively by typing a substring.
For details of keybindings, see `ido-switch-buffer'.
(defalias 'ido-switch-buffer-other-frame #[0 "\203\301\302!\207\303\304!\207" [ido-mode ido-buffer-internal other-frame call-interactively switch-to-buffer-other-frame] 2 (#$ . 110018) nil])
#@53 Switch to another file starting from DIR.

(fn DIR)
(defalias 'ido-find-file-in-dir #[257 "\301!\262\302\303\303\211\211\304&\207" [ido-default-file-method file-name-as-directory ido-file-internal nil ignore] 9 (#$ . 110391) "DDir: "])
#@2473 Edit file with name obtained via minibuffer.
The file is displayed according to `ido-default-file-method' -- the
default is to show it in the same window, unless it is already visible
in another frame.

The file name is selected interactively by typing a substring.  As you
type in a string, all of the filenames matching the string are displayed
if substring-matching is used (default).  Look at `ido-enable-prefix' and
`ido-toggle-prefix'.  When you have found the filename you want, it can
then be selected.  As you type, most keys have their normal keybindings,
except for the following: \<ido-file-completion-map>

RET	Select the file at the front of the list of matches.
	If the list is empty, possibly prompt to create new file.

\[ido-select-text]	Use the current input string verbatim.

\[ido-next-match]	Put the first element at the end of the list.
\[ido-prev-match]	Put the last element at the start of the list.
\[ido-complete]	Complete a common suffix to the current string that matches
	all files.  If there is only one match, select that file.
	If there is no common suffix, show a list of all matching files
	in a separate window.
\[ido-magic-delete-char]	Open the specified directory in Dired mode.
\[ido-edit-input]	Edit input string (including directory).
\[ido-prev-work-directory]	Go to previous directory in work directory history.
\[ido-next-work-directory]	Go to next directory in work directory history.
\[ido-merge-work-directories]	Search for file in the work directory history.
\[ido-forget-work-directory]	Remove current directory from the work directory history.
\[ido-prev-work-file]	Cycle to previous file in work file history.
\[ido-next-work-file]	Cycle to next file in work file history.
\[ido-wide-find-file-or-pop-dir]	Prompt for a file and use find to locate it.
\[ido-wide-find-dir-or-delete-dir]	Prompt for a directory and use find to locate it.
\[ido-make-directory]	Prompt for a directory to create in current directory.
\[ido-fallback-command]	Fallback to non-Ido version of current command.
\[ido-toggle-regexp]	Toggle regexp searching.
\[ido-toggle-prefix]	Toggle between substring and prefix matching.
\[ido-toggle-case]	Toggle case-sensitive searching of file names.
\[ido-toggle-literal]	Toggle literal reading of this file.
\[ido-completion-help]	Show list of matching files in separate window.
\[ido-toggle-ignore]	Toggle ignoring files listed in `ido-ignore-files'.
\[ido-reread-directory]	Reread the current directory.
(defalias 'ido-find-file #[0 "\301!\207" [ido-default-file-method ido-file-internal] 2 (#$ . 110640) nil])
#@167 Switch to another file and show it in another window.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-find-file-other-window #[0 "\300\301\302\"\207" [ido-file-internal other-window find-file-other-window] 3 (#$ . 113227) nil])
#@173 Find another file, select its buffer, kill previous buffer.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-find-alternate-file #[0 "\300\301\302\303\304$\207" [ido-file-internal alt-file find-alternate-file nil "Find alternate file: "] 5 (#$ . 113541) nil])
#@173 Find file as a replacement for the file in the next window.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-find-alternate-file-other-window #[0 "\300\301\302\"\207" [ido-file-internal alt-file-other-window find-alternate-file-other-window] 3 (#$ . 113886) nil])
#@168 Edit file read-only with name obtained via minibuffer.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-find-file-read-only #[0 "\300\301\302\303\304$\207" [ido-file-internal read-only find-file-read-only nil "Find file read-only: "] 5 (#$ . 114235) nil])
#@184 Edit file read-only in other window with name obtained via minibuffer.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-find-file-read-only-other-window #[0 "\300\301\302\303\304$\207" [ido-file-internal read-only find-file-read-only-other-window nil "Find file read-only other window: "] 5 (#$ . 114576) nil])
#@183 Edit file read-only in other frame with name obtained via minibuffer.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-find-file-read-only-other-frame #[0 "\300\301\302\303\304$\207" [ido-file-internal read-only find-file-read-only-other-frame nil "Find file read-only other frame: "] 5 (#$ . 114972) nil])
#@167 Display a file in another window but don't select it.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-display-file #[0 "\300\301\302\211\211\211\211\303&\207" [ido-file-internal display nil ignore] 8 (#$ . 115364) nil])
#@166 Switch to another file and show it in another frame.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-find-file-other-frame #[0 "\300\301\302\"\207" [ido-file-internal other-frame find-file-other-frame] 3 (#$ . 115671) nil])
#@145 Write current buffer to a file.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-write-file #[0 "\306\307\310B\307\306\311\312\313\314\307\315\307\211\316&.\207" [ido-ignore-files ido-auto-merge-work-directories-length ido-confirm-unique-completion ido-report-no-match ido-work-directory-match-only ido-process-ignore-lists t nil "[^/]\\'" -1 ido-file-internal write write-file "Write file: " ignore] 8 (#$ . 115981) nil])
#@156 Insert contents of file in current buffer.
The file name is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-insert-file #[0 "\300\301\302\303\304\303\211\305&\207" [ido-file-internal insert insert-file nil "Insert file: " ido-enter-insert-buffer] 8 (#$ . 116498) nil])
#@139 Call `dired' the Ido way.
The directory is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-dired #[0 "\302\303\304\305\211\302\306\307%*\207" [ido-auto-merge-work-directories-length ido-report-no-match nil -1 ido-file-internal dired "Dired: " dir] 6 (#$ . 116837) nil])
#@182 "Edit" a directory.  Like `ido-dired' but selects in another window.
The directory is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-dired-other-window #[0 "\302\303\304\305\211\302\306\307%*\207" [ido-auto-merge-work-directories-length ido-report-no-match nil -1 ido-file-internal dired-other-window "Dired: " dir] 6 (#$ . 117178) nil])
#@174 "Edit" a directory.  Like `ido-dired' but makes a new frame.
The directory is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-dired-other-frame #[0 "\302\303\304\305\211\302\306\307%*\207" [ido-auto-merge-work-directories-length ido-report-no-match nil -1 ido-file-internal dired-other-frame "Dired: " dir] 6 (#$ . 117588) nil])
#@148 Call `list-directory' the Ido way.
The directory is selected interactively by typing a substring.
For details of keybindings, see `ido-find-file'.
(defalias 'ido-list-directory #[0 "\302\303\304\305\211\302\306\307%*\207" [ido-auto-merge-work-directories-length ido-report-no-match nil -1 ido-file-internal list-directory "List directory: " dir] 6 (#$ . 117988) nil])
#@15 

(fn BUFFER)
(defalias 'ido-initiate-auto-merge #[257 "\306\307\"\210\310\311!\205;\312 \205;\313\301!\205;	\205;\314\315 	\"\306\316!\210\317\211\320\321rq\210\322 \210)\323\324\"\262\207" [ido-auto-merge-timer ido-eoinput ido-use-merged-list ido-text-init ido-rotate-temp ido-exit ido-trace "\n*merge timeout*" nil buffer-live-p ido-active boundp buffer-substring-no-properties minibuffer-prompt-end "request merge" auto t refresh ido-tidy throw ido] 5 (#$ . 118364)])
#@28 Post command hook for Ido.
(defalias 'ido-exhibit #[0 "\306 \205#\307\310 d\"\311\312\211	\2032\313\314\n\"\210\313\315\"\210\313\316\"\210\313\317\f\"\210\313\320
\"\210\313\321@\"\210\212db\210\322\323!\204@\324\323!\210`A\325>\2049G\326U\2049G\327U\203\214\330 \203n\331\230\203n\332\"\210\311\262\2029\333 \2039\331\230\2039\312B\334 )\2039\332\335!\210\311\262\2029\336B\203\226\337\202\227\340\"\203\275\334 \203\275\341!\204\275\332\"\210\342 \203\267\343C\344 \210\311\262\2029\345!\203\262\313\346\"\210\347\230\203\327\350 \210\311\262\2029\351\230\203\347\352\311!\210\311\262\2029\353\230\203\363\311\262\2029\336\354\"\203	\313\355\"\210\350!\210\311\262\2029\336\356\"\203F\3571#\360\361\362\326\363#!\"0\202%\210\312\313\"\210\211\203B\364!\203B\332\365!!\210\366!D\311\262\210\2029E\367>\203b\362\327\"\370\230\203b\332\365!!\210\311\262\2029\362\371\363#\331\230\203\204\332E\372>\203{\360\331\"\202|\331!\210\311\262\2029F\204\216G\203\250\364\365!P!\203\250\332\365!P!\210\311\262\2029\313\373!\210\311\262\2029\362\371\363#\331\230\203\362\336\374\"\204\362\332G\375U\203\317\331\202\344
\203\334\376
@!P\202\344\362\326\363#P!\210\362\363\"D\311\262\2029H\2049\345!\2049I\311=\2039J\247\2039J\326V\2039GJU\2039K\203&\336K\"\2049\377 \2049\201XHD\311\211L\262\211\203M\313\201YD\"\210\201ZC\344 \210M\203\221
\203\221M\201[=\204d
A\204\221\345\376
@!!\203\221\204xM\311=\203\221\313\201\\
@\"\210\332\376
@!P!\210\201ZC\344 \210N\201] \210\313\201^
\"\210\322\201O!\203\376O\201_=\204\376A\201`=\203\376P\201X=\203\376O\204\333
\204\333ND\311O\201ZC\344 \210O\203\376
\203\376\201a\201b !\203\376\312OND\201ZC\344 \210
\204KF\204KG\204KQ\203KR\203K\312SRSQ\313\201cR\"\210\201] \210+
\203K\313\201d
\"\210\311\211@TND\201ZC\344 \210@\203\310
\204\310A\201e>\203\310\334 \204\310G\327V\203\310\336\374\"\204\310F\204\310G\204\310\313\201f!\210H\203\217\201g\312\"\210\202\310I\311=\203\310J\247\203\310J\326U\203\310K\203\260\336K\"\204\310\377 \204\310\313\201h!\210\201iU\312\201jp$V\311@H\203\363
\203\363
@A@\230\204\363\332
@A@!\210\311H\201kCND\344 \210\201l \210\201m!\312W\313\201n\"\210`c\210\211dW\205\201o\211T\201p\311$\262\262*\266\204\207" [buffer-undo-list ido-trace-enable this-command ido-current-directory ido-cur-list ido-matches ido-active buffer-substring-no-properties minibuffer-prompt-end t nil ido-trace "\nexhibit" "dir" "contents" "list" "matches" "rescan" boundp ido-eoinput make-local-variable (buffer list) 0 1 ido-is-tramp-root "/" ido-set-current-directory ido-unc-hosts ido-is-root-directory "//" string-match ".[:@]\\'" ".:\\'" ido-local-file-exists-p ido-is-slow-ftp-host fallback exit-minibuffer ido-final-slash "final slash" "~/" ido-set-current-home "../" ido-up-directory "./" "\\`~[-_a-zA-Z0-9]+[$]?/\\'" "new home" "[$][A-Za-z0-9_]+/\\'" (error) expand-file-name substitute-in-file-name substring -1 file-directory-p file-name-directory file-name-nondirectory (windows-nt ms-dos) ":/" -2 (windows-nt ms-dos) "try single dir" "[$]" 2 ido-name input-pending-p ido-rescan ido-cur-item ido-enable-tramp-completion ido-exit ido-text-init system-type ido-directory-nonreadable ido-directory-too-big ido-use-merged-list ido-try-merged-list ido-auto-merge-work-directories-length ido-auto-merge-inhibit-characters-regexp ido-rotate-temp ido-enter-matching-directory ido-text ido-enable-virtual-buffers ido-use-virtual-buffers ido-process-ignore-lists ido-ignored-list ido-rotate ido-process-ignore-lists-inhibit ido-auto-merge-delay-time ido-auto-merge-timer ido-show-confirm-message auto "refresh on /" refresh first "single match" ido-set-matches "new    " always buffer ido-set-matches-1 ido-make-buffer-list-1 "try all" "found  " (file dir) "merge?" ido-undo-merge-work-directory "\n*start timer*" run-with-timer ido-initiate-auto-merge keep ido-set-common-completion ido-completions "inf" put-text-property minibuffer-message] 12 (#$ . 118856)])
#@110 Return the string that is displayed after the user's text.
Modified from `icomplete-completions'.

(fn NAME)
(defalias 'ido-completions #[257 "\211@:\205\211@AG\306V\205	\307C\203$\n\203$\310\311\306\312\313%\210\n\203j\203j\314@!\211G\315!\240\210\310\311\312G\306U\203P\203L\303\202Q\316\202Q\317\242%\210\203a\211\242P\240\210\242AB\262\266\204\251\f\203|\320
8\206W\321\202W-\203\213\322
8\206W\323\202W.\203\232\324
8\206W\325\202W/\203\245\326
8\202W\327\202W\203\264\330@P\202WA\2040\204\311\314@!GGU\202\335\331\314@!\"\210\332\311\314@!\"\314@!\230\203\344\327\202\373\333
8\206\355\334
8\314@!\335
8\206\372\336
8Q\n?\205\337
8P\202W1\311V\2031T\202\340C\341\342\341\343\344\345\346\347\350\351\"\352\"\324\353%	\"\"A\"2;\205N2GGV\205N\334
8\3542G\"\336
8Q
@
A@R\266\202\207" [ido-matches ido-merged-indicator ido-use-faces ido-incomplete-regexp ido-show-confirm-message ido-decorations 1 nil put-text-property 0 face ido-indicator ido-name copy-sequence ido-only-match ido-first-match 10 " [Confirm]" 8 " [Not readable]" 9 " [Too big]" 6 "" " " string-match match-string 11 4 12 5 7 999 apply concat nconc mapcar make-byte-code 257 "\305!\262\301\211\242S\240\210\301\242\306W\203\307\207\301\242\306U\203 \310\n8C\207\206'\311\n8\312\306\"\f\203E\211\300\242\230\204E\313!\203E\314\306G\315\316%\210\211\262D\207" vconcat vector [ido-decorations ido-separator ido-use-faces ido-name 0 nil 3 2 substring ido-final-slash put-text-property face ido-subdir] "\n\n(fn COM)" substring ido-directory-nonreadable ido-directory-too-big ido-report-no-match ido-enable-regexp ido-max-prospects ido-common-match-string] 17 (#$ . 123063)])
#@32 Minibuffer setup hook for Ido.
(defalias 'ido-minibuffer-setup #[0 "\301 \205$\302\303\304\305\306$\210\302\307\310\305\306$\210\311\312!\210\205$\313 \\b\210\305\211\207" [ido-initial-position ido-active add-hook pre-command-hook ido-tidy nil t post-command-hook ido-exhibit run-hooks ido-minibuffer-setup-hook minibuffer-prompt-end] 5 (#$ . 124819)])
#@27 Pre command hook for Ido.
(defalias 'ido-tidy #[0 "\203\305\306	\"\210\307!\210\310\311 \2058\312\302!\2031\n\2031\ndV\203(d\211\207\313\211\nd|*\207\314\302!\210\315\211\207" [ido-auto-merge-timer this-command ido-eoinput buffer-undo-list inhibit-read-only ido-trace "\n*cancel timer*" cancel-timer nil ido-active boundp t make-local-variable 1] 3 (#$ . 125183)])
(defalias 'ido-summary-buffers-to-end #[0 "\301\302\303\304\"\"\305!\207" [ido-temp-list delq nil mapcar #[257 "\300\301\"\204\300\302\"\205\211\207" [string-match "Summary" "output\\*\\'"] 4 "\n\n(fn X)"] ido-to-end] 5])
(byte-code "\300\301\302\303#\210\300\304\302\305#\210\300\306\302\305#\210\300\307\302\305#\210\300\310\302\311#\210\300\312\302\311#\207" [put ibuffer-find-file ido find-file dired dir dired-other-window dired-other-frame dired-do-copy ignore dired-do-rename] 4)
#@439 Ido replacement for the built-in `read-buffer'.
Return the name of a buffer selected.
PROMPT is the prompt to give to the user.  DEFAULT if given is the default
buffer to be selected, which will go to the front of the list.
If REQUIRE-MATCH is non-nil, an existing buffer must be selected.
Optional arg PREDICATE if non-nil is a function limiting the
buffers that can be considered.

(fn PROMPT &optional DEFAULT REQUIRE-MATCH PREDICATE)
(defalias 'ido-read-buffer #[1025 "\306\211\306\211\307\310\311\312%
\313=\203+\306\314\315\316\"\210\316$)\202,\211-\207" [ido-current-directory ido-directory-nonreadable ido-directory-too-big ido-predicate ido-context-switch-command ido-exit nil ignore ido-read-internal buffer ido-buffer-history fallback run-hook-with-args ido-before-fallback-functions read-buffer read-buffer-function] 11 (#$ . 126063)])
#@243 Ido replacement for the built-in `read-file-name'.
Read file name, prompting with PROMPT and completing in directory DIR.
See `read-file-name' for additional parameters.

(fn PROMPT &optional DIR DEFAULT-FILENAME MUSTMATCH INITIAL PREDICATE)
(defalias 'ido-read-file-name #[1537 "\306	>\2041\307=\204 9\205\310N\311=\204 \n>\2031\312%\262\2029\2059\310N\313=\204\375	>\204\375\203N\314=\203\375\3069\205X\310N\315=?\205_\313\316\305!\205g
\317\320!\321!?\211?\205\201\322! \323!\"\205\215?\"\323#\306\211$%\324\325\326;\203\250\202\316:\203\264@\202\316\204\307\203\307\327\"\202\316&\205\316&&\262\262%\330\267\202\356\331\262\202\370\262\202\370\211\203\370P\262.\202\331\262\211\331=\203!\306'\332\333\334\"\210\334&)\202\"\211\207" [this-command ido-read-file-name-non-ido ido-read-file-name-as-directory-commands ido-saved-vc-hb ido-context-switch-command vc-handled-backends nil file-directory-p ido dir ido-read-directory-name ignore file-exists-p find-file boundp t ido-expand-directory file-readable-p ido-directory-too-big-p -1 ido-read-internal file ido-file-history expand-file-name #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (fallback 225 dired 231)) fallback run-hook-with-args ido-before-fallback-functions read-file-name minibuffer-completing-file-name ido-current-directory ido-directory-nonreadable ido-directory-too-big ido-work-directory-index ido-show-dot-for-dired ido-work-file-index ido-find-literal ido-exit buffer-file-name read-file-name-function] 15 (#$ . 126936)])
#@247 Ido replacement for the built-in `read-directory-name'.
Read directory name, prompting with PROMPT and completing in directory DIR.
See `read-directory-name' for additional parameters.

(fn PROMPT &optional DIR DEFAULT-DIRNAME MUSTMATCH INITIAL)
(defalias 'ido-read-directory-name #[1281 "\306\307\310\306\311!\312!?\211?\205\313!\314\211\315\316\317\2066\2035\320\"\2026&\262\321=\203\\\306\322\323\324\"\210\324%)\202i\211\325\232\203f\202iP.\207" [minibuffer-completing-file-name ido-context-switch-command ido-saved-vc-hb ido-current-directory ido-directory-nonreadable ido-directory-too-big nil t ignore ido-expand-directory file-readable-p ido-directory-too-big-p -1 ido-read-internal dir ido-file-history expand-file-name fallback run-hook-with-args ido-before-fallback-functions read-directory-name "." ido-work-directory-index ido-work-file-index ido-exit read-file-name-function] 14 (#$ . 128613)])
#@925 Ido replacement for the built-in `completing-read'.
Read a string in the minibuffer with Ido-style completion.
PROMPT is a string to prompt with; normally it ends in a colon and a space.
CHOICES is a list of strings which are the possible completions.
PREDICATE and INHERIT-INPUT-METHOD are currently ignored; they are included
 to be compatible with `completing-read'.
If REQUIRE-MATCH is non-nil, the user is not allowed to exit unless
 the input is (or completes to) an element of CHOICES or is null.
 If the input is null, `ido-completing-read' returns DEF, or an empty
 string if DEF is nil, regardless of the value of REQUIRE-MATCH.
If INITIAL-INPUT is non-nil, insert it in the minibuffer initially,
 with point positioned at the end.
HIST, if non-nil, specifies a history list.
DEF, if non-nil, is the default value.

(fn PROMPT CHOICES &optional PREDICATE REQUIRE-MATCH INITIAL-INPUT HIST DEF INHERIT-INPUT-METHOD)
(defalias 'ido-completing-read #[2050 "\305\211\211\306\n\307 \210\310\311			&-\207" [ido-choice-list ido-context-switch-command ido-directory-too-big ido-directory-nonreadable ido-current-directory nil ignore ido-common-initialization ido-read-internal list] 15 (#$ . 129583)])
#@25 Unload the Ido library.
(defalias 'ido-unload-function #[0 "\301\302!\210\303\301\"\304\207" [minor-mode-map-alist ido-mode -1 assq-delete-all nil] 3 (#$ . 130804)])
(provide 'ido)

Youez - 2016 - github.com/yon3zu
LinuXploit