| ofs | hex dump | ascii |
|---|
| 0000 | 73 77 69 70 65 72 2d 30 2e 31 34 2e 32 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | swiper-0.14.2/.................. |
| 0020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0060 | 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000755.0000000.0000000.0000 |
| 0080 | 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 31 35 34 36 00 20 35 00 00 00 | 0000000.00000000000.011546..5... |
| 00a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 00c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 00e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0100 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0120 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 01a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 01c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 01e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0200 | 73 77 69 70 65 72 2d 30 2e 31 34 2e 32 2f 73 77 69 70 65 72 2d 70 6b 67 2e 65 6c 00 00 00 00 00 | swiper-0.14.2/swiper-pkg.el..... |
| 0220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0260 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 0280 | 30 30 30 30 36 32 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 31 36 31 00 20 30 00 00 00 | 0000623.00000000000.014161..0... |
| 02a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0300 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0320 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0400 | 3b 3b 20 47 65 6e 65 72 61 74 65 64 20 70 61 63 6b 61 67 65 20 64 65 73 63 72 69 70 74 69 6f 6e | ;;.Generated.package.description |
| 0420 | 20 66 72 6f 6d 20 73 77 69 70 65 72 2e 65 6c 20 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d | .from.swiper.el..-*-.no-byte-com |
| 0440 | 70 69 6c 65 3a 20 74 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 73 77 69 | pile:.t.-*-.(define-package."swi |
| 0460 | 70 65 72 22 20 22 30 2e 31 34 2e 32 22 20 22 49 73 65 61 72 63 68 20 77 69 74 68 20 61 6e 20 6f | per"."0.14.2"."Isearch.with.an.o |
| 0480 | 76 65 72 76 69 65 77 2e 20 20 4f 68 2c 20 6d 61 6e 21 22 20 27 28 28 65 6d 61 63 73 20 22 32 34 | verview...Oh,.man!".'((emacs."24 |
| 04a0 | 2e 35 22 29 20 28 69 76 79 20 22 30 2e 31 34 2e 32 22 29 29 20 3a 63 6f 6d 6d 69 74 20 22 33 64 | .5").(ivy."0.14.2")).:commit."3d |
| 04c0 | 37 35 35 66 64 35 34 30 63 30 66 61 30 63 37 64 33 39 38 62 62 37 30 39 33 36 31 32 39 31 62 64 | 755fd540c0fa0c7d398bb709361291bd |
| 04e0 | 31 66 62 61 30 63 22 20 3a 61 75 74 68 6f 72 73 20 27 28 28 22 4f 6c 65 68 20 4b 72 65 68 65 6c | 1fba0c".:authors.'(("Oleh.Krehel |
| 0500 | 22 20 2e 20 22 6f 68 77 6f 65 6f 77 68 6f 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 20 3a 6d 61 69 | "..."ohwoeowho@gmail.com")).:mai |
| 0520 | 6e 74 61 69 6e 65 72 20 27 28 22 4f 6c 65 68 20 4b 72 65 68 65 6c 22 20 2e 20 22 6f 68 77 6f 65 | ntainer.'("Oleh.Krehel"..."ohwoe |
| 0540 | 6f 77 68 6f 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 20 3a 6b 65 79 77 6f 72 64 73 20 27 28 22 6d 61 | owho@gmail.com").:keywords.'("ma |
| 0560 | 74 63 68 69 6e 67 22 29 20 3a 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f | tching").:url."https://github.co |
| 0580 | 6d 2f 61 62 6f 2d 61 62 6f 2f 73 77 69 70 65 72 22 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 | m/abo-abo/swiper").............. |
| 05a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 05c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 05e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0600 | 73 77 69 70 65 72 2d 30 2e 31 34 2e 32 2f 2e 64 69 72 2d 6c 6f 63 61 6c 73 2e 65 6c 00 00 00 00 | swiper-0.14.2/.dir-locals.el.... |
| 0620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0660 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 0680 | 30 30 30 31 36 31 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 32 30 30 00 20 30 00 00 00 | 0001613.00000000000.014200..0... |
| 06a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 06c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 06e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0700 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0720 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 07a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 07c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 07e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0800 | 3b 3b 3b 20 44 69 72 65 63 74 6f 72 79 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c 65 73 0a 3b 3b | ;;;.Directory.Local.Variables.;; |
| 0820 | 3b 20 46 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 73 65 65 20 28 69 6e 66 6f | ;.For.more.information.see.(info |
| 0840 | 20 22 28 65 6d 61 63 73 29 20 44 69 72 65 63 74 6f 72 79 20 56 61 72 69 61 62 6c 65 73 22 29 0a | ."(emacs).Directory.Variables"). |
| 0860 | 0a 28 28 6e 69 6c 0a 20 20 3b 3b 20 45 6d 61 63 73 20 32 38 2b 20 61 75 74 6f 6d 61 74 69 63 61 | .((nil...;;.Emacs.28+.automatica |
| 0880 | 6c 6c 79 20 73 65 74 73 20 75 70 20 74 68 65 73 65 20 60 62 75 67 2d 72 65 66 65 72 65 6e 63 65 | lly.sets.up.these.`bug-reference |
| 08a0 | 2d 6d 6f 64 65 27 20 76 61 72 69 61 62 6c 65 73 0a 20 20 3b 3b 20 69 6e 20 61 20 6d 6f 72 65 20 | -mode'.variables...;;.in.a.more. |
| 08c0 | 67 65 6e 65 72 61 6c 20 77 61 79 2c 20 73 6f 20 73 65 74 74 69 6e 67 20 74 68 65 6d 20 68 65 72 | general.way,.so.setting.them.her |
| 08e0 | 65 20 69 73 20 6e 6f 74 20 66 75 74 75 72 65 2d 70 72 6f 6f 66 2e 20 20 49 66 0a 20 20 3b 3b 20 | e.is.not.future-proof...If...;;. |
| 0900 | 79 6f 75 20 73 74 69 6c 6c 20 6e 65 65 64 20 74 68 65 73 65 20 73 65 74 74 69 6e 67 73 20 69 6e | you.still.need.these.settings.in |
| 0920 | 20 6f 6c 64 65 72 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 73 2c 20 79 6f 75 20 63 61 6e 20 61 | .older.Emacs.versions,.you.can.a |
| 0940 | 64 64 0a 20 20 3b 3b 20 74 68 65 6d 20 74 6f 20 79 6f 75 72 20 70 65 72 73 6f 6e 61 6c 20 60 2e | dd...;;.them.to.your.personal.`. |
| 0960 | 64 69 72 2d 6c 6f 63 61 6c 73 2d 32 2e 65 6c 27 20 66 69 6c 65 20 69 6e 20 74 68 65 20 6d 65 61 | dir-locals-2.el'.file.in.the.mea |
| 0980 | 6e 74 69 6d 65 2e 0a 20 20 3b 3b 20 28 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 62 75 67 2d 72 | ntime....;;.(bug-reference-bug-r |
| 09a0 | 65 67 65 78 70 20 2e 20 22 5c 5c 28 23 5c 5c 28 5b 5b 3a 64 69 67 69 74 3a 5d 5d 2b 5c 5c 29 5c | egexp..."\\(#\\([[:digit:]]+\\)\ |
| 09c0 | 5c 29 22 29 0a 20 20 3b 3b 20 28 62 75 67 2d 72 65 66 65 72 65 6e 63 65 2d 75 72 6c 2d 66 6f 72 | \)")...;;.(bug-reference-url-for |
| 09e0 | 6d 61 74 20 2e 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 62 6f 2d 61 62 | mat..."https://github.com/abo-ab |
| 0a00 | 6f 2f 73 77 69 70 65 72 2f 69 73 73 75 65 73 2f 25 73 22 29 0a 20 20 28 63 6f 70 79 72 69 67 68 | o/swiper/issues/%s")...(copyrigh |
| 0a20 | 74 2d 6e 61 6d 65 73 2d 72 65 67 65 78 70 20 2e 20 22 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 | t-names-regexp..."Free.Software. |
| 0a40 | 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e 63 5c 5c 2e 22 29 0a 20 20 28 73 65 6e 74 65 6e 63 65 | Foundation,.Inc\\.")...(sentence |
| 0a60 | 2d 65 6e 64 2d 64 6f 75 62 6c 65 2d 73 70 61 63 65 20 2e 20 74 29 29 0a 20 28 65 6d 61 63 73 2d | -end-double-space...t))..(emacs- |
| 0a80 | 6c 69 73 70 2d 6d 6f 64 65 0a 20 20 28 69 6e 64 65 6e 74 2d 74 61 62 73 2d 6d 6f 64 65 20 2e 20 | lisp-mode...(indent-tabs-mode... |
| 0aa0 | 6e 69 6c 29 0a 20 20 28 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 2e 20 22 3b 3b 5c 5c 28 5b | nil)...(outline-regexp...";;\\([ |
| 0ac0 | 3b 2a 5d 2b 20 5b 5e 5c 73 5c 74 5c 6e 5d 5c 5c 7c 23 23 23 61 75 74 6f 6c 6f 61 64 5c 5c 29 5c | ;*]+.[^\s\t\n]\\|###autoload\\)\ |
| 0ae0 | 5c 7c 28 22 29 0a 20 20 3b 3b 20 65 78 74 72 61 20 63 6f 6e 66 69 67 20 68 65 72 65 3a 20 68 74 | \|(")...;;.extra.config.here:.ht |
| 0b00 | 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 62 6f 2d 61 62 6f 2f 6f 72 65 6d 61 63 73 | tps://github.com/abo-abo/oremacs |
| 0b20 | 2f 62 6c 6f 62 2f 67 69 74 68 75 62 2f 6d 6f 64 65 73 2f 6f 72 61 2d 65 6c 69 73 70 2d 73 74 79 | /blob/github/modes/ora-elisp-sty |
| 0b40 | 6c 65 2d 67 75 69 64 65 2e 65 6c 0a 20 20 3b 3b 20 28 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 | le-guide.el...;;.(lisp-indent-fu |
| 0b60 | 6e 63 74 69 6f 6e 20 2e 20 63 6f 6d 6d 6f 6e 2d 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 | nction...common-lisp-indent-func |
| 0b80 | 74 69 6f 6e 29 0a 20 20 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | tion)...))...................... |
| 0ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0c00 | 73 77 69 70 65 72 2d 30 2e 31 34 2e 32 2f 73 77 69 70 65 72 2e 65 6c 00 00 00 00 00 00 00 00 00 | swiper-0.14.2/swiper.el......... |
| 0c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0c60 | 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 | ....0000644.0000000.0000000.0000 |
| 0c80 | 30 31 37 36 30 34 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 33 34 31 35 00 20 30 00 00 00 | 0176044.00000000000.013415..0... |
| 0ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0d00 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0d20 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0e00 | 3b 3b 3b 20 73 77 69 70 65 72 2e 65 6c 20 2d 2d 2d 20 49 73 65 61 72 63 68 20 77 69 74 68 20 61 | ;;;.swiper.el.---.Isearch.with.a |
| 0e20 | 6e 20 6f 76 65 72 76 69 65 77 2e 20 20 4f 68 2c 20 6d 61 6e 21 20 2d 2a 2d 20 6c 65 78 69 63 61 | n.overview...Oh,.man!.-*-.lexica |
| 0e40 | 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 | l-binding:.t.-*-..;;.Copyright.( |
| 0e60 | 43 29 20 32 30 31 35 2d 32 30 32 33 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 | C).2015-2023.Free.Software.Found |
| 0e80 | 61 74 69 6f 6e 2c 20 49 6e 63 2e 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 4f 6c 65 68 20 4b 72 65 | ation,.Inc...;;.Author:.Oleh.Kre |
| 0ea0 | 68 65 6c 20 3c 6f 68 77 6f 65 6f 77 68 6f 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 55 52 4c | hel.<ohwoeowho@gmail.com>.;;.URL |
| 0ec0 | 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 62 6f 2d 61 62 6f 2f 73 77 69 | :.https://github.com/abo-abo/swi |
| 0ee0 | 70 65 72 0a 3b 3b 20 56 65 72 73 69 6f 6e 3a 20 30 2e 31 34 2e 32 0a 3b 3b 20 50 61 63 6b 61 67 | per.;;.Version:.0.14.2.;;.Packag |
| 0f00 | 65 2d 52 65 71 75 69 72 65 73 3a 20 28 28 65 6d 61 63 73 20 22 32 34 2e 35 22 29 20 28 69 76 79 | e-Requires:.((emacs."24.5").(ivy |
| 0f20 | 20 22 30 2e 31 34 2e 32 22 29 29 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 6d 61 74 63 68 69 6e | ."0.14.2")).;;.Keywords:.matchin |
| 0f40 | 67 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 | g..;;.This.file.is.part.of.GNU.E |
| 0f60 | 6d 61 63 73 2e 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 66 72 65 65 20 73 6f 66 74 | macs...;;.This.file.is.free.soft |
| 0f80 | 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e | ware;.you.can.redistribute.it.an |
| 0fa0 | 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d | d/or.modify.;;.it.under.the.term |
| 0fc0 | 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 | s.of.the.GNU.General.Public.Lice |
| 0fe0 | 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 | nse.as.published.by.;;.the.Free. |
| 1000 | 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 3b 20 65 69 74 68 65 72 20 76 65 72 73 | Software.Foundation;.either.vers |
| 1020 | 69 6f 6e 20 33 2c 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 0a 3b 3b 20 61 6e | ion.3,.or.(at.your.option).;;.an |
| 1040 | 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 | y.later.version...;;.This.progra |
| 1060 | 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 | m.is.distributed.in.the.hope.tha |
| 1080 | 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 | t.it.will.be.useful,.;;.but.WITH |
| 10a0 | 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 | OUT.ANY.WARRANTY;.without.even.t |
| 10c0 | 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 | he.implied.warranty.of.;;.MERCHA |
| 10e0 | 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 | NTABILITY.or.FITNESS.FOR.A.PARTI |
| 1100 | 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 | CULAR.PURPOSE...See.the.;;.GNU.G |
| 1120 | 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 | eneral.Public.License.for.more.d |
| 1140 | 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 46 6f 72 20 61 20 66 75 6c 6c 20 63 6f 70 79 20 6f 66 20 74 | etails...;;.For.a.full.copy.of.t |
| 1160 | 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b | he.GNU.General.Public.License.;; |
| 1180 | 20 73 65 65 20 3c 68 74 74 70 73 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 | .see.<https://www.gnu.org/licens |
| 11a0 | 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 54 68 69 73 20 | es/>...;;;.Commentary:..;;.This. |
| 11c0 | 70 61 63 6b 61 67 65 20 67 69 76 65 73 20 61 6e 20 6f 76 65 72 76 69 65 77 20 6f 66 20 74 68 65 | package.gives.an.overview.of.the |
| 11e0 | 20 63 75 72 72 65 6e 74 20 72 65 67 65 78 20 73 65 61 72 63 68 0a 3b 3b 20 63 61 6e 64 69 64 61 | .current.regex.search.;;.candida |
| 1200 | 74 65 73 2e 20 20 54 68 65 20 73 65 61 72 63 68 20 72 65 67 65 78 20 63 61 6e 20 62 65 20 73 70 | tes...The.search.regex.can.be.sp |
| 1220 | 6c 69 74 20 69 6e 74 6f 20 67 72 6f 75 70 73 20 77 69 74 68 20 61 0a 3b 3b 20 73 70 61 63 65 2e | lit.into.groups.with.a.;;.space. |
| 1240 | 20 20 45 61 63 68 20 67 72 6f 75 70 20 69 73 20 68 69 67 68 6c 69 67 68 74 65 64 20 77 69 74 68 | ..Each.group.is.highlighted.with |
| 1260 | 20 61 20 64 69 66 66 65 72 65 6e 74 20 66 61 63 65 2e 0a 3b 3b 0a 3b 3b 20 49 74 20 63 61 6e 20 | .a.different.face..;;.;;.It.can. |
| 1280 | 64 6f 75 62 6c 65 20 61 73 20 61 20 71 75 69 63 6b 20 60 72 65 67 65 78 2d 62 75 69 6c 64 65 72 | double.as.a.quick.`regex-builder |
| 12a0 | 27 2c 20 61 6c 74 68 6f 75 67 68 20 6f 6e 6c 79 20 73 69 6e 67 6c 65 0a 3b 3b 20 6c 69 6e 65 73 | ',.although.only.single.;;.lines |
| 12c0 | 20 77 69 6c 6c 20 62 65 20 6d 61 74 63 68 65 64 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 | .will.be.matched...;;;.Code:..(r |
| 12e0 | 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 28 72 65 71 75 69 72 65 20 27 69 76 79 29 0a 0a | equire.'cl-lib).(require.'ivy).. |
| 1300 | 28 64 65 66 67 72 6f 75 70 20 73 77 69 70 65 72 20 6e 69 6c 0a 20 20 22 60 69 73 65 61 72 63 68 | (defgroup.swiper.nil..."`isearch |
| 1320 | 27 20 77 69 74 68 20 61 6e 20 6f 76 65 72 76 69 65 77 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 6d | '.with.an.overview."...:group.'m |
| 1340 | 61 74 63 68 69 6e 67 0a 20 20 3a 70 72 65 66 69 78 20 22 73 77 69 70 65 72 2d 22 29 0a 0a 28 64 | atching...:prefix."swiper-")..(d |
| 1360 | 65 66 66 61 63 65 20 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 66 61 63 65 2d 31 0a 20 20 27 28 28 | efface.swiper-match-face-1...'(( |
| 1380 | 74 20 3a 69 6e 68 65 72 69 74 20 6c 61 7a 79 2d 68 69 67 68 6c 69 67 68 74 29 29 0a 20 20 22 54 | t.:inherit.lazy-highlight))..."T |
| 13a0 | 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 66 61 63 65 20 66 6f 72 20 60 73 77 69 70 65 72 27 20 | he.background.face.for.`swiper'. |
| 13c0 | 6d 61 74 63 68 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a | matches."...:group.'ivy-faces).. |
| 13e0 | 28 64 65 66 66 61 63 65 20 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 66 61 63 65 2d 32 0a 20 20 27 | (defface.swiper-match-face-2...' |
| 1400 | 28 28 74 20 3a 69 6e 68 65 72 69 74 20 69 73 65 61 72 63 68 29 29 0a 20 20 22 46 61 63 65 20 66 | ((t.:inherit.isearch))..."Face.f |
| 1420 | 6f 72 20 60 73 77 69 70 65 72 27 20 6d 61 74 63 68 65 73 20 6d 6f 64 75 6c 6f 20 31 2e 22 0a 20 | or.`swiper'.matches.modulo.1.".. |
| 1440 | 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 73 77 | .:group.'ivy-faces)..(defface.sw |
| 1460 | 69 70 65 72 2d 6d 61 74 63 68 2d 66 61 63 65 2d 33 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 | iper-match-face-3...'((t.:inheri |
| 1480 | 74 20 6d 61 74 63 68 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 60 73 77 69 70 65 72 27 20 6d | t.match))..."Face.for.`swiper'.m |
| 14a0 | 61 74 63 68 65 73 20 6d 6f 64 75 6c 6f 20 32 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d | atches.modulo.2."...:group.'ivy- |
| 14c0 | 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 66 61 | faces)..(defface.swiper-match-fa |
| 14e0 | 63 65 2d 34 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 69 73 65 61 72 63 68 2d 66 61 69 | ce-4...'((t.:inherit.isearch-fai |
| 1500 | 6c 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 60 73 77 69 70 65 72 27 20 6d 61 74 63 68 65 73 | l))..."Face.for.`swiper'.matches |
| 1520 | 20 6d 6f 64 75 6c 6f 20 33 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 | .modulo.3."...:group.'ivy-faces) |
| 1540 | 0a 0a 28 64 65 66 66 61 63 65 20 73 77 69 70 65 72 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 6d 61 74 | ..(defface.swiper-background-mat |
| 1560 | 63 68 2d 66 61 63 65 2d 31 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 73 77 69 70 65 72 | ch-face-1...'((t.:inherit.swiper |
| 1580 | 2d 6d 61 74 63 68 2d 66 61 63 65 2d 31 29 29 0a 20 20 22 54 68 65 20 62 61 63 6b 67 72 6f 75 6e | -match-face-1))..."The.backgroun |
| 15a0 | 64 20 66 61 63 65 20 66 6f 72 20 6e 6f 6e 2d 63 75 72 72 65 6e 74 20 60 73 77 69 70 65 72 27 20 | d.face.for.non-current.`swiper'. |
| 15c0 | 6d 61 74 63 68 65 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a | matches."...:group.'ivy-faces).. |
| 15e0 | 28 64 65 66 66 61 63 65 20 73 77 69 70 65 72 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 6d 61 74 63 68 | (defface.swiper-background-match |
| 1600 | 2d 66 61 63 65 2d 32 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 73 77 69 70 65 72 2d 6d | -face-2...'((t.:inherit.swiper-m |
| 1620 | 61 74 63 68 2d 66 61 63 65 2d 32 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 6e 6f 6e 2d 63 75 | atch-face-2))..."Face.for.non-cu |
| 1640 | 72 72 65 6e 74 20 60 73 77 69 70 65 72 27 20 6d 61 74 63 68 65 73 20 6d 6f 64 75 6c 6f 20 31 2e | rrent.`swiper'.matches.modulo.1. |
| 1660 | 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 | "...:group.'ivy-faces)..(defface |
| 1680 | 20 73 77 69 70 65 72 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d 33 0a | .swiper-background-match-face-3. |
| 16a0 | 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 66 61 63 | ..'((t.:inherit.swiper-match-fac |
| 16c0 | 65 2d 33 29 29 0a 20 20 22 46 61 63 65 20 66 6f 72 20 6e 6f 6e 2d 63 75 72 72 65 6e 74 20 60 73 | e-3))..."Face.for.non-current.`s |
| 16e0 | 77 69 70 65 72 27 20 6d 61 74 63 68 65 73 20 6d 6f 64 75 6c 6f 20 32 2e 22 0a 20 20 3a 67 72 6f | wiper'.matches.modulo.2."...:gro |
| 1700 | 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 73 77 69 70 65 72 2d | up.'ivy-faces)..(defface.swiper- |
| 1720 | 62 61 63 6b 67 72 6f 75 6e 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d 34 0a 20 20 27 28 28 74 20 3a | background-match-face-4...'((t.: |
| 1740 | 69 6e 68 65 72 69 74 20 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 66 61 63 65 2d 34 29 29 0a 20 20 | inherit.swiper-match-face-4))... |
| 1760 | 22 46 61 63 65 20 66 6f 72 20 6e 6f 6e 2d 63 75 72 72 65 6e 74 20 60 73 77 69 70 65 72 27 20 6d | "Face.for.non-current.`swiper'.m |
| 1780 | 61 74 63 68 65 73 20 6d 6f 64 75 6c 6f 20 33 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d | atches.modulo.3."...:group.'ivy- |
| 17a0 | 66 61 63 65 73 29 0a 0a 28 64 65 66 66 61 63 65 20 73 77 69 70 65 72 2d 6c 69 6e 65 2d 66 61 63 | faces)..(defface.swiper-line-fac |
| 17c0 | 65 0a 20 20 27 28 28 74 20 3a 69 6e 68 65 72 69 74 20 68 69 67 68 6c 69 67 68 74 29 29 0a 20 20 | e...'((t.:inherit.highlight))... |
| 17e0 | 22 46 61 63 65 20 66 6f 72 20 63 75 72 72 65 6e 74 20 60 73 77 69 70 65 72 27 20 6c 69 6e 65 2e | "Face.for.current.`swiper'.line. |
| 1800 | 22 0a 20 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 63 75 73 74 | "...:group.'ivy-faces)..(defcust |
| 1820 | 6f 6d 20 73 77 69 70 65 72 2d 66 61 63 65 73 20 27 28 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 66 | om.swiper-faces.'(swiper-match-f |
| 1840 | 61 63 65 2d 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ace-1........................... |
| 1860 | 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 66 61 63 65 2d 32 0a 20 20 20 20 20 20 20 20 20 20 20 20 | swiper-match-face-2............. |
| 1880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 66 61 63 65 2d | ..............swiper-match-face- |
| 18a0 | 33 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 | 3...........................swip |
| 18c0 | 65 72 2d 6d 61 74 63 68 2d 66 61 63 65 2d 34 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 60 73 77 69 | er-match-face-4)..."List.of.`swi |
| 18e0 | 70 65 72 27 20 66 61 63 65 73 20 66 6f 72 20 67 72 6f 75 70 20 6d 61 74 63 68 65 73 2e 22 0a 20 | per'.faces.for.group.matches.".. |
| 1900 | 20 3a 67 72 6f 75 70 20 27 69 76 79 2d 66 61 63 65 73 0a 20 20 3a 74 79 70 65 20 27 28 72 65 70 | .:group.'ivy-faces...:type.'(rep |
| 1920 | 65 61 74 20 66 61 63 65 29 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 62 61 63 6b 67 | eat.face))..(defvar.swiper-backg |
| 1940 | 72 6f 75 6e 64 2d 66 61 63 65 73 0a 20 20 27 28 73 77 69 70 65 72 2d 62 61 63 6b 67 72 6f 75 6e | round-faces...'(swiper-backgroun |
| 1960 | 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d 31 0a 20 20 20 20 73 77 69 70 65 72 2d 62 61 63 6b 67 72 | d-match-face-1.....swiper-backgr |
| 1980 | 6f 75 6e 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d 32 0a 20 20 20 20 73 77 69 70 65 72 2d 62 61 63 | ound-match-face-2.....swiper-bac |
| 19a0 | 6b 67 72 6f 75 6e 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d 33 0a 20 20 20 20 73 77 69 70 65 72 2d | kground-match-face-3.....swiper- |
| 19c0 | 62 61 63 6b 67 72 6f 75 6e 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d 34 29 0a 20 20 22 4c 69 6b 65 | background-match-face-4)..."Like |
| 19e0 | 20 60 73 77 69 70 65 72 2d 66 61 63 65 73 27 2c 20 62 75 74 20 75 73 65 64 20 66 6f 72 20 61 6c | .`swiper-faces',.but.used.for.al |
| 1a00 | 6c 20 6d 61 74 63 68 65 73 20 65 78 63 65 70 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 6f 6e 65 | l.matches.except.the.current.one |
| 1a20 | 2e 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 72 65 63 6f 6d 70 75 74 65 2d 62 61 | .")..(defun.swiper--recompute-ba |
| 1a40 | 63 6b 67 72 6f 75 6e 64 2d 66 61 63 65 73 20 28 29 0a 20 20 28 6c 65 74 20 28 28 66 61 63 65 73 | ckground-faces.()...(let.((faces |
| 1a60 | 20 27 28 73 77 69 70 65 72 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d | .'(swiper-background-match-face- |
| 1a80 | 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 62 61 63 6b 67 72 | 1..................swiper-backgr |
| 1aa0 | 6f 75 6e 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d 32 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ound-match-face-2............... |
| 1ac0 | 20 20 20 73 77 69 70 65 72 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d | ...swiper-background-match-face- |
| 1ae0 | 33 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 62 61 63 6b 67 72 | 3..................swiper-backgr |
| 1b00 | 6f 75 6e 64 2d 6d 61 74 63 68 2d 66 61 63 65 2d 34 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6c | ound-match-face-4)).........(col |
| 1b20 | 69 72 2d 63 6f 6d 70 6f 73 65 2d 6d 65 74 68 6f 64 20 23 27 63 6f 6c 69 72 2d 63 6f 6d 70 6f 73 | ir-compose-method.#'colir-compos |
| 1b40 | 65 2d 73 6f 66 74 2d 6c 69 67 68 74 29 29 0a 20 20 20 20 28 63 6c 2d 6d 61 70 63 20 28 6c 61 6d | e-soft-light)).....(cl-mapc.(lam |
| 1b60 | 62 64 61 20 28 66 31 20 66 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a | bda.(f1.f2)................(let* |
| 1b80 | 20 28 28 62 67 20 28 66 61 63 65 2d 62 61 63 6b 67 72 6f 75 6e 64 20 66 31 29 29 0a 20 20 20 20 | .((bg.(face-background.f1))..... |
| 1ba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 49 58 4d 45 3a 20 28 63 6f 6c | ..................;;.FIXME:.(col |
| 1bc0 | 69 72 2d 63 6f 6c 6f 72 2d 70 61 72 73 65 20 22 63 6f 6c 6f 72 2d 32 32 22 29 20 69 73 20 6e 69 | ir-color-parse."color-22").is.ni |
| 1be0 | 6c 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 67 20 28 61 6e | l........................(bg.(an |
| 1c00 | 64 20 62 67 20 28 63 6f 6c 69 72 2d 63 6f 6c 6f 72 2d 70 61 72 73 65 20 62 67 29 29 29 29 0a 20 | d.bg.(colir-color-parse.bg)))).. |
| 1c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 62 67 0a 20 20 20 20 20 20 20 | ................(when.bg........ |
| 1c40 | 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 62 67 20 28 63 6f 6c 69 72 2d 62 6c 65 6e | ............(setq.bg.(colir-blen |
| 1c60 | 64 20 62 67 20 28 63 6f 6c 69 72 2d 63 6f 6c 6f 72 2d 70 61 72 73 65 20 22 23 66 66 66 66 66 66 | d.bg.(colir-color-parse."#ffffff |
| 1c80 | 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 66 61 63 | ")))....................(set-fac |
| 1ca0 | 65 2d 62 61 63 6b 67 72 6f 75 6e 64 20 66 32 20 62 67 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 | e-background.f2.bg)))).......... |
| 1cc0 | 20 20 20 20 73 77 69 70 65 72 2d 66 61 63 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 66 61 | ....swiper-faces..............fa |
| 1ce0 | 63 65 73 29 29 29 0a 28 73 77 69 70 65 72 2d 2d 72 65 63 6f 6d 70 75 74 65 2d 62 61 63 6b 67 72 | ces))).(swiper--recompute-backgr |
| 1d00 | 6f 75 6e 64 2d 66 61 63 65 73 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 73 77 69 70 65 72 2d 6d | ound-faces)..(defcustom.swiper-m |
| 1d20 | 69 6e 2d 68 69 67 68 6c 69 67 68 74 20 32 0a 20 20 22 4f 6e 6c 79 20 68 69 67 68 6c 69 67 68 74 | in-highlight.2..."Only.highlight |
| 1d40 | 20 6d 61 74 63 68 65 73 20 66 6f 72 20 72 65 67 65 78 70 73 20 61 74 20 6c 65 61 73 74 20 74 68 | .matches.for.regexps.at.least.th |
| 1d60 | 69 73 20 6c 6f 6e 67 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 29 0a 0a 28 64 65 | is.long."...:type.'integer)..(de |
| 1d80 | 66 63 75 73 74 6f 6d 20 73 77 69 70 65 72 2d 69 6e 63 6c 75 64 65 2d 6c 69 6e 65 2d 6e 75 6d 62 | fcustom.swiper-include-line-numb |
| 1da0 | 65 72 2d 69 6e 2d 73 65 61 72 63 68 20 6e 69 6c 0a 20 20 22 49 6e 63 6c 75 64 65 20 6c 69 6e 65 | er-in-search.nil..."Include.line |
| 1dc0 | 20 6e 75 6d 62 65 72 20 69 6e 20 74 65 78 74 20 6f 66 20 73 65 61 72 63 68 20 63 61 6e 64 69 64 | .number.in.text.of.search.candid |
| 1de0 | 61 74 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 | ates."...:type.'boolean...:group |
| 1e00 | 20 27 73 77 69 70 65 72 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 73 77 69 70 65 72 2d 67 6f 74 | .'swiper)..(defcustom.swiper-got |
| 1e20 | 6f 2d 73 74 61 72 74 2d 6f 66 2d 6d 61 74 63 68 20 6e 69 6c 0a 20 20 22 57 68 65 6e 20 6e 6f 6e | o-start-of-match.nil..."When.non |
| 1e40 | 2d 6e 69 6c 2c 20 67 6f 20 74 6f 20 74 68 65 20 73 74 61 72 74 20 6f 66 20 74 68 65 20 6d 61 74 | -nil,.go.to.the.start.of.the.mat |
| 1e60 | 63 68 2c 20 6e 6f 74 20 69 74 73 20 65 6e 64 2e 0a 54 72 65 61 74 65 64 20 61 73 20 6e 6f 6e 2d | ch,.not.its.end..Treated.as.non- |
| 1e80 | 6e 69 6c 20 77 68 65 6e 20 73 65 61 72 63 68 69 6e 67 20 62 61 63 6b 77 61 72 64 73 2e 22 0a 20 | nil.when.searching.backwards.".. |
| 1ea0 | 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 0a 20 20 3a 67 72 6f 75 70 20 27 73 77 69 70 65 72 | .:type.'boolean...:group.'swiper |
| 1ec0 | 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 43 2d 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 | )..(defun.swiper-C-s.(&optional. |
| 1ee0 | 61 72 67 29 0a 20 20 22 4d 6f 76 65 20 63 75 72 73 6f 72 20 76 65 72 74 69 63 61 6c 6c 79 20 64 | arg)..."Move.cursor.vertically.d |
| 1f00 | 6f 77 6e 20 41 52 47 20 63 61 6e 64 69 64 61 74 65 73 2e 0a 49 66 20 74 68 65 20 69 6e 70 75 74 | own.ARG.candidates..If.the.input |
| 1f20 | 20 69 73 20 65 6d 70 74 79 2c 20 73 65 6c 65 63 74 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 68 | .is.empty,.select.the.previous.h |
| 1f40 | 69 73 74 6f 72 79 20 65 6c 65 6d 65 6e 74 20 69 6e 73 74 65 61 64 2e 22 0a 20 20 28 69 6e 74 65 | istory.element.instead."...(inte |
| 1f60 | 72 61 63 74 69 76 65 20 22 70 22 29 0a 20 20 28 69 66 20 28 73 74 72 69 6e 67 3d 20 69 76 79 2d | ractive."p")...(if.(string=.ivy- |
| 1f80 | 74 65 78 74 20 22 22 29 0a 20 20 20 20 20 20 28 69 76 79 2d 70 72 65 76 69 6f 75 73 2d 68 69 73 | text."").......(ivy-previous-his |
| 1fa0 | 74 6f 72 79 2d 65 6c 65 6d 65 6e 74 20 31 29 0a 20 20 20 20 28 69 76 79 2d 6e 65 78 74 2d 6c 69 | tory-element.1).....(ivy-next-li |
| 1fc0 | 6e 65 20 61 72 67 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 6d 61 70 0a 20 20 | ne.arg)))..(defvar.swiper-map... |
| 1fe0 | 28 6c 65 74 20 28 28 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 | (let.((map.(make-sparse-keymap)) |
| 2000 | 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 43 2d 73 22 | ).....(define-key.map.(kbd."C-s" |
| 2020 | 29 20 27 73 77 69 70 65 72 2d 43 2d 73 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d | ).'swiper-C-s).....(define-key.m |
| 2040 | 61 70 20 28 6b 62 64 20 22 4d 2d 71 22 29 20 27 73 77 69 70 65 72 2d 71 75 65 72 79 2d 72 65 70 | ap.(kbd."M-q").'swiper-query-rep |
| 2060 | 6c 61 63 65 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 | lace).....(define-key.map.(kbd." |
| 2080 | 43 2d 6c 22 29 20 27 73 77 69 70 65 72 2d 72 65 63 65 6e 74 65 72 2d 74 6f 70 2d 62 6f 74 74 6f | C-l").'swiper-recenter-top-botto |
| 20a0 | 6d 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 43 2d 27 | m).....(define-key.map.(kbd."C-' |
| 20c0 | 22 29 20 27 73 77 69 70 65 72 2d 61 76 79 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 | ").'swiper-avy).....(define-key. |
| 20e0 | 6d 61 70 20 28 6b 62 64 20 22 43 2d 37 22 29 20 27 73 77 69 70 65 72 2d 6d 63 29 0a 20 20 20 20 | map.(kbd."C-7").'swiper-mc)..... |
| 2100 | 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 6b 62 64 20 22 43 2d 63 20 43 2d 66 22 29 20 | (define-key.map.(kbd."C-c.C-f"). |
| 2120 | 27 73 77 69 70 65 72 2d 74 6f 67 67 6c 65 2d 66 61 63 65 2d 6d 61 74 63 68 69 6e 67 29 0a 20 20 | 'swiper-toggle-face-matching)... |
| 2140 | 20 20 6d 61 70 29 0a 20 20 22 4b 65 79 6d 61 70 20 66 6f 72 20 73 77 69 70 65 72 2e 22 29 0a 0a | ..map)..."Keymap.for.swiper.").. |
| 2160 | 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 2d 6f 76 | (defvar.swiper--query-replace-ov |
| 2180 | 65 72 6c 61 79 73 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 71 75 65 72 | erlays.nil)..(defun.swiper--quer |
| 21a0 | 79 2d 72 65 70 6c 61 63 65 2d 75 70 64 61 74 65 66 6e 20 28 29 0a 20 20 28 6c 65 74 20 28 28 6c | y-replace-updatefn.()...(let.((l |
| 21c0 | 69 73 70 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 6e 74 68 20 32 20 28 71 75 65 72 79 | isp.(ignore-errors.(nth.2.(query |
| 21e0 | 2d 72 65 70 6c 61 63 65 2d 63 6f 6d 70 69 6c 65 2d 72 65 70 6c 61 63 65 6d 65 6e 74 20 69 76 79 | -replace-compile-replacement.ivy |
| 2200 | 2d 74 65 78 74 20 74 29 29 29 29 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 6f 76 20 73 77 69 | -text.t))))).....(dolist.(ov.swi |
| 2220 | 70 65 72 2d 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 2d 6f 76 65 72 6c 61 79 73 29 0a 20 20 20 | per--query-replace-overlays).... |
| 2240 | 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 0a 20 20 20 20 20 20 20 6f 76 20 27 61 66 74 65 72 | ...(overlay-put........ov.'after |
| 2260 | 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 28 70 72 6f 70 65 72 74 69 7a 65 0a 20 20 20 20 20 | -string........(propertize...... |
| 2280 | 20 20 20 28 63 6f 6e 64 69 74 69 6f 6e 2d 63 61 73 65 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 | ...(condition-case.nil.......... |
| 22a0 | 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 6f 76 65 72 6c 61 79 | ...(with-current-buffer.(overlay |
| 22c0 | 2d 62 75 66 66 65 72 20 6f 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 6d | -buffer.ov)...............(set-m |
| 22e0 | 61 74 63 68 2d 64 61 74 61 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 6f 76 20 27 6d 64 29 29 0a | atch-data.(overlay-get.ov.'md)). |
| 2300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 63 6f 6e 73 70 20 6c 69 73 70 29 0a 20 | ..............(if.(consp.lisp).. |
| 2320 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 76 61 6c 20 6c 69 73 70 29 0a 20 20 20 | .................(eval.lisp).... |
| 2340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 73 75 62 73 74 69 74 75 74 65 2d 72 | .............(match-substitute-r |
| 2360 | 65 70 6c 61 63 65 6d 65 6e 74 20 69 76 79 2d 74 65 78 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 | eplacement.ivy-text))).......... |
| 2380 | 20 28 65 72 72 6f 72 20 69 76 79 2d 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 27 66 61 63 65 | .(error.ivy-text)).........'face |
| 23a0 | 20 27 65 72 72 6f 72 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 71 75 65 | .'error)))))..(defun.swiper--que |
| 23c0 | 72 79 2d 72 65 70 6c 61 63 65 2d 63 6c 65 61 6e 75 70 20 28 29 0a 20 20 28 77 68 69 6c 65 20 73 | ry-replace-cleanup.()...(while.s |
| 23e0 | 77 69 70 65 72 2d 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 2d 6f 76 65 72 6c 61 79 73 0a 20 20 | wiper--query-replace-overlays... |
| 2400 | 20 20 28 64 65 6c 65 74 65 2d 6f 76 65 72 6c 61 79 20 28 70 6f 70 20 73 77 69 70 65 72 2d 2d 71 | ..(delete-overlay.(pop.swiper--q |
| 2420 | 75 65 72 79 2d 72 65 70 6c 61 63 65 2d 6f 76 65 72 6c 61 79 73 29 29 29 29 0a 0a 28 64 65 66 75 | uery-replace-overlays))))..(defu |
| 2440 | 6e 20 73 77 69 70 65 72 2d 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 2d 73 65 74 75 70 20 28 29 | n.swiper--query-replace-setup.() |
| 2460 | 0a 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 28 6c 65 74 20 28 28 65 | ...(with-ivy-window.....(let.((e |
| 2480 | 6e 64 20 28 77 69 6e 64 6f 77 2d 65 6e 64 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 | nd.(window-end.(selected-window) |
| 24a0 | 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 20 28 69 76 79 2d 72 65 2d 74 6f 2d 73 74 | .t))...........(re.(ivy-re-to-st |
| 24c0 | 72 20 69 76 79 2d 72 65 67 65 78 29 29 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 | r.ivy-regex))).......(save-excur |
| 24e0 | 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 | sion.........(beginning-of-line) |
| 2500 | 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 | .........(while.(re-search-forwa |
| 2520 | 72 64 20 72 65 20 65 6e 64 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6f 76 | rd.re.end.t)...........(let.((ov |
| 2540 | 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 28 31 2d 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 | .(make-overlay.(1-.(match-end.0) |
| 2560 | 29 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ).(match-end.0)))............... |
| 2580 | 20 20 28 6d 64 20 28 6d 61 74 63 68 2d 64 61 74 61 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 | ..(md.(match-data.t))).......... |
| 25a0 | 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 76 20 | ...(overlay-put..............ov. |
| 25c0 | 27 6d 61 74 63 68 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 0a 20 20 | 'matches..............(mapcar... |
| 25e0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 | ............(lambda.(x)......... |
| 2600 | 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 60 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 2c 78 29 | ........(list.`(match-string.,x) |
| 2620 | 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .(match-string.x)))............. |
| 2640 | 20 20 28 6e 75 6d 62 65 72 2d 73 65 71 75 65 6e 63 65 20 30 20 28 31 2d 20 28 2f 20 28 6c 65 6e | ..(number-sequence.0.(1-.(/.(len |
| 2660 | 67 74 68 20 6d 64 29 20 32 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 | gth.md).2))))).............(over |
| 2680 | 6c 61 79 2d 70 75 74 20 6f 76 20 27 6d 64 20 6d 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 | lay-put.ov.'md.md).............( |
| 26a0 | 70 75 73 68 20 6f 76 20 73 77 69 70 65 72 2d 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 2d 6f 76 | push.ov.swiper--query-replace-ov |
| 26c0 | 65 72 6c 61 79 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 3e 20 28 6d | erlays))...........(unless.(>.(m |
| 26e0 | 61 74 63 68 2d 65 6e 64 20 30 29 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 | atch-end.0).(match-beginning.0)) |
| 2700 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 63 68 61 72 29 29 29 29 29 29 | .............(forward-char)))))) |
| 2720 | 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 20 28 | )..(defun.swiper-query-replace.( |
| 2740 | 29 0a 20 20 22 53 74 61 72 74 20 60 71 75 65 72 79 2d 72 65 70 6c 61 63 65 27 20 77 69 74 68 20 | )..."Start.`query-replace'.with. |
| 2760 | 73 74 72 69 6e 67 20 74 6f 20 72 65 70 6c 61 63 65 20 66 72 6f 6d 20 6c 61 73 74 20 73 65 61 72 | string.to.replace.from.last.sear |
| 2780 | 63 68 20 73 74 72 69 6e 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 | ch.string."...(interactive)...(c |
| 27a0 | 6f 6e 64 20 28 28 6e 75 6c 6c 20 28 77 69 6e 64 6f 77 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 29 | ond.((null.(window-minibuffer-p) |
| 27c0 | 29 0a 20 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 53 68 6f 75 6c 64 20 6f | )..........(user-error."Should.o |
| 27e0 | 6e 6c 79 20 62 65 20 63 61 6c 6c 65 64 20 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 20 | nly.be.called.in.the.minibuffer. |
| 2800 | 74 68 72 6f 75 67 68 20 60 73 77 69 70 65 72 2d 6d 61 70 27 22 29 29 0a 20 20 20 20 20 20 20 20 | through.`swiper-map'"))......... |
| 2820 | 28 28 73 74 72 69 6e 67 3d 20 22 22 20 69 76 79 2d 74 65 78 74 29 0a 20 20 20 20 20 20 20 20 20 | ((string=."".ivy-text).......... |
| 2840 | 28 75 73 65 72 2d 65 72 72 6f 72 20 22 45 6d 70 74 79 20 69 6e 70 75 74 22 29 29 0a 20 20 20 20 | (user-error."Empty.input"))..... |
| 2860 | 20 20 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 71 75 65 72 79 2d 72 | ....(t..........(swiper--query-r |
| 2880 | 65 70 6c 61 63 65 2d 73 65 74 75 70 29 0a 20 20 20 20 20 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 | eplace-setup)..........(unwind-p |
| 28a0 | 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 65 6e 61 | rotect...............(let*.((ena |
| 28c0 | 62 6c 65 2d 72 65 63 75 72 73 69 76 65 2d 6d 69 6e 69 62 75 66 66 65 72 73 20 74 29 0a 20 20 20 | ble-recursive-minibuffers.t).... |
| 28e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 72 6f 6d 20 28 69 76 79 2d 72 65 2d | ..................(from.(ivy-re- |
| 2900 | 74 6f 2d 73 74 72 20 69 76 79 2d 72 65 67 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | to-str.ivy-regex)).............. |
| 2920 | 20 20 20 20 20 20 20 20 28 67 72 6f 75 70 73 20 28 6e 75 6d 62 65 72 2d 73 65 71 75 65 6e 63 65 | ........(groups.(number-sequence |
| 2940 | 20 31 20 69 76 79 2d 2d 73 75 62 65 78 70 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .1.ivy--subexps))............... |
| 2960 | 20 20 20 20 20 20 20 28 64 65 66 61 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .......(default................. |
| 2980 | 20 20 20 20 20 20 28 6c 69 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......(list..................... |
| 29a0 | 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 28 6c 61 6d 62 64 61 20 28 69 29 20 28 66 6f 72 6d 61 | ...(mapconcat.(lambda.(i).(forma |
| 29c0 | 74 20 22 5c 5c 25 64 22 20 69 29 29 20 67 72 6f 75 70 73 20 22 20 22 29 0a 20 20 20 20 20 20 20 | t."\\%d".i)).groups.".")........ |
| 29e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 5c 5c 2c 28 63 6f 6e | ................(format."\\,(con |
| 2a00 | 63 61 74 20 25 73 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | cat.%s)"........................ |
| 2a20 | 20 20 20 20 20 20 20 20 28 69 66 20 28 3c 3d 20 69 76 79 2d 2d 73 75 62 65 78 70 73 20 31 29 0a | ........(if.(<=.ivy--subexps.1). |
| 2a40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2a60 | 20 20 20 22 5c 5c 26 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..."\\&"........................ |
| 2a80 | 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 | ..........(mapconcat............ |
| 2aa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 | .......................(lambda.( |
| 2ac0 | 69 29 20 28 66 6f 72 6d 61 74 20 22 5c 5c 25 64 22 20 69 29 29 0a 20 20 20 20 20 20 20 20 20 20 | i).(format."\\%d".i))........... |
| 2ae0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67 72 6f 75 70 73 0a 20 | ........................groups.. |
| 2b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2b20 | 20 22 20 5c 22 20 5c 22 20 22 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .".\".\".")))))................. |
| 2b40 | 20 20 20 20 20 28 74 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | .....(to.......................( |
| 2b60 | 71 75 65 72 79 2d 72 65 70 6c 61 63 65 2d 63 6f 6d 70 69 6c 65 2d 72 65 70 6c 61 63 65 6d 65 6e | query-replace-compile-replacemen |
| 2b80 | 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 72 65 | t........................(ivy-re |
| 2ba0 | 61 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d | ad.........................(form |
| 2bc0 | 61 74 20 22 51 75 65 72 79 20 72 65 70 6c 61 63 65 20 25 73 20 77 69 74 68 3a 20 22 20 66 72 6f | at."Query.replace.%s.with:.".fro |
| 2be0 | 6d 29 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a | m).nil.........................: |
| 2c00 | 64 65 66 20 64 65 66 61 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | def.default..................... |
| 2c20 | 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 73 77 69 70 65 72 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 | ....:caller.'swiper-query-replac |
| 2c40 | 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 29 29 0a 20 | e)........................t))).. |
| 2c60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 29 | ...............(swiper--cleanup) |
| 2c80 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 65 78 69 74 2d 77 69 74 68 2d | .................(ivy-exit-with- |
| 2ca0 | 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 | action..................(lambda. |
| 2cc0 | 28 5f 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 | (_)....................(with-ivy |
| 2ce0 | 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 6f | -window......................(mo |
| 2d00 | 76 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 20 20 | ve-beginning-of-line.1)......... |
| 2d20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 | .............(let.((inhibit-read |
| 2d40 | 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -only.t))....................... |
| 2d60 | 20 28 70 65 72 66 6f 72 6d 2d 72 65 70 6c 61 63 65 20 66 72 6f 6d 20 74 6f 0a 20 20 20 20 20 20 | .(perform-replace.from.to....... |
| 2d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2da0 | 20 20 74 20 74 20 6e 69 6c 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 | ..t.t.nil))))))............(swip |
| 2dc0 | 65 72 2d 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 2d 63 6c 65 61 6e 75 70 29 29 29 29 29 0a 0a | er--query-replace-cleanup))))).. |
| 2de0 | 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 73 77 69 70 65 72 2d 71 75 65 72 79 2d 72 65 70 | (ivy-configure.'swiper-query-rep |
| 2e00 | 6c 61 63 65 0a 20 20 3a 75 70 64 61 74 65 2d 66 6e 20 23 27 73 77 69 70 65 72 2d 2d 71 75 65 72 | lace...:update-fn.#'swiper--quer |
| 2e20 | 79 2d 72 65 70 6c 61 63 65 2d 75 70 64 61 74 65 66 6e 29 0a 28 70 75 74 20 27 73 77 69 70 65 72 | y-replace-updatefn).(put.'swiper |
| 2e40 | 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 20 27 6e 6f 2d 63 6f 75 6e 73 65 6c 2d 4d 2d 78 20 74 | -query-replace.'no-counsel-M-x.t |
| 2e60 | 29 0a 0a 28 64 65 66 76 61 72 20 69 6e 68 69 62 69 74 2d 6d 65 73 73 61 67 65 29 0a 0a 28 64 65 | )..(defvar.inhibit-message)..(de |
| 2e80 | 66 75 6e 20 73 77 69 70 65 72 2d 61 6c 6c 2d 71 75 65 72 79 2d 72 65 70 6c 61 63 65 20 28 29 0a | fun.swiper-all-query-replace.(). |
| 2ea0 | 20 20 22 53 74 61 72 74 20 60 71 75 65 72 79 2d 72 65 70 6c 61 63 65 27 20 77 69 74 68 20 73 74 | .."Start.`query-replace'.with.st |
| 2ec0 | 72 69 6e 67 20 74 6f 20 72 65 70 6c 61 63 65 20 66 72 6f 6d 20 6c 61 73 74 20 73 65 61 72 63 68 | ring.to.replace.from.last.search |
| 2ee0 | 20 73 74 72 69 6e 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 69 66 20 | .string."...(interactive)...(if. |
| 2f00 | 28 6e 75 6c 6c 20 28 77 69 6e 64 6f 77 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 29 29 0a 20 20 20 | (null.(window-minibuffer-p)).... |
| 2f20 | 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 0a 20 20 20 20 20 20 20 22 53 68 6f 75 6c 64 20 6f 6e | ...(user-error........"Should.on |
| 2f40 | 6c 79 20 62 65 20 63 61 6c 6c 65 64 20 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 20 74 | ly.be.called.in.the.minibuffer.t |
| 2f60 | 68 72 6f 75 67 68 20 60 73 77 69 70 65 72 2d 61 6c 6c 2d 6d 61 70 27 22 29 0a 20 20 20 20 28 6c | hrough.`swiper-all-map'").....(l |
| 2f80 | 65 74 2a 20 28 28 65 6e 61 62 6c 65 2d 72 65 63 75 72 73 69 76 65 2d 6d 69 6e 69 62 75 66 66 65 | et*.((enable-recursive-minibuffe |
| 2fa0 | 72 73 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 66 72 6f 6d 20 28 69 76 79 2d 2d 72 65 67 | rs.t)............(from.(ivy--reg |
| 2fc0 | 65 78 20 69 76 79 2d 74 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 6f 20 28 71 75 | ex.ivy-text))............(to.(qu |
| 2fe0 | 65 72 79 2d 72 65 70 6c 61 63 65 2d 72 65 61 64 2d 74 6f 20 66 72 6f 6d 20 22 51 75 65 72 79 20 | ery-replace-read-to.from."Query. |
| 3000 | 72 65 70 6c 61 63 65 22 20 74 29 29 29 0a 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 | replace".t))).......(swiper--cle |
| 3020 | 61 6e 75 70 29 0a 20 20 20 20 20 20 28 69 76 79 2d 65 78 69 74 2d 77 69 74 68 2d 61 63 74 69 6f | anup).......(ivy-exit-with-actio |
| 3040 | 6e 0a 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 5f 29 0a 20 20 20 20 20 20 20 20 20 28 6c | n........(lambda.(_)..........(l |
| 3060 | 65 74 20 28 28 77 6e 64 2d 63 6f 6e 66 20 28 63 75 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 63 6f | et.((wnd-conf.(current-window-co |
| 3080 | 6e 66 69 67 75 72 61 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e | nfiguration))................(in |
| 30a0 | 68 69 62 69 74 2d 6d 65 73 73 61 67 65 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 75 6e | hibit-message.t))............(un |
| 30c0 | 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 6f | wind-protect.................(do |
| 30e0 | 6c 69 73 74 20 28 63 61 6e 64 20 69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 29 0a 20 20 20 20 20 | list.(cand.ivy--old-cands)...... |
| 3100 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 67 65 74 2d | .............(let.((buffer.(get- |
| 3120 | 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 62 75 66 66 65 72 20 63 61 6e 64 29 29 29 0a | text-property.0.'buffer.cand))). |
| 3140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 | ....................(switch-to-b |
| 3160 | 75 66 66 65 72 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | uffer.buffer)................... |
| 3180 | 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 | ..(goto-char.(point-min))....... |
| 31a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 65 72 66 6f 72 6d 2d 72 65 70 6c 61 63 65 20 66 | ..............(perform-replace.f |
| 31c0 | 72 6f 6d 20 74 6f 20 74 20 74 20 6e 69 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | rom.to.t.t.nil)))..............( |
| 31e0 | 73 65 74 2d 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 77 6e 64 2d 63 6f 6e | set-window-configuration.wnd-con |
| 3200 | 66 29 29 29 29 29 29 29 29 0a 28 70 75 74 20 27 73 77 69 70 65 72 2d 61 6c 6c 2d 71 75 65 72 79 | f)))))))).(put.'swiper-all-query |
| 3220 | 2d 72 65 70 6c 61 63 65 20 27 6e 6f 2d 63 6f 75 6e 73 65 6c 2d 4d 2d 78 20 74 29 0a 0a 28 64 65 | -replace.'no-counsel-M-x.t)..(de |
| 3240 | 66 76 61 72 20 61 76 79 2d 61 6c 6c 2d 77 69 6e 64 6f 77 73 29 0a 28 64 65 66 76 61 72 20 61 76 | fvar.avy-all-windows).(defvar.av |
| 3260 | 79 2d 73 74 79 6c 65 29 0a 28 64 65 66 76 61 72 20 61 76 79 2d 6b 65 79 73 29 0a 28 64 65 63 6c | y-style).(defvar.avy-keys).(decl |
| 3280 | 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 76 79 2d 2d 6f 76 65 72 6c 61 79 2d 70 6f 73 74 20 22 | are-function.avy--overlay-post." |
| 32a0 | 65 78 74 3a 61 76 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 76 79 2d | ext:avy").(declare-function.avy- |
| 32c0 | 61 63 74 69 6f 6e 2d 67 6f 74 6f 20 22 65 78 74 3a 61 76 79 22 29 0a 28 64 65 63 6c 61 72 65 2d | action-goto."ext:avy").(declare- |
| 32e0 | 66 75 6e 63 74 69 6f 6e 20 61 76 79 2d 63 61 6e 64 69 64 61 74 65 2d 62 65 67 20 22 65 78 74 3a | function.avy-candidate-beg."ext: |
| 3300 | 61 76 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 76 79 2d 2d 64 6f 6e | avy").(declare-function.avy--don |
| 3320 | 65 20 22 65 78 74 3a 61 76 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 | e."ext:avy").(declare-function.a |
| 3340 | 76 79 2d 2d 6d 61 6b 65 2d 62 61 63 6b 67 72 6f 75 6e 64 73 20 22 65 78 74 3a 61 76 79 22 29 0a | vy--make-backgrounds."ext:avy"). |
| 3360 | 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 76 79 2d 77 69 6e 64 6f 77 2d 6c 69 73 | (declare-function.avy-window-lis |
| 3380 | 74 20 22 65 78 74 3a 61 76 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 | t."ext:avy").(declare-function.a |
| 33a0 | 76 79 2d 72 65 61 64 20 22 65 78 74 3a 61 76 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 | vy-read."ext:avy").(declare-func |
| 33c0 | 74 69 6f 6e 20 61 76 79 2d 72 65 61 64 2d 64 65 2d 62 72 75 69 6a 6e 20 22 65 78 74 3a 61 76 79 | tion.avy-read-de-bruijn."ext:avy |
| 33e0 | 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 76 79 2d 74 72 65 65 20 22 65 | ").(declare-function.avy-tree."e |
| 3400 | 78 74 3a 61 76 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 61 76 79 2d 70 | xt:avy").(declare-function.avy-p |
| 3420 | 75 73 68 2d 6d 61 72 6b 20 22 65 78 74 3a 61 76 79 22 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e | ush-mark."ext:avy").(declare-fun |
| 3440 | 63 74 69 6f 6e 20 61 76 79 2d 2d 72 65 6d 6f 76 65 2d 6c 65 61 64 69 6e 67 2d 63 68 61 72 73 20 | ction.avy--remove-leading-chars. |
| 3460 | 22 65 78 74 3a 61 76 79 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 61 76 79 2d 63 | "ext:avy")..(defun.swiper--avy-c |
| 3480 | 61 6e 64 69 64 61 74 65 73 20 28 29 0a 20 20 28 6c 65 74 2a 20 28 0a 20 20 20 20 20 20 20 20 20 | andidates.()...(let*.(.......... |
| 34a0 | 3b 3b 20 57 65 27 6c 6c 20 68 61 76 65 20 6f 76 65 72 6c 61 70 70 69 6e 67 20 6f 76 65 72 6c 61 | ;;.We'll.have.overlapping.overla |
| 34c0 | 79 73 2c 20 73 6f 20 77 65 20 73 6f 72 74 20 61 6c 6c 20 74 68 65 0a 20 20 20 20 20 20 20 20 20 | ys,.so.we.sort.all.the.......... |
| 34e0 | 3b 3b 20 6f 76 65 72 6c 61 79 73 20 69 6e 20 74 68 65 20 76 69 73 69 62 6c 65 20 72 65 67 69 6f | ;;.overlays.in.the.visible.regio |
| 3500 | 6e 20 62 79 20 74 68 65 69 72 20 73 74 61 72 74 2c 20 61 6e 64 20 74 68 65 6e 0a 20 20 20 20 20 | n.by.their.start,.and.then...... |
| 3520 | 20 20 20 20 3b 3b 20 74 68 72 6f 77 20 6f 75 74 20 6e 6f 6e 2d 53 77 69 70 65 72 20 6f 76 65 72 | ....;;.throw.out.non-Swiper.over |
| 3540 | 6c 61 79 73 20 6f 72 20 6f 76 65 72 6c 61 70 70 69 6e 67 20 53 77 69 70 65 72 0a 20 20 20 20 20 | lays.or.overlapping.Swiper...... |
| 3560 | 20 20 20 20 3b 3b 20 6f 76 65 72 6c 61 79 73 2e 0a 20 20 20 20 20 20 20 20 20 28 76 69 73 69 62 | ....;;.overlays...........(visib |
| 3580 | 6c 65 2d 6f 76 65 72 6c 61 79 73 20 28 63 6c 2d 73 6f 72 74 20 28 77 69 74 68 2d 69 76 79 2d 77 | le-overlays.(cl-sort.(with-ivy-w |
| 35a0 | 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | indow........................... |
| 35c0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 73 2d 69 6e 20 28 77 69 6e 64 6f 77 | ............(overlays-in.(window |
| 35e0 | 2d 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -start)......................... |
| 3600 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 6e 64 | ...........................(wind |
| 3620 | 6f 77 2d 65 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ow-end)))....................... |
| 3640 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 3c 20 3a 6b 65 79 20 23 27 6f 76 65 72 6c 61 79 | ..............#'<.:key.#'overlay |
| 3660 | 2d 73 74 61 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 69 6e 2d 6f 76 65 72 6c 61 79 2d 73 | -start))..........(min-overlay-s |
| 3680 | 74 61 72 74 20 30 29 0a 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 73 2d 66 6f 72 2d 61 | tart.0)..........(overlays-for-a |
| 36a0 | 76 79 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 2d 6e 6f 74 0a 20 | vy...........(cl-remove-if-not.. |
| 36c0 | 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 6f 76 29 0a 20 20 20 20 20 20 20 20 20 | ..........(lambda.(ov).......... |
| 36e0 | 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 3e 3d 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 | ....(when.(and.(>=.(overlay-star |
| 3700 | 74 20 6f 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | t.ov)........................... |
| 3720 | 20 20 6d 69 6e 2d 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ..min-overlay-start)............ |
| 3740 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 6d 71 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 | .............(memq.(overlay-get. |
| 3760 | 6f 76 20 27 66 61 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ov.'face)....................... |
| 3780 | 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 20 73 77 69 70 65 72 2d 66 61 63 65 73 20 73 77 69 | ........(append.swiper-faces.swi |
| 37a0 | 70 65 72 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 66 61 63 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 | per-background-faces)))......... |
| 37c0 | 20 20 20 20 20 20 20 28 73 65 74 71 20 6d 69 6e 2d 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 28 | .......(setq.min-overlay-start.( |
| 37e0 | 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 20 6f 76 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | overlay-start.ov))))............ |
| 3800 | 76 69 73 69 62 6c 65 2d 6f 76 65 72 6c 61 79 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 6f 66 66 | visible-overlays))..........(off |
| 3820 | 73 65 74 20 28 69 66 20 28 65 71 20 28 69 76 79 2d 73 74 61 74 65 2d 63 61 6c 6c 65 72 20 69 76 | set.(if.(eq.(ivy-state-caller.iv |
| 3840 | 79 2d 6c 61 73 74 29 20 27 73 77 69 70 65 72 29 20 31 20 30 29 29 29 0a 20 20 20 20 28 6e 63 6f | y-last).'swiper).1.0))).....(nco |
| 3860 | 6e 63 0a 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 6f 76 29 0a 20 20 20 | nc......(mapcar.(lambda.(ov).... |
| 3880 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 6f 76 65 72 6c 61 79 2d 73 74 61 72 74 | ............(cons.(overlay-start |
| 38a0 | 20 6f 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 76 65 72 6c | .ov)......................(overl |
| 38c0 | 61 79 2d 67 65 74 20 6f 76 20 27 77 69 6e 64 6f 77 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ay-get.ov.'window)))............ |
| 38e0 | 20 20 6f 76 65 72 6c 61 79 73 2d 66 6f 72 2d 61 76 79 29 0a 20 20 20 20 20 28 73 61 76 65 2d 65 | ..overlays-for-avy)......(save-e |
| 3900 | 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 28 73 61 76 65 2d 72 65 73 74 72 69 63 74 69 6f | xcursion........(save-restrictio |
| 3920 | 6e 0a 20 20 20 20 20 20 20 20 20 28 6e 61 72 72 6f 77 2d 74 6f 2d 72 65 67 69 6f 6e 20 28 77 69 | n..........(narrow-to-region.(wi |
| 3940 | 6e 64 6f 77 2d 73 74 61 72 74 29 20 28 77 69 6e 64 6f 77 2d 65 6e 64 29 29 0a 20 20 20 20 20 20 | ndow-start).(window-end))....... |
| 3960 | 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 | ...(goto-char.(point-min))...... |
| 3980 | 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 | ....(forward-line)..........(let |
| 39a0 | 20 28 28 77 69 6e 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 | .((win.(selected-window))....... |
| 39c0 | 20 20 20 20 20 20 20 20 20 63 61 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c | .........cands)............(whil |
| 39e0 | 65 20 28 6e 6f 74 20 28 65 6f 62 70 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 | e.(not.(eobp))..............(pus |
| 3a00 | 68 20 28 63 6f 6e 73 20 28 2b 20 28 70 6f 69 6e 74 29 20 6f 66 66 73 65 74 29 20 77 69 6e 29 0a | h.(cons.(+.(point).offset).win). |
| 3a20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 73 29 0a 20 20 20 20 20 20 | ...................cands)....... |
| 3a40 | 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 | .......(forward-line)).......... |
| 3a60 | 20 20 63 61 6e 64 73 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 61 76 | ..cands))))))..(defun.swiper--av |
| 3a80 | 79 2d 63 61 6e 64 69 64 61 74 65 20 28 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 64 61 74 | y-candidate.()...(let.((candidat |
| 3aa0 | 65 73 20 28 73 77 69 70 65 72 2d 2d 61 76 79 2d 63 61 6e 64 69 64 61 74 65 73 29 29 0a 20 20 20 | es.(swiper--avy-candidates)).... |
| 3ac0 | 20 20 20 20 20 28 61 76 79 2d 61 6c 6c 2d 77 69 6e 64 6f 77 73 20 6e 69 6c 29 29 0a 20 20 20 20 | .....(avy-all-windows.nil))..... |
| 3ae0 | 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 32 0a | (unwind-protect..........(prog2. |
| 3b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 76 79 2d 2d 6d 61 6b 65 2d 62 61 63 6b 67 72 6f 75 | .............(avy--make-backgrou |
| 3b20 | 6e 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 20 28 61 76 79 2d 77 | nds...............(append.(avy-w |
| 3b40 | 69 6e 64 6f 77 2d 6c 69 73 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | indow-list)..................... |
| 3b60 | 20 20 28 6c 69 73 74 20 28 69 76 79 2d 73 74 61 74 65 2d 77 69 6e 64 6f 77 20 69 76 79 2d 6c 61 | ..(list.(ivy-state-window.ivy-la |
| 3b80 | 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 61 76 79 2d | st))))..............(if.(eq.avy- |
| 3ba0 | 73 74 79 6c 65 20 27 64 65 2d 62 72 75 69 6a 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | style.'de-bruijn)............... |
| 3bc0 | 20 20 20 28 61 76 79 2d 72 65 61 64 2d 64 65 2d 62 72 75 69 6a 6e 20 63 61 6e 64 69 64 61 74 65 | ...(avy-read-de-bruijn.candidate |
| 3be0 | 73 20 61 76 79 2d 6b 65 79 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 76 79 2d | s.avy-keys)................(avy- |
| 3c00 | 72 65 61 64 20 28 61 76 79 2d 74 72 65 65 20 63 61 6e 64 69 64 61 74 65 73 20 61 76 79 2d 6b 65 | read.(avy-tree.candidates.avy-ke |
| 3c20 | 79 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 61 | ys)..........................#'a |
| 3c40 | 76 79 2d 2d 6f 76 65 72 6c 61 79 2d 70 6f 73 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | vy--overlay-post................ |
| 3c60 | 20 20 20 20 20 20 20 20 20 20 23 27 61 76 79 2d 2d 72 65 6d 6f 76 65 2d 6c 65 61 64 69 6e 67 2d | ..........#'avy--remove-leading- |
| 3c80 | 63 68 61 72 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 76 79 2d 70 75 73 68 2d 6d 61 72 | chars))............(avy-push-mar |
| 3ca0 | 6b 29 29 0a 20 20 20 20 20 20 28 61 76 79 2d 2d 64 6f 6e 65 29 29 29 29 0a 0a 28 64 65 66 75 6e | k)).......(avy--done))))..(defun |
| 3cc0 | 20 73 77 69 70 65 72 2d 2d 61 76 79 2d 69 6e 64 65 78 20 28 70 6f 73 29 0a 20 20 22 52 65 74 75 | .swiper--avy-index.(pos)..."Retu |
| 3ce0 | 72 6e 20 60 69 76 79 2d 2d 69 6e 64 65 78 27 20 66 6f 72 20 60 61 76 79 27 20 63 61 6e 64 69 64 | rn.`ivy--index'.for.`avy'.candid |
| 3d00 | 61 74 65 20 61 74 20 6d 69 6e 69 62 75 66 66 65 72 20 50 4f 53 2e 22 0a 20 20 3b 3b 20 50 6f 73 | ate.at.minibuffer.POS."...;;.Pos |
| 3d20 | 69 74 69 6f 6e 20 69 6e 20 6f 72 69 67 69 6e 61 6c 20 62 75 66 66 65 72 2e 0a 20 20 28 6c 65 74 | ition.in.original.buffer....(let |
| 3d40 | 20 28 28 6f 70 6f 73 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 70 6f 73 20 27 | .((opos.(get-text-property.pos.' |
| 3d60 | 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 6f 72 0a 20 20 20 20 20 3b 3b 20 46 69 6e 64 20 60 73 | point))).....(or......;;.Find.`s |
| 3d80 | 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 20 69 6e 64 65 78 20 62 61 73 65 64 20 6f 6e 20 62 75 | wiper-isearch'.index.based.on.bu |
| 3da0 | 66 66 65 72 20 70 6f 73 69 74 69 6f 6e 2e 0a 20 20 20 20 20 28 61 6e 64 20 6f 70 6f 73 20 28 63 | ffer.position.......(and.opos.(c |
| 3dc0 | 6c 2d 70 6f 73 69 74 69 6f 6e 20 6f 70 6f 73 20 69 76 79 2d 2d 61 6c 6c 2d 63 61 6e 64 69 64 61 | l-position.opos.ivy--all-candida |
| 3de0 | 74 65 73 29 29 0a 20 20 20 20 20 3b 3b 20 46 69 6e 64 20 60 73 77 69 70 65 72 27 20 69 6e 64 65 | tes))......;;.Find.`swiper'.inde |
| 3e00 | 78 20 62 61 73 65 64 20 6f 6e 20 6c 69 6e 65 20 6e 75 6d 62 65 72 2e 0a 20 20 20 20 20 28 6c 65 | x.based.on.line.number.......(le |
| 3e20 | 74 20 28 28 6e 6c 69 6e 65 73 20 28 63 6f 75 6e 74 2d 6c 69 6e 65 73 20 28 70 6f 69 6e 74 2d 6d | t.((nlines.(count-lines.(point-m |
| 3e40 | 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 20 20 20 20 20 20 20 28 2b 20 28 63 61 | in).(point-max))))........(+.(ca |
| 3e60 | 72 20 28 69 76 79 2d 2d 6d 69 6e 69 62 75 66 66 65 72 2d 69 6e 64 65 78 2d 62 6f 75 6e 64 73 0a | r.(ivy--minibuffer-index-bounds. |
| 3e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 76 79 2d 2d 69 6e 64 65 78 20 69 76 79 2d 2d | ................ivy--index.ivy-- |
| 3ea0 | 6c 65 6e 67 74 68 20 69 76 79 2d 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c | length.ivy-height))...........(l |
| 3ec0 | 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 20 70 6f 73 29 0a 20 20 20 20 20 20 20 20 20 | ine-number-at-pos.pos).......... |
| 3ee0 | 20 28 69 66 20 28 6f 72 20 28 3d 20 6e 6c 69 6e 65 73 20 28 31 2b 20 69 76 79 2d 68 65 69 67 68 | .(if.(or.(=.nlines.(1+.ivy-heigh |
| 3f00 | 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 20 69 76 79 2d 2d 6c 65 | t))...................(<.ivy--le |
| 3f20 | 6e 67 74 68 20 69 76 79 2d 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ngth.ivy-height))............... |
| 3f40 | 30 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 20 69 76 79 2d 68 65 69 67 68 74 20 6e 6c 69 6e | 0.............(-.ivy-height.nlin |
| 3f60 | 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 2d 32 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 | es))...........-2)))))..(defun.s |
| 3f80 | 77 69 70 65 72 2d 2d 61 76 79 2d 67 6f 74 6f 20 28 63 61 6e 64 69 64 61 74 65 29 0a 20 20 28 63 | wiper--avy-goto.(candidate)...(c |
| 3fa0 | 6f 6e 64 20 28 28 6c 65 74 20 28 28 77 69 6e 20 28 63 64 72 2d 73 61 66 65 20 63 61 6e 64 69 64 | ond.((let.((win.(cdr-safe.candid |
| 3fc0 | 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 77 69 6e 20 28 77 69 6e 64 | ate)))............(and.win.(wind |
| 3fe0 | 6f 77 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 20 77 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 | ow-minibuffer-p.win))).......... |
| 4000 | 28 73 65 74 71 20 69 76 79 2d 2d 69 6e 64 65 78 20 28 73 77 69 70 65 72 2d 2d 61 76 79 2d 69 6e | (setq.ivy--index.(swiper--avy-in |
| 4020 | 64 65 78 20 28 63 61 72 20 63 61 6e 64 69 64 61 74 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 | dex.(car.candidate)))..........( |
| 4040 | 69 76 79 2d 2d 65 78 68 69 62 69 74 29 0a 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 64 6f 6e 65 | ivy--exhibit)..........(ivy-done |
| 4060 | 29 0a 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 63 61 6c 6c 29 29 0a 20 20 20 20 20 20 20 20 28 | )..........(ivy-call)).........( |
| 4080 | 28 6f 72 20 28 63 6f 6e 73 70 20 63 61 6e 64 69 64 61 74 65 29 0a 20 20 20 20 20 20 20 20 20 20 | (or.(consp.candidate)........... |
| 40a0 | 20 20 20 28 6e 75 6d 62 65 72 2d 6f 72 2d 6d 61 72 6b 65 72 2d 70 20 63 61 6e 64 69 64 61 74 65 | ...(number-or-marker-p.candidate |
| 40c0 | 29 29 0a 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 71 75 69 74 2d 61 6e 64 2d 72 75 6e 0a 20 20 | ))..........(ivy-quit-and-run... |
| 40e0 | 20 20 20 20 20 20 20 20 20 28 61 76 79 2d 61 63 74 69 6f 6e 2d 67 6f 74 6f 20 28 61 76 79 2d 63 | .........(avy-action-goto.(avy-c |
| 4100 | 61 6e 64 69 64 61 74 65 2d 62 65 67 20 63 61 6e 64 69 64 61 74 65 29 29 29 29 29 29 0a 0a 3b 3b | andidate-beg.candidate))))))..;; |
| 4120 | 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 61 76 79 20 28 | ;###autoload.(defun.swiper-avy.( |
| 4140 | 29 0a 20 20 22 4a 75 6d 70 20 74 6f 20 6f 6e 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 | )..."Jump.to.one.of.the.current. |
| 4160 | 73 77 69 70 65 72 20 63 61 6e 64 69 64 61 74 65 73 20 77 69 74 68 20 60 61 76 79 27 2e 22 0a 20 | swiper.candidates.with.`avy'.".. |
| 4180 | 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 72 65 71 75 69 72 | .(interactive)...(unless.(requir |
| 41a0 | 65 20 27 61 76 79 20 6e 69 6c 20 27 6e 6f 65 72 72 6f 72 29 0a 20 20 20 20 28 75 73 65 72 2d 65 | e.'avy.nil.'noerror).....(user-e |
| 41c0 | 72 72 6f 72 20 22 50 61 63 6b 61 67 65 20 61 76 79 20 69 73 6e 27 74 20 69 6e 73 74 61 6c 6c 65 | rror."Package.avy.isn't.installe |
| 41e0 | 64 22 29 29 0a 20 20 28 63 6c 2d 63 61 73 65 20 28 6c 65 6e 67 74 68 20 69 76 79 2d 74 65 78 74 | d"))...(cl-case.(length.ivy-text |
| 4200 | 29 0a 20 20 20 20 28 30 0a 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 65 65 64 20 | ).....(0......(user-error."Need. |
| 4220 | 61 74 20 6c 65 61 73 74 20 6f 6e 65 20 63 68 61 72 20 6f 66 20 69 6e 70 75 74 22 29 29 0a 20 20 | at.least.one.char.of.input"))... |
| 4240 | 20 20 28 31 0a 20 20 20 20 20 3b 3b 20 46 49 58 4d 45 3a 20 60 73 77 69 70 65 72 2d 2d 75 70 64 | ..(1......;;.FIXME:.`swiper--upd |
| 4260 | 61 74 65 2d 69 6e 70 75 74 2d 69 76 79 27 20 65 78 70 65 63 74 73 20 73 74 72 69 6e 67 20 63 61 | ate-input-ivy'.expects.string.ca |
| 4280 | 6e 64 69 64 61 74 65 73 2c 0a 20 20 20 20 20 3b 3b 20 62 75 74 20 60 73 77 69 70 65 72 2d 69 73 | ndidates,......;;.but.`swiper-is |
| 42a0 | 65 61 72 63 68 27 20 6e 6f 77 20 75 73 65 73 20 62 75 66 66 65 72 20 70 6f 73 69 74 69 6f 6e 73 | earch'.now.uses.buffer.positions |
| 42c0 | 2e 0a 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 70 20 28 69 76 79 2d 73 74 61 74 65 | .......(when.(stringp.(ivy-state |
| 42e0 | 2d 63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74 29 29 0a 20 20 20 20 20 20 20 28 6c 65 74 20 | -current.ivy-last))........(let. |
| 4300 | 28 28 73 77 69 70 65 72 2d 6d 69 6e 2d 68 69 67 68 6c 69 67 68 74 20 31 29 29 0a 20 20 20 20 20 | ((swiper-min-highlight.1))...... |
| 4320 | 20 20 20 20 28 73 77 69 70 65 72 2d 2d 75 70 64 61 74 65 2d 69 6e 70 75 74 2d 69 76 79 29 29 29 | ....(swiper--update-input-ivy))) |
| 4340 | 29 29 0a 20 20 28 73 77 69 70 65 72 2d 2d 61 76 79 2d 67 6f 74 6f 20 28 73 77 69 70 65 72 2d 2d | ))...(swiper--avy-goto.(swiper-- |
| 4360 | 61 76 79 2d 63 61 6e 64 69 64 61 74 65 29 29 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 | avy-candidate)))..(declare-funct |
| 4380 | 69 6f 6e 20 6d 63 2f 63 72 65 61 74 65 2d 66 61 6b 65 2d 63 75 72 73 6f 72 2d 61 74 2d 70 6f 69 | ion.mc/create-fake-cursor-at-poi |
| 43a0 | 6e 74 20 22 65 78 74 3a 6d 75 6c 74 69 70 6c 65 2d 63 75 72 73 6f 72 73 2d 63 6f 72 65 22 29 0a | nt."ext:multiple-cursors-core"). |
| 43c0 | 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6d 75 6c 74 69 70 6c 65 2d 63 75 72 73 6f | (declare-function.multiple-curso |
| 43e0 | 72 73 2d 6d 6f 64 65 20 22 65 78 74 3a 6d 75 6c 74 69 70 6c 65 2d 63 75 72 73 6f 72 73 2d 63 6f | rs-mode."ext:multiple-cursors-co |
| 4400 | 72 65 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 6d 63 20 28 29 0a 20 20 22 43 72 65 | re")..(defun.swiper-mc.()..."Cre |
| 4420 | 61 74 65 20 61 20 66 61 6b 65 20 63 75 72 73 6f 72 20 66 6f 72 20 65 61 63 68 20 60 73 77 69 70 | ate.a.fake.cursor.for.each.`swip |
| 4440 | 65 72 27 20 63 61 6e 64 69 64 61 74 65 2e 0a 4d 61 6b 65 20 73 75 72 65 20 60 73 77 69 70 65 72 | er'.candidate..Make.sure.`swiper |
| 4460 | 2d 6d 63 27 20 69 73 20 6f 6e 20 60 6d 63 2f 63 6d 64 73 2d 74 6f 2d 72 75 6e 2d 6f 6e 63 65 27 | -mc'.is.on.`mc/cmds-to-run-once' |
| 4480 | 20 6c 69 73 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e 6c 65 73 | .list."...(interactive)...(unles |
| 44a0 | 73 20 28 72 65 71 75 69 72 65 20 27 6d 75 6c 74 69 70 6c 65 2d 63 75 72 73 6f 72 73 20 6e 69 6c | s.(require.'multiple-cursors.nil |
| 44c0 | 20 74 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 4d 75 6c 74 69 70 6c 65 2d 63 75 72 73 6f 72 73 | .t).....(error."Multiple-cursors |
| 44e0 | 20 69 73 6e 27 74 20 69 6e 73 74 61 6c 6c 65 64 22 29 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 77 | .isn't.installed"))...(unless.(w |
| 4500 | 69 6e 64 6f 77 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 | indow-minibuffer-p).....(error." |
| 4520 | 43 61 6c 6c 20 6d 65 20 6f 6e 6c 79 20 66 72 6f 6d 20 60 73 77 69 70 65 72 27 22 29 29 0a 20 20 | Call.me.only.from.`swiper'"))... |
| 4540 | 28 6c 65 74 20 28 28 63 61 6e 64 73 20 28 6e 72 65 76 65 72 73 65 20 69 76 79 2d 2d 6f 6c 64 2d | (let.((cands.(nreverse.ivy--old- |
| 4560 | 63 61 6e 64 73 29 29 0a 20 20 20 20 20 20 20 20 28 61 63 74 69 6f 6e 20 28 69 76 79 2d 2d 67 65 | cands)).........(action.(ivy--ge |
| 4580 | 74 2d 61 63 74 69 6f 6e 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 | t-action.ivy-last))).....(unless |
| 45a0 | 20 28 73 74 72 69 6e 67 3d 20 69 76 79 2d 74 65 78 74 20 22 22 29 0a 20 20 20 20 20 20 28 69 76 | .(string=.ivy-text."").......(iv |
| 45c0 | 79 2d 65 78 69 74 2d 77 69 74 68 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 28 6c 61 6d 62 64 | y-exit-with-action........(lambd |
| 45e0 | 61 20 28 5f 29 0a 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 63 61 6e 64 29 0a 20 20 20 20 20 | a.(_)..........(let.(cand)...... |
| 4600 | 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 71 20 63 61 6e 64 20 28 70 6f 70 20 63 61 6e | ......(while.(setq.cand.(pop.can |
| 4620 | 64 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 61 63 74 69 6f | ds))..............(funcall.actio |
| 4640 | 6e 20 63 61 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 63 61 6e 64 73 | n.cand)..............(when.cands |
| 4660 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 63 2f 63 72 65 61 74 65 2d 66 61 6b 65 2d | ................(mc/create-fake- |
| 4680 | 63 75 72 73 6f 72 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6d 75 | cursor-at-point))))..........(mu |
| 46a0 | 6c 74 69 70 6c 65 2d 63 75 72 73 6f 72 73 2d 6d 6f 64 65 20 31 29 29 29 29 29 29 0a 0a 28 64 65 | ltiple-cursors-mode.1))))))..(de |
| 46c0 | 66 76 61 72 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 73 74 61 72 | fvar.swiper--current-window-star |
| 46e0 | 74 20 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 60 77 69 6e 64 6f 77 2d 73 74 61 72 74 27 20 74 6f | t.nil..."Store.`window-start'.to |
| 4700 | 20 72 65 73 74 6f 72 65 20 69 74 20 6c 61 74 65 72 2e 0a 54 68 69 73 20 70 72 65 76 65 6e 74 73 | .restore.it.later..This.prevents |
| 4720 | 20 61 20 5c 22 6a 75 6d 70 69 6e 67 5c 22 20 62 65 68 61 76 69 6f 72 20 77 68 69 63 68 20 6f 63 | .a.\"jumping\".behavior.which.oc |
| 4740 | 63 75 72 73 20 77 68 65 6e 20 76 61 72 69 61 62 6c 65 73 0a 73 75 63 68 20 61 73 20 60 73 63 72 | curs.when.variables.such.as.`scr |
| 4760 | 6f 6c 6c 2d 63 6f 6e 73 65 72 76 61 74 69 76 65 6c 79 27 20 61 72 65 20 73 65 74 20 74 6f 20 61 | oll-conservatively'.are.set.to.a |
| 4780 | 20 68 69 67 68 20 76 61 6c 75 65 2e 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 72 65 | .high.value.")..(defun.swiper-re |
| 47a0 | 63 65 6e 74 65 72 2d 74 6f 70 2d 62 6f 74 74 6f 6d 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 | center-top-bottom.(&optional.arg |
| 47c0 | 29 0a 20 20 22 43 61 6c 6c 20 28 60 72 65 63 65 6e 74 65 72 2d 74 6f 70 2d 62 6f 74 74 6f 6d 27 | )..."Call.(`recenter-top-bottom' |
| 47e0 | 20 41 52 47 29 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 0a 20 20 28 77 | .ARG)."...(interactive."P")...(w |
| 4800 | 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 28 72 65 63 65 6e 74 65 72 2d 74 6f 70 | ith-ivy-window.....(recenter-top |
| 4820 | 2d 62 6f 74 74 6f 6d 20 61 72 67 29 0a 20 20 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 63 | -bottom.arg).....(setq.swiper--c |
| 4840 | 75 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 73 74 61 72 74 20 28 77 69 6e 64 6f 77 2d 73 74 61 72 | urrent-window-start.(window-star |
| 4860 | 74 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d | t))))..(defvar.swiper-font-lock- |
| 4880 | 65 78 63 6c 75 64 65 0a 20 20 27 28 4d 61 6e 2d 6d 6f 64 65 0a 20 20 20 20 61 64 6f 63 2d 6d 6f | exclude...'(Man-mode.....adoc-mo |
| 48a0 | 64 65 0a 20 20 20 20 62 62 64 62 2d 6d 6f 64 65 0a 20 20 20 20 62 6f 6e 67 6f 2d 6c 69 62 72 61 | de.....bbdb-mode.....bongo-libra |
| 48c0 | 72 79 2d 6d 6f 64 65 0a 20 20 20 20 62 6f 6e 67 6f 2d 6d 6f 64 65 0a 20 20 20 20 62 6f 6e 67 6f | ry-mode.....bongo-mode.....bongo |
| 48e0 | 2d 70 6c 61 79 6c 69 73 74 2d 6d 6f 64 65 0a 20 20 20 20 62 6f 6f 6b 6d 61 72 6b 2d 62 6d 65 6e | -playlist-mode.....bookmark-bmen |
| 4900 | 75 2d 6d 6f 64 65 0a 20 20 20 20 63 69 72 63 65 2d 63 68 61 6e 6e 65 6c 2d 6d 6f 64 65 0a 20 20 | u-mode.....circe-channel-mode... |
| 4920 | 20 20 63 69 72 63 65 2d 71 75 65 72 79 2d 6d 6f 64 65 0a 20 20 20 20 63 69 72 63 65 2d 73 65 72 | ..circe-query-mode.....circe-ser |
| 4940 | 76 65 72 2d 6d 6f 64 65 0a 20 20 20 20 64 65 61 64 67 72 65 70 2d 6d 6f 64 65 0a 20 20 20 20 64 | ver-mode.....deadgrep-mode.....d |
| 4960 | 65 62 62 75 67 73 2d 67 6e 75 2d 6d 6f 64 65 0a 20 20 20 20 64 69 72 65 64 2d 6d 6f 64 65 0a 20 | ebbugs-gnu-mode.....dired-mode.. |
| 4980 | 20 20 20 65 6c 66 65 65 64 2d 73 65 61 72 63 68 2d 6d 6f 64 65 0a 20 20 20 20 65 6c 66 65 65 64 | ...elfeed-search-mode.....elfeed |
| 49a0 | 2d 73 68 6f 77 2d 6d 6f 64 65 0a 20 20 20 20 65 6d 6d 73 2d 70 6c 61 79 6c 69 73 74 2d 6d 6f 64 | -show-mode.....emms-playlist-mod |
| 49c0 | 65 0a 20 20 20 20 65 6d 6d 73 2d 73 74 72 65 61 6d 2d 6d 6f 64 65 0a 20 20 20 20 65 72 63 2d 6d | e.....emms-stream-mode.....erc-m |
| 49e0 | 6f 64 65 0a 20 20 20 20 65 73 68 65 6c 6c 2d 6d 6f 64 65 0a 20 20 20 20 65 77 77 2d 6d 6f 64 65 | ode.....eshell-mode.....eww-mode |
| 4a00 | 0a 20 20 20 20 66 6f 72 74 68 2d 62 6c 6f 63 6b 2d 6d 6f 64 65 0a 20 20 20 20 66 6f 72 74 68 2d | .....forth-block-mode.....forth- |
| 4a20 | 6d 6f 64 65 0a 20 20 20 20 66 75 6e 64 61 6d 65 6e 74 61 6c 2d 6d 6f 64 65 0a 20 20 20 20 67 6e | mode.....fundamental-mode.....gn |
| 4a40 | 75 73 2d 61 72 74 69 63 6c 65 2d 6d 6f 64 65 0a 20 20 20 20 67 6e 75 73 2d 67 72 6f 75 70 2d 6d | us-article-mode.....gnus-group-m |
| 4a60 | 6f 64 65 0a 20 20 20 20 67 6e 75 73 2d 73 75 6d 6d 61 72 79 2d 6d 6f 64 65 0a 20 20 20 20 68 65 | ode.....gnus-summary-mode.....he |
| 4a80 | 6c 70 2d 6d 6f 64 65 0a 20 20 20 20 68 65 6c 70 66 75 6c 2d 6d 6f 64 65 0a 20 20 20 20 6a 61 62 | lp-mode.....helpful-mode.....jab |
| 4aa0 | 62 65 72 2d 63 68 61 74 2d 6d 6f 64 65 0a 20 20 20 20 6d 61 67 69 74 2d 70 6f 70 75 70 2d 6d 6f | ber-chat-mode.....magit-popup-mo |
| 4ac0 | 64 65 0a 20 20 20 20 6d 61 74 72 69 78 2d 63 6c 69 65 6e 74 2d 6d 6f 64 65 0a 20 20 20 20 6d 61 | de.....matrix-client-mode.....ma |
| 4ae0 | 74 72 69 78 2d 63 6c 69 65 6e 74 2d 72 6f 6f 6d 2d 6c 69 73 74 2d 6d 6f 64 65 0a 20 20 20 20 6d | trix-client-room-list-mode.....m |
| 4b00 | 75 34 65 2d 68 65 61 64 65 72 73 2d 6d 6f 64 65 0a 20 20 20 20 6d 75 34 65 2d 76 69 65 77 2d 6d | u4e-headers-mode.....mu4e-view-m |
| 4b20 | 6f 64 65 0a 20 20 20 20 6e 69 78 2d 6d 6f 64 65 0a 20 20 20 20 6e 6f 74 6d 75 63 68 2d 73 65 61 | ode.....nix-mode.....notmuch-sea |
| 4b40 | 72 63 68 2d 6d 6f 64 65 0a 20 20 20 20 6e 6f 74 6d 75 63 68 2d 74 72 65 65 2d 6d 6f 64 65 0a 20 | rch-mode.....notmuch-tree-mode.. |
| 4b60 | 20 20 20 6f 63 63 75 72 2d 65 64 69 74 2d 6d 6f 64 65 0a 20 20 20 20 6f 63 63 75 72 2d 6d 6f 64 | ...occur-edit-mode.....occur-mod |
| 4b80 | 65 0a 20 20 20 20 6f 72 67 2d 61 67 65 6e 64 61 2d 6d 6f 64 65 0a 20 20 20 20 70 61 63 6b 61 67 | e.....org-agenda-mode.....packag |
| 4ba0 | 65 2d 6d 65 6e 75 2d 6d 6f 64 65 0a 20 20 20 20 72 63 69 72 63 2d 6d 6f 64 65 0a 20 20 20 20 73 | e-menu-mode.....rcirc-mode.....s |
| 4bc0 | 61 75 72 6f 6e 2d 6d 6f 64 65 0a 20 20 20 20 73 69 65 76 65 2d 6d 6f 64 65 0a 20 20 20 20 74 72 | auron-mode.....sieve-mode.....tr |
| 4be0 | 65 65 6d 61 63 73 2d 6d 6f 64 65 0a 20 20 20 20 74 77 69 74 74 65 72 69 6e 67 2d 6d 6f 64 65 0a | eemacs-mode.....twittering-mode. |
| 4c00 | 20 20 20 20 76 63 2d 64 69 72 2d 6d 6f 64 65 0a 20 20 20 20 77 33 6d 2d 6d 6f 64 65 0a 20 20 20 | ....vc-dir-mode.....w3m-mode.... |
| 4c20 | 20 77 6f 6d 61 6e 2d 6d 6f 64 65 0a 20 20 20 20 78 72 65 66 2d 2d 78 72 65 66 2d 62 75 66 66 65 | .woman-mode.....xref--xref-buffe |
| 4c40 | 72 2d 6d 6f 64 65 29 0a 20 20 22 4c 69 73 74 20 6f 66 20 6d 61 6a 6f 72 2d 6d 6f 64 65 73 20 74 | r-mode)..."List.of.major-modes.t |
| 4c60 | 68 61 74 20 61 72 65 20 69 6e 63 6f 6d 70 61 74 69 62 6c 65 20 77 69 74 68 20 60 66 6f 6e 74 2d | hat.are.incompatible.with.`font- |
| 4c80 | 6c 6f 63 6b 2d 65 6e 73 75 72 65 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 66 | lock-ensure'.")..(defun.swiper-f |
| 4ca0 | 6f 6e 74 2d 6c 6f 63 6b 2d 65 6e 73 75 72 65 2d 70 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6e | ont-lock-ensure-p.()..."Return.n |
| 4cc0 | 6f 6e 2d 6e 69 6c 20 69 66 20 77 65 20 73 68 6f 75 6c 64 20 60 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 | on-nil.if.we.should.`font-lock-e |
| 4ce0 | 6e 73 75 72 65 27 2e 22 0a 20 20 28 6f 72 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 27 | nsure'."...(or.(derived-mode-p.' |
| 4d00 | 6d 61 67 69 74 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 | magit-mode).......(bound-and-tru |
| 4d20 | 65 2d 70 20 6d 61 67 69 74 2d 62 6c 61 6d 65 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 28 6d 65 6d | e-p.magit-blame-mode).......(mem |
| 4d40 | 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 73 77 69 70 65 72 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 78 | q.major-mode.swiper-font-lock-ex |
| 4d60 | 63 6c 75 64 65 29 0a 20 20 20 20 20 20 28 6e 6f 74 20 28 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d | clude).......(not.(derived-mode- |
| 4d80 | 70 20 27 70 72 6f 67 2d 6d 6f 64 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d | p.'prog-mode))))..(defun.swiper- |
| 4da0 | 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 6e 73 75 72 65 20 28 29 0a 20 20 22 45 6e 73 75 72 65 20 74 68 | font-lock-ensure.()..."Ensure.th |
| 4dc0 | 65 20 65 6e 74 69 72 65 20 62 75 66 66 65 72 20 69 73 20 68 69 67 68 6c 69 67 68 74 65 64 2e 22 | e.entire.buffer.is.highlighted." |
| 4de0 | 0a 20 20 28 75 6e 6c 65 73 73 20 28 73 77 69 70 65 72 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 6e 73 | ...(unless.(swiper-font-lock-ens |
| 4e00 | 75 72 65 2d 70 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 28 3e 20 28 62 75 66 66 65 | ure-p).....(unless.(or.(>.(buffe |
| 4e20 | 72 2d 73 69 7a 65 29 20 31 30 30 30 30 30 29 20 28 6e 75 6c 6c 20 66 6f 6e 74 2d 6c 6f 63 6b 2d | r-size).100000).(null.font-lock- |
| 4e40 | 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 66 6f 6e 74 2d | mode)).......(if.(fboundp.'font- |
| 4e60 | 6c 6f 63 6b 2d 65 6e 73 75 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 64 64 65 64 20 | lock-ensure)...........;;.Added. |
| 4e80 | 69 6e 20 45 6d 61 63 73 20 32 35 2e 31 2e 0a 20 20 20 20 20 20 20 20 20 20 28 66 6f 6e 74 2d 6c | in.Emacs.25.1............(font-l |
| 4ea0 | 6f 63 6b 2d 65 6e 73 75 72 65 29 0a 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 | ock-ensure).........(with-no-war |
| 4ec0 | 6e 69 6e 67 73 20 28 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 6f 6e 74 69 66 79 2d 62 75 66 66 65 72 29 | nings.(font-lock-fontify-buffer) |
| 4ee0 | 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 66 6f 72 6d 61 74 2d 73 70 | )))))..(defvar.swiper--format-sp |
| 4f00 | 65 63 20 22 22 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 63 61 6e 64 69 | ec.""..."Store.the.current.candi |
| 4f20 | 64 61 74 65 73 20 66 6f 72 6d 61 74 20 73 70 65 63 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 73 77 | dates.format.spec.")..(defvar.sw |
| 4f40 | 69 70 65 72 2d 2d 77 69 64 74 68 20 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 6e 75 6d | iper--width.nil..."Store.the.num |
| 4f60 | 62 65 72 20 6f 66 20 64 69 67 69 74 73 20 6e 65 65 64 65 64 20 66 6f 72 20 74 68 65 20 6c 6f 6e | ber.of.digits.needed.for.the.lon |
| 4f80 | 67 65 73 74 20 6c 69 6e 65 20 6e 75 6d 62 65 72 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 | gest.line.number.")..(defvar.swi |
| 4fa0 | 70 65 72 2d 75 73 65 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 20 6e 69 6c 0a 20 20 22 57 68 65 6e 20 | per-use-visual-line.nil..."When. |
| 4fc0 | 6e 6f 6e 2d 6e 69 6c 2c 20 75 73 65 20 60 6c 69 6e 65 2d 6d 6f 76 65 27 20 69 6e 73 74 65 61 64 | non-nil,.use.`line-move'.instead |
| 4fe0 | 20 6f 66 20 60 66 6f 72 77 61 72 64 2d 6c 69 6e 65 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 64 | .of.`forward-line'.")..(defvar.d |
| 5000 | 69 72 65 64 2d 69 73 65 61 72 63 68 2d 66 69 6c 65 6e 61 6d 65 73 29 0a 28 64 65 63 6c 61 72 65 | ired-isearch-filenames).(declare |
| 5020 | 2d 66 75 6e 63 74 69 6f 6e 20 64 69 72 65 64 2d 6d 6f 76 65 2d 74 6f 2d 66 69 6c 65 6e 61 6d 65 | -function.dired-move-to-filename |
| 5040 | 20 22 64 69 72 65 64 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 6c 69 6e 65 20 28 | ."dired")..(defun.swiper--line.( |
| 5060 | 29 0a 20 20 28 6c 65 74 2a 20 28 28 62 65 67 20 28 63 6f 6e 64 20 28 28 61 6e 64 20 28 65 71 20 | )...(let*.((beg.(cond.((and.(eq. |
| 5080 | 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 64 69 72 65 64 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 | major-mode.'dired-mode)......... |
| 50a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 75 6e 64 2d 61 6e 64 2d 74 72 75 | ..................(bound-and-tru |
| 50c0 | 65 2d 70 20 64 69 72 65 64 2d 69 73 65 61 72 63 68 2d 66 69 6c 65 6e 61 6d 65 73 29 29 0a 20 20 | e-p.dired-isearch-filenames))... |
| 50e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 69 72 65 64 2d 6d 6f 76 65 2d 74 | ...................(dired-move-t |
| 5100 | 6f 2d 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | o-filename)..................... |
| 5120 | 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 | .(point)).....................(s |
| 5140 | 77 69 70 65 72 2d 75 73 65 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 | wiper-use-visual-line........... |
| 5160 | 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 | ...........(save-excursion...... |
| 5180 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d | ..................(beginning-of- |
| 51a0 | 76 69 73 75 61 6c 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | visual-line).................... |
| 51c0 | 20 20 20 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ....(point)))................... |
| 51e0 | 20 20 28 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 | ..(t......................(point |
| 5200 | 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 65 6e 64 20 28 69 66 20 73 77 69 70 65 72 2d 75 73 | ))))..........(end.(if.swiper-us |
| 5220 | 65 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e-visual-line................... |
| 5240 | 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (save-excursion................. |
| 5260 | 20 20 20 20 28 65 6e 64 2d 6f 66 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 | ....(end-of-visual-line)........ |
| 5280 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 | .............(point))........... |
| 52a0 | 20 20 20 20 20 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 29 0a 0a 20 20 | ......(line-end-position)))).... |
| 52c0 | 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 22 20 22 0a 20 20 20 20 20 28 62 75 66 66 65 72 2d | ..(concat......"."......(buffer- |
| 52e0 | 73 75 62 73 74 72 69 6e 67 20 62 65 67 20 65 6e 64 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 | substring.beg.end))))..(defvar.s |
| 5300 | 77 69 70 65 72 2d 75 73 65 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 2d 70 0a 20 20 28 6c 61 6d 62 64 | wiper-use-visual-line-p...(lambd |
| 5320 | 61 20 28 6e 2d 6c 69 6e 65 73 29 0a 20 20 20 20 28 61 6e 64 20 76 69 73 75 61 6c 2d 6c 69 6e 65 | a.(n-lines).....(and.visual-line |
| 5340 | 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 73 75 70 65 72 2d 73 6c 6f 77 20 6f 74 68 | -mode..........;;.super-slow.oth |
| 5360 | 65 72 77 69 73 65 0a 20 20 20 20 20 20 20 20 20 28 3c 20 28 62 75 66 66 65 72 2d 73 69 7a 65 29 | erwise..........(<.(buffer-size) |
| 5380 | 20 32 30 30 30 30 29 0a 20 20 20 20 20 20 20 20 20 28 3c 20 6e 2d 6c 69 6e 65 73 20 34 30 30 29 | .20000)..........(<.n-lines.400) |
| 53a0 | 29 29 0a 20 20 22 41 20 70 72 65 64 69 63 61 74 65 20 74 68 61 74 20 64 65 63 69 64 65 73 20 77 | ))..."A.predicate.that.decides.w |
| 53c0 | 68 65 74 68 65 72 20 60 6c 69 6e 65 2d 6d 6f 76 65 27 20 6f 72 20 60 66 6f 72 77 61 72 64 2d 6c | hether.`line-move'.or.`forward-l |
| 53e0 | 69 6e 65 27 20 69 73 20 75 73 65 64 2e 0a 4e 6f 74 65 20 74 68 61 74 20 60 6c 69 6e 65 2d 6d 6f | ine'.is.used..Note.that.`line-mo |
| 5400 | 76 65 27 20 63 61 6e 20 62 65 20 76 65 72 79 20 73 6c 6f 77 2e 22 29 0a 0a 28 64 65 66 75 6e 20 | ve'.can.be.very.slow.")..(defun. |
| 5420 | 73 77 69 70 65 72 2d 2d 63 61 6e 64 69 64 61 74 65 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6e 75 | swiper--candidates.(&optional.nu |
| 5440 | 6d 62 65 72 73 2d 77 69 64 74 68 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 | mbers-width)..."Return.a.list.of |
| 5460 | 20 74 68 69 73 20 62 75 66 66 65 72 20 6c 69 6e 65 73 2e 0a 0a 4e 55 4d 42 45 52 53 2d 57 49 44 | .this.buffer.lines...NUMBERS-WID |
| 5480 | 54 48 2c 20 77 68 65 6e 20 73 70 65 63 69 66 69 65 64 2c 20 69 73 20 75 73 65 64 20 66 6f 72 20 | TH,.when.specified,.is.used.for. |
| 54a0 | 77 69 64 74 68 20 73 70 65 63 20 6f 66 20 6c 69 6e 65 0a 6e 75 6d 62 65 72 73 3b 20 72 65 70 6c | width.spec.of.line.numbers;.repl |
| 54c0 | 61 63 65 73 20 63 61 6c 63 75 6c 61 74 69 6e 67 20 74 68 65 20 77 69 64 74 68 20 66 72 6f 6d 20 | aces.calculating.the.width.from. |
| 54e0 | 62 75 66 66 65 72 20 6c 69 6e 65 20 63 6f 75 6e 74 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 69 6e | buffer.line.count."...(let*.((in |
| 5500 | 68 69 62 69 74 2d 66 69 65 6c 64 2d 74 65 78 74 2d 6d 6f 74 69 6f 6e 20 74 29 0a 20 20 20 20 20 | hibit-field-text-motion.t)...... |
| 5520 | 20 20 20 20 28 6e 2d 6c 69 6e 65 73 20 28 63 6f 75 6e 74 2d 6c 69 6e 65 73 20 28 70 6f 69 6e 74 | ....(n-lines.(count-lines.(point |
| 5540 | 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 66 75 | -min).(point-max)))).....(if.(fu |
| 5560 | 6e 63 61 6c 6c 20 73 77 69 70 65 72 2d 75 73 65 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 2d 70 20 6e | ncall.swiper-use-visual-line-p.n |
| 5580 | 2d 6c 69 6e 65 73 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 | -lines).........(progn.......... |
| 55a0 | 20 28 77 68 65 6e 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 6f 72 67 2d 6d 6f 64 65 29 | .(when.(eq.major-mode.'org-mode) |
| 55c0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 71 75 69 72 65 20 27 6f 75 74 6c 69 6e 65 29 0a | .............(require.'outline). |
| 55e0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 66 62 6f 75 6e 64 70 20 27 6f 75 74 6c 69 6e | ............(if.(fboundp.'outlin |
| 5600 | 65 2d 73 68 6f 77 2d 61 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 | e-show-all).................;;.A |
| 5620 | 64 64 65 64 20 69 6e 20 45 6d 61 63 73 20 32 35 2e 31 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 | dded.in.Emacs.25.1.............. |
| 5640 | 20 20 20 20 28 6f 75 74 6c 69 6e 65 2d 73 68 6f 77 2d 61 6c 6c 29 0a 20 20 20 20 20 20 20 20 20 | ....(outline-show-all).......... |
| 5660 | 20 20 20 20 20 28 77 69 74 68 2d 6e 6f 2d 77 61 72 6e 69 6e 67 73 0a 20 20 20 20 20 20 20 20 20 | .....(with-no-warnings.......... |
| 5680 | 20 20 20 20 20 20 20 28 73 68 6f 77 2d 61 6c 6c 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 | .......(show-all))))...........( |
| 56a0 | 73 65 74 71 20 73 77 69 70 65 72 2d 75 73 65 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 20 74 29 29 0a | setq.swiper-use-visual-line.t)). |
| 56c0 | 20 20 20 20 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 75 73 65 2d 76 69 73 75 61 6c 2d 6c 69 | ......(setq.swiper-use-visual-li |
| 56e0 | 6e 65 20 6e 69 6c 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 7a 65 72 6f 70 20 6e 2d 6c 69 | ne.nil)).....(unless.(zerop.n-li |
| 5700 | 6e 65 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 77 69 64 74 68 20 28 | nes).......(setq.swiper--width.( |
| 5720 | 6f 72 20 6e 75 6d 62 65 72 73 2d 77 69 64 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | or.numbers-width................ |
| 5740 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2b 20 28 66 6c 6f 6f 72 20 28 6c 6f 67 20 6e | ...............(1+.(floor.(log.n |
| 5760 | 2d 6c 69 6e 65 73 20 31 30 29 29 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 77 69 70 65 | -lines.10))))).......(setq.swipe |
| 5780 | 72 2d 2d 66 6f 72 6d 61 74 2d 73 70 65 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d | r--format-spec.............(form |
| 57a0 | 61 74 20 22 25 25 2d 25 64 64 20 22 20 73 77 69 70 65 72 2d 2d 77 69 64 74 68 29 29 0a 20 20 20 | at."%%-%dd.".swiper--width)).... |
| 57c0 | 20 20 20 28 6c 65 74 20 28 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 20 31 29 0a 20 20 20 20 20 20 20 | ...(let.((line-number.1)........ |
| 57e0 | 20 20 20 20 20 28 61 64 76 61 6e 63 65 72 20 28 69 66 20 73 77 69 70 65 72 2d 75 73 65 2d 76 69 | .....(advancer.(if.swiper-use-vi |
| 5800 | 73 75 61 6c 2d 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | sual-line....................... |
| 5820 | 20 20 20 20 28 6c 61 6d 62 64 61 20 28 61 72 67 29 20 28 6c 69 6e 65 2d 6d 6f 76 65 20 61 72 67 | ....(lambda.(arg).(line-move.arg |
| 5840 | 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 23 27 66 | .t)).........................#'f |
| 5860 | 6f 72 77 61 72 64 2d 6c 69 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 69 64 | orward-line)).............candid |
| 5880 | 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 | ates).........(save-excursion... |
| 58a0 | 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a | ........(goto-char.(point-min)). |
| 58c0 | 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 6e 73 75 | ..........(swiper-font-lock-ensu |
| 58e0 | 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 3c 20 28 70 6f 69 6e 74 29 20 | re)...........(while.(<.(point). |
| 5900 | 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 | (point-max)).............(when.( |
| 5920 | 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 75 73 61 62 6c 65 2d 70 29 0a 20 20 20 20 20 20 20 20 20 | swiper-match-usable-p).......... |
| 5940 | 20 20 20 20 20 28 6c 65 74 20 28 28 73 74 72 20 28 73 77 69 70 65 72 2d 2d 6c 69 6e 65 29 29 29 | .....(let.((str.(swiper--line))) |
| 5960 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 72 20 28 69 76 79 2d | .................(setq.str.(ivy- |
| 5980 | 63 6c 65 61 6e 75 70 2d 73 74 72 69 6e 67 20 73 74 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | cleanup-string.str))............ |
| 59a0 | 20 20 20 20 20 28 6c 65 74 20 28 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 73 74 72 0a 20 20 20 20 | .....(let.((line-number-str..... |
| 59c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 73 77 69 70 65 | ...................(format.swipe |
| 59e0 | 72 2d 2d 66 6f 72 6d 61 74 2d 73 70 65 63 20 6c 69 6e 65 2d 6e 75 6d 62 65 72 29 29 29 0a 20 20 | r--format-spec.line-number)))... |
| 5a00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 77 69 70 65 72 2d 69 6e 63 6c 75 | ................(if.swiper-inclu |
| 5a20 | 64 65 2d 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 69 6e 2d 73 65 61 72 63 68 0a 20 20 20 20 20 20 20 | de-line-number-in-search........ |
| 5a40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 72 20 28 63 6f 6e 63 61 74 | ...............(setq.str.(concat |
| 5a60 | 20 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 73 74 72 20 73 74 72 29 29 0a 20 20 20 20 20 20 20 20 20 | .line-number-str.str)).......... |
| 5a80 | 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 0a 20 20 | ...........(put-text-property... |
| 5aa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 31 20 27 64 69 73 70 6c 61 79 20 | ...................0.1.'display. |
| 5ac0 | 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 73 74 72 20 73 74 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 | line-number-str.str))........... |
| 5ae0 | 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 0a 20 20 20 20 20 | ........(put-text-property...... |
| 5b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 31 20 27 73 77 69 70 65 72 2d 6c 69 6e 65 2d 6e | ..............0.1.'swiper-line-n |
| 5b20 | 75 6d 62 65 72 20 6c 69 6e 65 2d 6e 75 6d 62 65 72 20 73 74 72 29 29 0a 20 20 20 20 20 20 20 20 | umber.line-number.str))......... |
| 5b40 | 20 20 20 20 20 20 20 20 28 70 75 73 68 20 73 74 72 20 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a | ........(push.str.candidates))). |
| 5b60 | 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 61 64 76 61 6e 63 65 72 20 31 29 | ............(funcall.advancer.1) |
| 5b80 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 6c 69 6e 65 2d 6e 75 6d 62 65 | .............(cl-incf.line-numbe |
| 5ba0 | 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 63 61 6e 64 69 64 61 74 | r))...........(nreverse.candidat |
| 5bc0 | 65 73 29 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 | es))))))..(defvar.swiper--opoint |
| 5be0 | 20 6e 69 6c 0a 20 20 22 56 61 6c 75 65 20 6f 66 20 70 6f 69 6e 74 20 77 68 65 6e 20 60 73 77 69 | .nil..."Value.of.point.when.`swi |
| 5c00 | 70 65 72 27 20 6f 72 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 20 73 74 61 72 74 73 2e | per'.or.`swiper-isearch'.starts. |
| 5c20 | 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 | ")..;;;###autoload.(defun.swiper |
| 5c40 | 2d 62 61 63 6b 77 61 72 64 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 | -backward.(&optional.initial-inp |
| 5c60 | 75 74 29 0a 20 20 22 60 69 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 27 20 77 69 74 68 20 61 | ut)..."`isearch-backward'.with.a |
| 5c80 | 6e 20 6f 76 65 72 76 69 65 77 2e 0a 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 49 4e 49 54 49 41 | n.overview..When.non-nil,.INITIA |
| 5ca0 | 4c 2d 49 4e 50 55 54 20 69 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 73 65 61 72 63 68 20 70 61 | L-INPUT.is.the.initial.search.pa |
| 5cc0 | 74 74 65 72 6e 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 | ttern."...(interactive)...(let.( |
| 5ce0 | 28 69 76 79 2d 69 6e 64 65 78 2d 66 75 6e 63 74 69 6f 6e 73 2d 61 6c 69 73 74 0a 20 20 20 20 20 | (ivy-index-functions-alist...... |
| 5d00 | 20 20 20 20 27 28 28 73 77 69 70 65 72 20 2e 20 69 76 79 2d 72 65 63 6f 6d 70 75 74 65 2d 69 6e | ....'((swiper...ivy-recompute-in |
| 5d20 | 64 65 78 2d 73 77 69 70 65 72 2d 62 61 63 6b 77 61 72 64 29 29 29 29 0a 20 20 20 20 28 73 77 69 | dex-swiper-backward)))).....(swi |
| 5d40 | 70 65 72 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f | per.initial-input)))..;;;###auto |
| 5d60 | 6c 6f 61 64 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e | load.(defun.swiper-thing-at-poin |
| 5d80 | 74 20 28 29 0a 20 20 22 60 73 77 69 70 65 72 27 20 77 69 74 68 20 60 69 76 79 2d 74 68 69 6e 67 | t.()..."`swiper'.with.`ivy-thing |
| 5da0 | 2d 61 74 2d 70 6f 69 6e 74 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 | -at-point'."...(interactive)...( |
| 5dc0 | 6c 65 74 20 28 28 74 68 69 6e 67 20 28 69 76 79 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 29 | let.((thing.(ivy-thing-at-point) |
| 5de0 | 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 75 73 65 2d 72 65 67 69 6f 6e 2d 70 29 0a 20 20 20 20 | )).....(when.(use-region-p)..... |
| 5e00 | 20 20 28 64 65 61 63 74 69 76 61 74 65 2d 6d 61 72 6b 29 29 0a 20 20 20 20 28 73 77 69 70 65 72 | ..(deactivate-mark)).....(swiper |
| 5e20 | 20 28 72 65 67 65 78 70 2d 71 75 6f 74 65 20 74 68 69 6e 67 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 | .(regexp-quote.thing))))..;;;### |
| 5e40 | 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 61 6c 6c 2d 74 68 69 6e 67 | autoload.(defun.swiper-all-thing |
| 5e60 | 2d 61 74 2d 70 6f 69 6e 74 20 28 29 0a 20 20 22 60 73 77 69 70 65 72 2d 61 6c 6c 27 20 77 69 74 | -at-point.()..."`swiper-all'.wit |
| 5e80 | 68 20 60 69 76 79 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 27 2e 22 0a 20 20 28 69 6e 74 65 | h.`ivy-thing-at-point'."...(inte |
| 5ea0 | 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 74 68 69 6e 67 20 28 69 76 79 2d 74 68 69 | ractive)...(let.((thing.(ivy-thi |
| 5ec0 | 6e 67 2d 61 74 2d 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 75 73 65 2d 72 65 | ng-at-point))).....(when.(use-re |
| 5ee0 | 67 69 6f 6e 2d 70 29 0a 20 20 20 20 20 20 28 64 65 61 63 74 69 76 61 74 65 2d 6d 61 72 6b 29 29 | gion-p).......(deactivate-mark)) |
| 5f00 | 0a 20 20 20 20 28 73 77 69 70 65 72 2d 61 6c 6c 20 28 72 65 67 65 78 70 2d 71 75 6f 74 65 20 74 | .....(swiper-all.(regexp-quote.t |
| 5f20 | 68 69 6e 67 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 65 78 74 72 61 63 74 | hing))))..(defun.swiper--extract |
| 5f40 | 2d 6d 61 74 63 68 65 73 20 28 72 65 67 65 78 20 63 61 6e 64 73 29 0a 20 20 22 45 78 74 72 61 63 | -matches.(regex.cands)..."Extrac |
| 5f60 | 74 20 63 61 70 74 75 72 65 64 20 52 45 47 45 58 20 67 72 6f 75 70 73 20 66 72 6f 6d 20 43 41 4e | t.captured.REGEX.groups.from.CAN |
| 5f80 | 44 53 2e 22 0a 20 20 28 6c 65 74 20 28 72 65 73 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 63 | DS."...(let.(res).....(dolist.(c |
| 5fa0 | 61 6e 64 20 63 61 6e 64 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 20 28 73 75 62 | and.cands).......(setq.cand.(sub |
| 5fc0 | 73 74 72 69 6e 67 20 63 61 6e 64 20 31 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 | string.cand.1)).......(when.(str |
| 5fe0 | 69 6e 67 2d 6d 61 74 63 68 20 72 65 67 65 78 20 63 61 6e 64 29 0a 20 20 20 20 20 20 20 20 28 70 | ing-match.regex.cand).........(p |
| 6000 | 75 73 68 20 28 6d 61 70 63 6f 6e 63 61 74 20 28 6c 61 6d 62 64 61 20 28 6e 29 20 28 6d 61 74 63 | ush.(mapconcat.(lambda.(n).(matc |
| 6020 | 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6e 20 63 61 6e 64 29 29 0a | h-string-no-properties.n.cand)). |
| 6040 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 62 65 72 | .........................(number |
| 6060 | 2d 73 65 71 75 65 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -sequence....................... |
| 6080 | 20 20 20 20 31 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ....1........................... |
| 60a0 | 28 2f 20 28 2d 20 28 6c 65 6e 67 74 68 20 28 6d 61 74 63 68 2d 64 61 74 61 29 29 20 32 29 20 32 | (/.(-.(length.(match-data)).2).2 |
| 60c0 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 22 29 | ))..........................".") |
| 60e0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 73 29 29 29 0a 20 20 20 20 28 6e 72 65 76 65 | ...............res))).....(nreve |
| 6100 | 72 73 65 20 72 65 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 6f 63 63 75 72 | rse.res)))..(defun.swiper--occur |
| 6120 | 2d 63 61 6e 64 73 20 28 66 6e 61 6d 65 20 63 61 6e 64 73 29 0a 20 20 28 77 68 65 6e 20 63 61 6e | -cands.(fname.cands)...(when.can |
| 6140 | 64 73 0a 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 28 69 76 79 | ds.....(with-current-buffer.(ivy |
| 6160 | 2d 73 74 61 74 65 2d 62 75 66 66 65 72 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 20 28 77 | -state-buffer.ivy-last).......(w |
| 6180 | 68 65 6e 20 28 65 71 20 28 69 76 79 2d 73 74 61 74 65 2d 63 61 6c 6c 65 72 20 69 76 79 2d 6c 61 | hen.(eq.(ivy-state-caller.ivy-la |
| 61a0 | 73 74 29 20 27 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 29 0a 20 20 20 20 20 20 20 20 28 73 65 | st).'swiper-isearch).........(se |
| 61c0 | 74 71 20 63 61 6e 64 73 20 28 6d 61 70 63 61 72 20 23 27 73 77 69 70 65 72 2d 2d 6c 69 6e 65 2d | tq.cands.(mapcar.#'swiper--line- |
| 61e0 | 61 74 2d 70 6f 69 6e 74 20 63 61 6e 64 73 29 29 29 0a 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 | at-point.cands))).......(let*.(( |
| 6200 | 70 74 2d 6d 69 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | pt-min.(point-min))............. |
| 6220 | 20 28 6c 69 6e 65 2d 64 65 6c 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 | .(line-delta...............(save |
| 6240 | 2d 72 65 73 74 72 69 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 | -restriction.................(wi |
| 6260 | 64 65 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2d 20 28 6c 69 6e 65 2d 6e | den).................(1-.(line-n |
| 6280 | 75 6d 62 65 72 2d 61 74 2d 70 6f 73 20 70 74 2d 6d 69 6e 29 29 29 29 0a 20 20 20 20 20 20 20 20 | umber-at-pos.pt-min))))......... |
| 62a0 | 20 20 20 20 20 28 6c 69 6e 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 | .....(lines...............(if.(e |
| 62c0 | 71 20 28 69 76 79 2d 73 74 61 74 65 2d 63 61 6c 6c 65 72 20 69 76 79 2d 6c 61 73 74 29 20 27 73 | q.(ivy-state-caller.ivy-last).'s |
| 62e0 | 77 69 70 65 72 2d 69 73 65 61 72 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | wiper-isearch).................. |
| 6300 | 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 6f 63 63 75 72 2d 63 61 6e 64 73 20 63 61 | .(swiper--isearch-occur-cands.ca |
| 6320 | 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 | nds).................(mapcar.(la |
| 6340 | 6d 62 64 61 20 28 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mbda.(s)........................ |
| 6360 | 20 20 20 28 6c 65 74 20 28 28 6e 20 28 73 77 69 70 65 72 2d 2d 6c 69 6e 65 2d 6e 75 6d 62 65 72 | ...(let.((n.(swiper--line-number |
| 6380 | 20 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .s)))........................... |
| 63a0 | 20 20 28 73 65 74 71 20 73 20 28 73 75 62 73 74 72 69 6e 67 20 73 20 31 29 29 0a 20 20 20 20 20 | ..(setq.s.(substring.s.1))...... |
| 63c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 64 64 2d 74 65 78 74 | .......................(add-text |
| 63e0 | 2d 70 72 6f 70 65 72 74 69 65 73 20 30 20 31 20 28 6c 69 73 74 20 27 73 77 69 70 65 72 2d 6c 69 | -properties.0.1.(list.'swiper-li |
| 6400 | 6e 65 2d 6e 75 6d 62 65 72 20 6e 29 20 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ne-number.n).s)................. |
| 6420 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 6e 20 73 29 29 29 0a 20 20 20 20 20 20 20 | ............(cons.n.s)))........ |
| 6440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 73 29 29 29 0a 20 20 20 20 20 20 | .................cands)))....... |
| 6460 | 20 20 20 20 20 20 20 28 6f 66 66 73 65 74 20 28 2b 20 28 6c 65 6e 67 74 68 20 66 6e 61 6d 65 29 | .......(offset.(+.(length.fname) |
| 6480 | 20 32 29 29 29 0a 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 78 | .2))).........(mapcar.(lambda.(x |
| 64a0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6e 6e 20 28 6e | )...................(let.((nn.(n |
| 64c0 | 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | umber-to-string................. |
| 64e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2b 20 28 63 61 72 20 78 29 20 6c 69 6e 65 2d 64 65 6c | .............(+.(car.x).line-del |
| 6500 | 74 61 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 6d 6f | ta)))).....................(remo |
| 6520 | 76 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 30 20 31 20 27 28 64 69 73 70 6c 61 79 | ve-text-properties.0.1.'(display |
| 6540 | 29 20 28 63 64 72 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ).(cdr.x)).....................( |
| 6560 | 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 28 6c 65 6e 67 74 68 20 6e 6e 29 20 | put-text-property.0.(length.nn). |
| 6580 | 27 66 61 63 65 20 27 69 76 79 2d 67 72 65 70 2d 6c 69 6e 65 2d 6e 75 6d 62 65 72 20 6e 6e 29 0a | 'face.'ivy-grep-line-number.nn). |
| 65a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 | ....................(put-text-pr |
| 65c0 | 6f 70 65 72 74 79 20 30 20 31 20 27 6f 66 66 73 65 74 20 28 2b 20 6f 66 66 73 65 74 20 28 6c 65 | operty.0.1.'offset.(+.offset.(le |
| 65e0 | 6e 67 74 68 20 6e 6e 29 29 20 66 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ngth.nn)).fname)................ |
| 6600 | 20 20 20 20 20 28 66 6f 72 6d 61 74 20 22 25 73 3a 25 73 3a 25 73 22 20 66 6e 61 6d 65 20 6e 6e | .....(format."%s:%s:%s".fname.nn |
| 6620 | 20 28 63 64 72 20 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 69 6e 65 | .(cdr.x)))).................line |
| 6640 | 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 6f | s)))))..(defun.swiper--isearch-o |
| 6660 | 63 63 75 72 2d 63 61 6e 64 73 20 28 63 61 6e 64 73 29 0a 20 20 28 6c 65 74 2a 20 28 28 6c 61 73 | ccur-cands.(cands)...(let*.((las |
| 6680 | 74 2d 70 74 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 70 6f 69 6e 74 | t-pt.(get-text-property.0.'point |
| 66a0 | 20 28 63 61 72 20 63 61 6e 64 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 20 28 31 | .(car.cands)))..........(line.(1 |
| 66c0 | 2b 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 20 6c 61 73 74 2d 70 74 29 29 29 | +.(line-number-at-pos.last-pt))) |
| 66e0 | 0a 20 20 20 20 20 20 20 20 20 72 65 73 20 70 74 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 63 | ..........res.pt).....(dolist.(c |
| 6700 | 61 6e 64 20 63 61 6e 64 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 70 74 20 28 67 65 74 2d 74 | and.cands).......(setq.pt.(get-t |
| 6720 | 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 70 6f 69 6e 74 20 63 61 6e 64 29 29 0a 20 20 20 | ext-property.0.'point.cand)).... |
| 6740 | 20 20 20 28 63 6c 2d 69 6e 63 66 20 6c 69 6e 65 20 28 31 2d 20 28 63 6f 75 6e 74 2d 6c 69 6e 65 | ...(cl-incf.line.(1-.(count-line |
| 6760 | 73 20 6c 61 73 74 2d 70 74 20 70 74 29 29 29 0a 20 20 20 20 20 20 28 70 75 73 68 20 28 63 6f 6e | s.last-pt.pt))).......(push.(con |
| 6780 | 73 20 6c 69 6e 65 20 63 61 6e 64 29 20 72 65 73 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 6c 61 | s.line.cand).res).......(setq.la |
| 67a0 | 73 74 2d 70 74 20 70 74 29 29 0a 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 72 65 73 29 29 29 0a | st-pt.pt)).....(nreverse.res))). |
| 67c0 | 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 6f 63 63 75 72 2d 69 6e 73 65 72 74 2d 6c 69 6e | .(defun.swiper--occur-insert-lin |
| 67e0 | 65 73 20 28 63 61 6e 64 73 29 0a 20 20 28 6c 65 74 20 28 28 69 6e 68 69 62 69 74 2d 72 65 61 64 | es.(cands)...(let.((inhibit-read |
| 6800 | 2d 6f 6e 6c 79 20 74 29 29 0a 20 20 20 20 3b 3b 20 4e 65 65 64 20 70 72 65 63 69 73 65 20 6e 75 | -only.t)).....;;.Need.precise.nu |
| 6820 | 6d 62 65 72 20 6f 66 20 68 65 61 64 65 72 20 6c 69 6e 65 73 20 66 6f 72 20 60 77 67 72 65 70 27 | mber.of.header.lines.for.`wgrep' |
| 6840 | 20 74 6f 20 77 6f 72 6b 2e 0a 20 20 20 20 28 69 6e 73 65 72 74 20 28 66 6f 72 6d 61 74 20 22 2d | .to.work......(insert.(format."- |
| 6860 | 2a 2d 20 6d 6f 64 65 3a 67 72 65 70 3b 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 3a | *-.mode:grep;.default-directory: |
| 6880 | 20 25 53 20 2d 2a 2d 5c 6e 5c 6e 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .%S.-*-\n\n\n".................. |
| 68a0 | 20 20 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 20 20 20 20 28 69 6e 73 65 | ...default-directory)).....(inse |
| 68c0 | 72 74 20 28 66 6f 72 6d 61 74 20 22 25 64 20 63 61 6e 64 69 64 61 74 65 73 3a 5c 6e 22 20 28 6c | rt.(format."%d.candidates:\n".(l |
| 68e0 | 65 6e 67 74 68 20 63 61 6e 64 73 29 29 29 0a 20 20 20 20 28 69 76 79 2d 2d 6f 63 63 75 72 2d 69 | ength.cands))).....(ivy--occur-i |
| 6900 | 6e 73 65 72 74 2d 6c 69 6e 65 73 20 63 61 6e 64 73 29 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 | nsert-lines.cands).....(goto-cha |
| 6920 | 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 | r.(point-min)).....(forward-line |
| 6940 | 20 34 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 6f 63 63 75 72 2d 62 75 66 66 | .4)))..(defun.swiper--occur-buff |
| 6960 | 65 72 20 28 29 0a 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 69 76 79 2d 73 74 61 74 65 | er.()...(let.((buffer.(ivy-state |
| 6980 | 2d 62 75 66 66 65 72 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 | -buffer.ivy-last))).....(unless. |
| 69a0 | 28 62 75 66 66 65 72 2d 6c 69 76 65 2d 70 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 28 73 65 | (buffer-live-p.buffer).......(se |
| 69c0 | 74 71 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 69 76 79 | tq.buffer.............(setf.(ivy |
| 69e0 | 2d 73 74 61 74 65 2d 62 75 66 66 65 72 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 20 20 20 | -state-buffer.ivy-last)......... |
| 6a00 | 20 20 20 20 20 20 20 20 20 20 28 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 6c 65 63 74 0a 20 20 | ..........(find-file-noselect... |
| 6a20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 2d 67 65 74 20 28 69 76 79 | .................(plist-get.(ivy |
| 6a40 | 2d 73 74 61 74 65 2d 65 78 74 72 61 2d 70 72 6f 70 73 20 69 76 79 2d 6c 61 73 74 29 20 3a 66 6e | -state-extra-props.ivy-last).:fn |
| 6a60 | 61 6d 65 29 29 29 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e | ame)))).......(save-selected-win |
| 6a80 | 64 6f 77 0a 20 20 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 65 | dow.........(pop-to-buffer.buffe |
| 6aa0 | 72 29 29 0a 20 20 20 20 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d 77 69 6e 64 6f | r)).......(setf.(ivy-state-windo |
| 6ac0 | 77 20 69 76 79 2d 6c 61 73 74 29 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 29 29 0a | w.ivy-last).(selected-window))). |
| 6ae0 | 20 20 20 20 62 75 66 66 65 72 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 6f 63 63 75 | ....buffer))..(defun.swiper-occu |
| 6b00 | 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 63 61 6e 64 73 29 0a 20 20 22 47 65 6e 65 72 61 74 65 20 | r.(&optional.cands)..."Generate. |
| 6b20 | 61 20 63 75 73 74 6f 6d 20 6f 63 63 75 72 20 62 75 66 66 65 72 20 66 6f 72 20 60 73 77 69 70 65 | a.custom.occur.buffer.for.`swipe |
| 6b40 | 72 27 2e 0a 57 68 65 6e 20 63 61 70 74 75 72 65 20 67 72 6f 75 70 73 20 61 72 65 20 70 72 65 73 | r'..When.capture.groups.are.pres |
| 6b60 | 65 6e 74 20 69 6e 20 74 68 65 20 69 6e 70 75 74 2c 20 70 72 69 6e 74 20 74 68 65 6d 20 69 6e 73 | ent.in.the.input,.print.them.ins |
| 6b80 | 74 65 61 64 20 6f 66 20 6c 69 6e 65 73 2e 22 0a 20 20 28 73 65 74 71 20 63 61 6e 64 73 20 28 6f | tead.of.lines."...(setq.cands.(o |
| 6ba0 | 72 20 69 76 79 2d 6d 61 72 6b 65 64 2d 63 61 6e 64 69 64 61 74 65 73 20 63 61 6e 64 73 29 29 0a | r.ivy-marked-candidates.cands)). |
| 6bc0 | 20 20 28 6c 65 74 2a 20 28 28 62 75 66 66 65 72 20 28 73 77 69 70 65 72 2d 2d 6f 63 63 75 72 2d | ..(let*.((buffer.(swiper--occur- |
| 6be0 | 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 6e 61 6d 65 20 28 70 72 6f 70 65 72 | buffer))..........(fname.(proper |
| 6c00 | 74 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d | tize..................(with-ivy- |
| 6c20 | 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 62 | window....................(if.(b |
| 6c40 | 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 | uffer-file-name.buffer)......... |
| 6c60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 | ...............(file-name-nondir |
| 6c80 | 65 63 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ectory.........................( |
| 6ca0 | 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 | buffer-file-name.buffer))....... |
| 6cc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 20 62 75 66 66 | ...............(buffer-name.buff |
| 6ce0 | 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 66 61 63 65 0a 20 20 20 | er)))..................'face.... |
| 6d00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 69 76 79 2d 67 72 65 70 2d 69 6e 66 6f 29 29 0a 20 | ..............'ivy-grep-info)).. |
| 6d20 | 20 20 20 20 20 20 20 20 28 72 65 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 | ........(re...........(progn.... |
| 6d40 | 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 22 5c 5c 28 2e 2a 5c | .........(string-match."\"\\(.*\ |
| 6d60 | 5c 29 5c 22 22 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | \)\"".(buffer-name))............ |
| 6d80 | 20 28 69 76 79 2d 73 65 74 2d 74 65 78 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 28 | .(ivy-set-text.(match-string.1.( |
| 6da0 | 62 75 66 66 65 72 2d 6e 61 6d 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 | buffer-name))).............(mapc |
| 6dc0 | 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 20 28 69 76 79 2d 2d 73 70 6c 69 74 20 69 76 79 | oncat.#'identity.(ivy--split.ivy |
| 6de0 | 2d 74 65 78 74 29 20 22 2e 2a 3f 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 61 6e 64 73 0a | -text).".*?")))..........(cands. |
| 6e00 | 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 6f 63 63 75 72 2d 63 61 6e 64 73 0a 20 | ..........(swiper--occur-cands.. |
| 6e20 | 20 20 20 20 20 20 20 20 20 20 66 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 20 63 | ..........fname............(or.c |
| 6e40 | 61 6e 64 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 77 69 6e 64 6f 77 | ands................(save-window |
| 6e60 | 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 | -excursion..................(swi |
| 6e80 | 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 | tch-to-buffer.buffer)........... |
| 6ea0 | 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 28 69 76 79 2d 73 74 61 74 65 2d 63 61 6c 6c 65 72 | .......(if.(eq.(ivy-state-caller |
| 6ec0 | 20 69 76 79 2d 6c 61 73 74 29 20 27 73 77 69 70 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .ivy-last).'swiper)............. |
| 6ee0 | 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 69 76 79 2d 2d 72 65 67 65 78 2d 66 75 6e 63 74 | .........(let.((ivy--regex-funct |
| 6f00 | 69 6f 6e 20 27 73 77 69 70 65 72 2d 2d 72 65 2d 62 75 69 6c 64 65 72 29 29 0a 20 20 20 20 20 20 | ion.'swiper--re-builder))....... |
| 6f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d | .................(setq.ivy--old- |
| 6f40 | 72 65 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | re.nil)........................( |
| 6f60 | 69 76 79 2d 2d 66 69 6c 74 65 72 20 72 65 20 28 73 77 69 70 65 72 2d 2d 63 61 6e 64 69 64 61 74 | ivy--filter.re.(swiper--candidat |
| 6f80 | 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 | es)))....................(swiper |
| 6fa0 | 2d 69 73 65 61 72 63 68 2d 66 75 6e 63 74 69 6f 6e 20 69 76 79 2d 74 65 78 74 29 29 29 29 29 29 | -isearch-function.ivy-text)))))) |
| 6fc0 | 29 0a 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 5c 5c 28 | ).....(if.(string-match-p."\\\\( |
| 6fe0 | 22 20 72 65 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 0a 20 20 20 20 20 20 20 20 20 28 | ".re).........(insert..........( |
| 7000 | 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 65 6e 74 69 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 | mapconcat.#'identity............ |
| 7020 | 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 65 78 74 72 61 63 74 2d 6d 61 74 63 68 65 | .........(swiper--extract-matche |
| 7040 | 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 20 28 77 69 74 68 2d | s......................re.(with- |
| 7060 | 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 | current-buffer.buffer........... |
| 7080 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 63 61 6e 64 69 64 61 | ................(swiper--candida |
| 70a0 | 74 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 5c 6e 22 29 | tes)))....................."\n") |
| 70c0 | 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 | ).......(unless.(eq.major-mode.' |
| 70e0 | 69 76 79 2d 6f 63 63 75 72 2d 67 72 65 70 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 28 69 76 | ivy-occur-grep-mode).........(iv |
| 7100 | 79 2d 6f 63 63 75 72 2d 67 72 65 70 2d 6d 6f 64 65 29 0a 20 20 20 20 20 20 20 20 28 66 6f 6e 74 | y-occur-grep-mode).........(font |
| 7120 | 2d 6c 6f 63 6b 2d 6d 6f 64 65 20 2d 31 29 29 0a 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 6f | -lock-mode.-1)).......(swiper--o |
| 7140 | 63 63 75 72 2d 69 6e 73 65 72 74 2d 6c 69 6e 65 73 0a 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 | ccur-insert-lines........(mapcar |
| 7160 | 20 28 6c 61 6d 62 64 61 20 28 63 61 6e 64 29 20 28 63 6f 6e 63 61 74 20 22 2e 2f 22 20 63 61 6e | .(lambda.(cand).(concat."./".can |
| 7180 | 64 29 29 20 63 61 6e 64 73 29 29 29 29 29 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f | d)).cands)))))..(declare-functio |
| 71a0 | 6e 20 65 76 69 6c 2d 73 65 74 2d 6a 75 6d 70 20 22 65 78 74 3a 65 76 69 6c 2d 6a 75 6d 70 73 22 | n.evil-set-jump."ext:evil-jumps" |
| 71c0 | 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 6c 69 6e 65 20 | )..(defvar.swiper--current-line. |
| 71e0 | 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 6d 61 74 | nil).(defvar.swiper--current-mat |
| 7200 | 63 68 2d 73 74 61 72 74 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 70 6f | ch-start.nil).(defvar.swiper--po |
| 7220 | 69 6e 74 2d 6d 69 6e 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 70 6f 69 | int-min.nil).(defvar.swiper--poi |
| 7240 | 6e 74 2d 6d 61 78 20 6e 69 6c 29 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 72 65 76 65 | nt-max.nil).(defvar.swiper--reve |
| 7260 | 61 6c 2d 6d 6f 64 65 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 69 6e 69 | al-mode.nil)..(defun.swiper--ini |
| 7280 | 74 20 28 29 0a 20 20 22 50 65 72 66 6f 72 6d 20 69 6e 69 74 69 61 6c 69 7a 61 74 69 6f 6e 20 63 | t.()..."Perform.initialization.c |
| 72a0 | 6f 6d 6d 6f 6e 20 74 6f 20 62 6f 74 68 20 63 6f 6d 70 6c 65 74 69 6f 6e 20 6d 65 74 68 6f 64 73 | ommon.to.both.completion.methods |
| 72c0 | 2e 22 0a 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 6c 69 6e 65 20 | ."...(setq.swiper--current-line. |
| 72e0 | 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 6d 61 74 | nil)...(setq.swiper--current-mat |
| 7300 | 63 68 2d 73 74 61 72 74 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 63 75 | ch-start.nil)...(setq.swiper--cu |
| 7320 | 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 73 74 61 72 74 20 6e 69 6c 29 0a 20 20 28 73 65 74 71 20 | rrent-window-start.nil)...(setq. |
| 7340 | 73 77 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 20 28 70 6f 69 6e 74 29 29 0a 20 20 28 73 65 74 71 20 | swiper--opoint.(point))...(setq. |
| 7360 | 73 77 69 70 65 72 2d 2d 70 6f 69 6e 74 2d 6d 69 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 | swiper--point-min.(point-min)).. |
| 7380 | 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 70 6f 69 6e 74 2d 6d 61 78 20 28 70 6f 69 6e 74 2d | .(setq.swiper--point-max.(point- |
| 73a0 | 6d 61 78 29 29 0a 20 20 28 77 68 65 6e 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 72 65 76 65 | max))...(when.(setq.swiper--reve |
| 73c0 | 61 6c 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 75 6e 64 2d 61 6e 64 | al-mode...............(bound-and |
| 73e0 | 2d 74 72 75 65 2d 70 20 72 65 76 65 61 6c 2d 6d 6f 64 65 29 29 0a 20 20 20 20 28 72 65 76 65 61 | -true-p.reveal-mode)).....(revea |
| 7400 | 6c 2d 6d 6f 64 65 20 2d 31 29 29 0a 20 20 28 6c 61 7a 79 2d 68 69 67 68 6c 69 67 68 74 2d 63 6c | l-mode.-1))...(lazy-highlight-cl |
| 7420 | 65 61 6e 75 70 20 74 29 0a 20 20 28 73 65 74 71 20 69 73 65 61 72 63 68 2d 6f 70 65 6e 65 64 2d | eanup.t)...(setq.isearch-opened- |
| 7440 | 6f 76 65 72 6c 61 79 73 20 6e 69 6c 29 0a 20 20 28 77 68 65 6e 20 28 62 6f 75 6e 64 2d 61 6e 64 | overlays.nil)...(when.(bound-and |
| 7460 | 2d 74 72 75 65 2d 70 20 65 76 69 6c 2d 6d 6f 64 65 29 0a 20 20 20 20 28 65 76 69 6c 2d 73 65 74 | -true-p.evil-mode).....(evil-set |
| 7480 | 2d 6a 75 6d 70 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 6e 6f 72 6d 61 6c 69 | -jump)))..(defun.swiper--normali |
| 74a0 | 7a 65 2d 72 65 67 65 78 20 28 72 65 29 0a 20 20 22 4e 6f 72 6d 61 6c 69 7a 65 20 74 68 65 20 53 | ze-regex.(re)..."Normalize.the.S |
| 74c0 | 77 69 70 65 72 20 72 65 67 65 78 70 20 52 45 2e 0a 41 64 64 20 61 20 73 70 61 63 65 20 61 66 74 | wiper.regexp.RE..Add.a.space.aft |
| 74e0 | 65 72 20 61 20 6c 65 61 64 69 6e 67 20 60 5e 27 20 66 6f 72 20 60 73 77 69 70 65 72 27 2c 20 61 | er.a.leading.`^'.for.`swiper',.a |
| 7500 | 6e 64 20 61 70 70 6c 79 0a 60 73 65 61 72 63 68 2d 64 65 66 61 75 6c 74 2d 6d 6f 64 65 27 20 69 | nd.apply.`search-default-mode'.i |
| 7520 | 66 20 62 6f 75 6e 64 20 69 6e 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 62 75 66 66 65 72 2e 22 | f.bound.in.the.original.buffer." |
| 7540 | 0a 20 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 0a 20 20 20 | ...(replace-regexp-in-string.... |
| 7560 | 22 5e 5c 5c 28 3f 3a 5c 5c 5c 5c 28 5c 5c 29 3f 5c 5c 5e 22 0a 20 20 20 28 63 6f 6e 63 61 74 20 | "^\\(?:\\\\(\\)?\\^"....(concat. |
| 7580 | 22 5c 5c 26 22 20 28 69 66 20 28 65 71 20 27 73 77 69 70 65 72 20 28 69 76 79 2d 73 74 61 74 65 | "\\&".(if.(eq.'swiper.(ivy-state |
| 75a0 | 2d 63 61 6c 6c 65 72 20 69 76 79 2d 6c 61 73 74 29 29 20 22 20 22 20 22 22 29 29 0a 20 20 20 28 | -caller.ivy-last)).".".""))....( |
| 75c0 | 6c 65 74 20 28 28 6d 6f 64 65 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 20 28 62 6f 75 | let.((mode.(with-ivy-window.(bou |
| 75e0 | 6e 64 2d 61 6e 64 2d 74 72 75 65 2d 70 20 73 65 61 72 63 68 2d 64 65 66 61 75 6c 74 2d 6d 6f 64 | nd-and-true-p.search-default-mod |
| 7600 | 65 29 29 29 29 0a 20 20 20 20 20 28 69 66 20 28 66 75 6e 63 74 69 6f 6e 70 20 6d 6f 64 65 29 0a | e))))......(if.(functionp.mode). |
| 7620 | 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 28 6c | .........(mapconcat...........(l |
| 7640 | 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e | ambda.(x).............(if.(strin |
| 7660 | 67 2d 6d 61 74 63 68 2d 70 20 22 5c 5c 60 5b 5e 24 5c 5c 5e 5d 2b 5c 5c 27 22 20 78 29 0a 20 20 | g-match-p."\\`[^$\\^]+\\'".x)... |
| 7680 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 6d 6f 64 65 20 78 29 0a 20 | ..............(funcall.mode.x).. |
| 76a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 70 6c 69 | .............x))...........(spli |
| 76c0 | 74 2d 73 74 72 69 6e 67 20 72 65 20 22 5c 5c 62 22 29 20 22 22 29 0a 20 20 20 20 20 20 20 72 65 | t-string.re."\\b")."")........re |
| 76e0 | 29 29 0a 20 20 20 74 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 72 65 2d 62 75 69 | ))....t))..(defun.swiper--re-bui |
| 7700 | 6c 64 65 72 20 28 73 74 72 29 0a 20 20 22 54 72 61 6e 73 66 6f 72 6d 20 53 54 52 20 69 6e 74 6f | lder.(str)..."Transform.STR.into |
| 7720 | 20 61 20 73 77 69 70 65 72 20 72 65 67 65 78 2e 0a 54 68 69 73 20 69 73 20 74 68 65 20 72 65 67 | .a.swiper.regex..This.is.the.reg |
| 7740 | 65 78 20 75 73 65 64 20 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 20 77 68 65 72 65 20 | ex.used.in.the.minibuffer.where. |
| 7760 | 63 61 6e 64 69 64 61 74 65 73 20 68 61 76 65 0a 6c 69 6e 65 20 6e 75 6d 62 65 72 73 2e 20 20 46 | candidates.have.line.numbers...F |
| 7780 | 6f 72 20 74 68 65 20 62 75 66 66 65 72 2c 20 75 73 65 20 60 69 76 79 2d 2d 72 65 67 65 78 27 20 | or.the.buffer,.use.`ivy--regex'. |
| 77a0 | 69 6e 73 74 65 61 64 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 72 65 2d 62 75 69 6c 64 65 72 20 28 | instead."...(let*.((re-builder.( |
| 77c0 | 69 76 79 2d 61 6c 69 73 74 2d 73 65 74 74 69 6e 67 20 69 76 79 2d 72 65 2d 62 75 69 6c 64 65 72 | ivy-alist-setting.ivy-re-builder |
| 77e0 | 73 2d 61 6c 69 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 74 72 20 28 72 65 70 6c 61 63 65 | s-alist))..........(str.(replace |
| 7800 | 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5c 5c 5c 5c 6e 22 20 22 5c 6e 22 20 73 | -regexp-in-string."\\\\n"."\n".s |
| 7820 | 74 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 72 65 20 28 66 75 6e 63 61 6c 6c 20 72 65 2d 62 75 | tr))..........(re.(funcall.re-bu |
| 7840 | 69 6c 64 65 72 20 73 74 72 29 29 29 0a 20 20 20 20 28 69 66 20 28 63 6f 6e 73 70 20 72 65 29 0a | ilder.str))).....(if.(consp.re). |
| 7860 | 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 | ........(mapcar..........(lambda |
| 7880 | 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 73 77 69 70 65 72 2d 2d 6e | .(x)............(cons.(swiper--n |
| 78a0 | 6f 72 6d 61 6c 69 7a 65 2d 72 65 67 65 78 20 28 63 61 72 20 78 29 29 0a 20 20 20 20 20 20 20 20 | ormalize-regex.(car.x))......... |
| 78c0 | 20 20 20 20 20 20 20 20 20 28 63 64 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 72 65 29 0a | .........(cdr.x)))..........re). |
| 78e0 | 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 72 65 67 65 78 20 72 | ......(swiper--normalize-regex.r |
| 7900 | 65 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 68 69 73 74 6f 72 79 20 6e 69 | e))))..(defvar.swiper-history.ni |
| 7920 | 6c 0a 20 20 22 48 69 73 74 6f 72 79 20 66 6f 72 20 60 73 77 69 70 65 72 27 2e 22 29 0a 0a 28 64 | l..."History.for.`swiper'.")..(d |
| 7940 | 65 66 76 61 72 20 73 77 69 70 65 72 2d 69 6e 76 6f 63 61 74 69 6f 6e 2d 66 61 63 65 20 6e 69 6c | efvar.swiper-invocation-face.nil |
| 7960 | 0a 20 20 22 54 68 65 20 66 61 63 65 20 61 74 20 74 68 65 20 70 6f 69 6e 74 20 6f 66 20 69 6e 76 | ..."The.face.at.the.point.of.inv |
| 7980 | 6f 63 61 74 69 6f 6e 20 6f 66 20 60 73 77 69 70 65 72 27 2e 22 29 0a 0a 28 64 65 66 63 75 73 74 | ocation.of.`swiper'.")..(defcust |
| 79a0 | 6f 6d 20 73 77 69 70 65 72 2d 73 74 61 79 2d 6f 6e 2d 71 75 69 74 20 6e 69 6c 0a 20 20 22 57 68 | om.swiper-stay-on-quit.nil..."Wh |
| 79c0 | 65 6e 20 6e 6f 6e 2d 6e 69 6c 20 64 6f 6e 27 74 20 67 6f 20 62 61 63 6b 20 74 6f 20 73 65 61 72 | en.non-nil.don't.go.back.to.sear |
| 79e0 | 63 68 20 73 74 61 72 74 20 6f 6e 20 61 62 6f 72 74 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f | ch.start.on.abort."...:type.'boo |
| 7a00 | 6c 65 61 6e 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 73 77 69 | lean)..;;;###autoload.(defun.swi |
| 7a20 | 70 65 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 | per.(&optional.initial-input)... |
| 7a40 | 22 60 69 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 27 20 77 69 74 68 20 61 6e 20 6f 76 65 72 76 | "`isearch-forward'.with.an.overv |
| 7a60 | 69 65 77 2e 0a 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 49 4e 49 54 49 41 4c 2d 49 4e 50 55 54 | iew..When.non-nil,.INITIAL-INPUT |
| 7a80 | 20 69 73 20 74 68 65 20 69 6e 69 74 69 61 6c 20 73 65 61 72 63 68 20 70 61 74 74 65 72 6e 2e 22 | .is.the.initial.search.pattern." |
| 7aa0 | 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 63 61 6e 64 69 64 | ...(interactive)...(let.((candid |
| 7ac0 | 61 74 65 73 20 28 73 77 69 70 65 72 2d 2d 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 20 20 20 | ates.(swiper--candidates)))..... |
| 7ae0 | 28 73 77 69 70 65 72 2d 2d 69 6e 69 74 29 0a 20 20 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d | (swiper--init).....(setq.swiper- |
| 7b00 | 69 6e 76 6f 63 61 74 69 6f 6e 2d 66 61 63 65 0a 20 20 20 20 20 20 20 20 20 20 28 70 6c 69 73 74 | invocation-face...........(plist |
| 7b20 | 2d 67 65 74 20 28 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 2d 61 74 20 28 70 6f 69 6e 74 29 | -get.(text-properties-at.(point) |
| 7b40 | 29 20 27 66 61 63 65 29 29 0a 20 20 20 20 28 6c 65 74 20 28 28 70 72 65 73 65 6c 65 63 74 0a 20 | ).'face)).....(let.((preselect.. |
| 7b60 | 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 20 73 77 69 70 65 72 2d 75 73 65 2d 76 69 73 | ..........(if.(or.swiper-use-vis |
| 7b80 | 75 61 6c 2d 6c 69 6e 65 20 28 6e 75 6c 6c 20 73 65 61 72 63 68 2d 69 6e 76 69 73 69 62 6c 65 29 | ual-line.(null.search-invisible) |
| 7ba0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 75 6e 74 2d 73 63 72 65 65 6e 2d 6c | )................(count-screen-l |
| 7bc0 | 69 6e 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 | ines.................(point-min) |
| 7be0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e | .................(save-excursion |
| 7c00 | 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 29 20 28 70 6f 69 | .(beginning-of-visual-line).(poi |
| 7c20 | 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2d 20 28 6c 69 6e 65 2d 6e 75 6d | nt)))..............(1-.(line-num |
| 7c40 | 62 65 72 2d 61 74 2d 70 6f 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6d 69 6e 69 62 75 | ber-at-pos))))...........(minibu |
| 7c60 | 66 66 65 72 2d 61 6c 6c 6f 77 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 74 29 0a 20 20 | ffer-allow-text-properties.t)... |
| 7c80 | 20 20 20 20 20 20 20 20 72 65 73 29 0a 20 20 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 | ........res).......(unwind-prote |
| 7ca0 | 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 | ct............(and.............( |
| 7cc0 | 73 65 74 71 20 72 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d | setq.res...................(ivy- |
| 7ce0 | 72 65 61 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 53 77 69 70 65 72 3a | read...................."Swiper: |
| 7d00 | 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 69 64 61 74 65 73 | ."....................candidates |
| 7d20 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 | ....................:initial-inp |
| 7d40 | 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ut.initial-input................ |
| 7d60 | 20 20 20 20 3a 6b 65 79 6d 61 70 20 73 77 69 70 65 72 2d 6d 61 70 0a 20 20 20 20 20 20 20 20 20 | ....:keymap.swiper-map.......... |
| 7d80 | 20 20 20 20 20 20 20 20 20 20 3a 70 72 65 73 65 6c 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 20 | ..........:preselect............ |
| 7da0 | 20 20 20 20 20 20 20 20 28 69 66 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 20 20 20 20 20 | ........(if.initial-input....... |
| 7dc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 70 6f 73 69 74 69 6f 6e 2d 69 66 | .................(cl-position-if |
| 7de0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 | .........................(lambda |
| 7e00 | 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | .(x)...........................( |
| 7e20 | 3c 3d 20 28 31 2b 20 70 72 65 73 65 6c 65 63 74 29 20 28 73 77 69 70 65 72 2d 2d 6c 69 6e 65 2d | <=.(1+.preselect).(swiper--line- |
| 7e40 | 6e 75 6d 62 65 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | number.x)))..................... |
| 7e60 | 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ....(progn...................... |
| 7e80 | 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 20 6e 69 6c 29 0a 20 20 20 20 | .....(setq.ivy--old-re.nil)..... |
| 7ea0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 66 69 6c 74 | ......................(ivy--filt |
| 7ec0 | 65 72 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 63 61 6e 64 69 64 61 74 65 73 29 29 29 0a 20 | er.initial-input.candidates))).. |
| 7ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 65 73 65 6c 65 63 74 29 0a 20 | ....................preselect).. |
| 7f00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 65 71 75 69 72 65 2d 6d 61 74 63 68 | ..................:require-match |
| 7f20 | 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 | .t....................:action.#' |
| 7f40 | 73 77 69 70 65 72 2d 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | swiper--action.................. |
| 7f60 | 20 20 3a 72 65 2d 62 75 69 6c 64 65 72 20 23 27 73 77 69 70 65 72 2d 2d 72 65 2d 62 75 69 6c 64 | ..:re-builder.#'swiper--re-build |
| 7f80 | 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 68 69 73 74 6f 72 79 20 27 | er....................:history.' |
| 7fa0 | 73 77 69 70 65 72 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | swiper-history.................. |
| 7fc0 | 20 20 3a 65 78 74 72 61 2d 70 72 6f 70 73 20 28 6c 69 73 74 20 3a 66 6e 61 6d 65 20 28 62 75 66 | ..:extra-props.(list.:fname.(buf |
| 7fe0 | 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | fer-file-name))................. |
| 8000 | 20 20 20 3a 63 61 6c 6c 65 72 20 27 73 77 69 70 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ...:caller.'swiper))............ |
| 8020 | 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 72 65 | .(point)).........(unless.(or.re |
| 8040 | 73 20 73 77 69 70 65 72 2d 73 74 61 79 2d 6f 6e 2d 71 75 69 74 29 0a 20 20 20 20 20 20 20 20 20 | s.swiper-stay-on-quit).......... |
| 8060 | 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 77 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 29 29 0a 20 20 20 | .(goto-char.swiper--opoint)).... |
| 8080 | 20 20 20 20 20 28 69 73 65 61 72 63 68 2d 63 6c 65 61 6e 2d 6f 76 65 72 6c 61 79 73 29 0a 20 20 | .....(isearch-clean-overlays)... |
| 80a0 | 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 72 65 73 20 28 73 74 72 69 6e 67 3d 20 69 | ......(unless.(or.res.(string=.i |
| 80c0 | 76 79 2d 74 65 78 74 20 22 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 70 75 73 68 6e | vy-text.""))...........(cl-pushn |
| 80e0 | 65 77 20 69 76 79 2d 74 65 78 74 20 73 77 69 70 65 72 2d 68 69 73 74 6f 72 79 29 29 0a 20 20 20 | ew.ivy-text.swiper-history)).... |
| 8100 | 20 20 20 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 77 69 6e 64 6f | .....(setq.swiper--current-windo |
| 8120 | 77 2d 73 74 61 72 74 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 77 69 70 65 | w-start.nil).........(when.swipe |
| 8140 | 72 2d 2d 72 65 76 65 61 6c 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 76 65 61 6c | r--reveal-mode...........(reveal |
| 8160 | 2d 6d 6f 64 65 20 31 29 29 29 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 73 | -mode.1))))))..(ivy-configure.'s |
| 8180 | 77 69 70 65 72 0a 20 20 3a 6f 63 63 75 72 20 23 27 73 77 69 70 65 72 2d 6f 63 63 75 72 0a 20 20 | wiper...:occur.#'swiper-occur... |
| 81a0 | 3a 75 70 64 61 74 65 2d 66 6e 20 23 27 73 77 69 70 65 72 2d 2d 75 70 64 61 74 65 2d 69 6e 70 75 | :update-fn.#'swiper--update-inpu |
| 81c0 | 74 2d 69 76 79 0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23 27 73 77 69 70 65 72 2d 2d 63 6c 65 | t-ivy...:unwind-fn.#'swiper--cle |
| 81e0 | 61 6e 75 70 0a 20 20 3a 69 6e 64 65 78 2d 66 6e 20 23 27 69 76 79 2d 72 65 63 6f 6d 70 75 74 65 | anup...:index-fn.#'ivy-recompute |
| 8200 | 2d 69 6e 64 65 78 2d 73 77 69 70 65 72 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 74 6f | -index-swiper)..(defun.swiper-to |
| 8220 | 67 67 6c 65 2d 66 61 63 65 2d 6d 61 74 63 68 69 6e 67 20 28 29 0a 20 20 22 54 6f 67 67 6c 65 20 | ggle-face-matching.()..."Toggle. |
| 8240 | 6d 61 74 63 68 69 6e 67 20 6f 6e 6c 79 20 74 68 65 20 63 61 6e 64 69 64 61 74 65 73 20 77 69 74 | matching.only.the.candidates.wit |
| 8260 | 68 20 60 73 77 69 70 65 72 2d 69 6e 76 6f 63 61 74 69 6f 6e 2d 66 61 63 65 27 2e 22 0a 20 20 28 | h.`swiper-invocation-face'."...( |
| 8280 | 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d | interactive)...(setf.(ivy-state- |
| 82a0 | 6d 61 74 63 68 65 72 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 69 | matcher.ivy-last).........(if.(i |
| 82c0 | 76 79 2d 73 74 61 74 65 2d 6d 61 74 63 68 65 72 20 69 76 79 2d 6c 61 73 74 29 0a 20 20 20 20 20 | vy-state-matcher.ivy-last)...... |
| 82e0 | 20 20 20 20 20 20 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 23 27 73 77 69 70 65 72 2d 2d 66 | .......nil...........#'swiper--f |
| 8300 | 61 63 65 2d 6d 61 74 63 68 65 72 29 29 0a 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 | ace-matcher))...(setq.ivy--old-r |
| 8320 | 65 20 6e 69 6c 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 66 61 63 65 2d 6d 61 74 | e.nil))..(defun.swiper--face-mat |
| 8340 | 63 68 65 72 20 28 72 65 67 65 78 70 20 63 61 6e 64 69 64 61 74 65 73 29 0a 20 20 22 52 65 74 75 | cher.(regexp.candidates)..."Retu |
| 8360 | 72 6e 20 52 45 47 45 58 50 20 6d 61 74 63 68 69 6e 67 20 43 41 4e 44 49 44 41 54 45 53 2e 0a 4d | rn.REGEXP.matching.CANDIDATES..M |
| 8380 | 61 74 63 68 65 64 20 63 61 6e 64 69 64 61 74 65 73 20 73 68 6f 75 6c 64 20 68 61 76 65 20 60 73 | atched.candidates.should.have.`s |
| 83a0 | 77 69 70 65 72 2d 69 6e 76 6f 63 61 74 69 6f 6e 2d 66 61 63 65 27 2e 22 0a 20 20 28 63 6c 2d 72 | wiper-invocation-face'."...(cl-r |
| 83c0 | 65 6d 6f 76 65 2d 69 66 2d 6e 6f 74 0a 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 | emove-if-not....(lambda.(x)..... |
| 83e0 | 20 28 61 6e 64 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 72 65 67 65 78 70 20 78 29 0a 20 20 | .(and.(string-match.regexp.x)... |
| 8400 | 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 73 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 | ........(let*.((s.(match-string. |
| 8420 | 30 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 20 28 6c 65 6e 67 74 | 0.x))..................(n.(lengt |
| 8440 | 68 20 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 20 30 29 29 0a 20 20 | h.s))..................(i.0))... |
| 8460 | 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 3c 20 69 20 6e 29 0a 20 20 | ..........(while.(and.(<.i.n)... |
| 8480 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 65 78 74 2d 70 72 6f 70 | ......................(text-prop |
| 84a0 | 65 72 74 79 2d 61 6e 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | erty-any........................ |
| 84c0 | 20 20 69 20 28 31 2b 20 69 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..i.(1+.i)...................... |
| 84e0 | 20 20 20 20 27 66 61 63 65 20 73 77 69 70 65 72 2d 69 6e 76 6f 63 61 74 69 6f 6e 2d 66 61 63 65 | ....'face.swiper-invocation-face |
| 8500 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 29 29 0a 20 20 | ..........................s))... |
| 8520 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 69 29 29 0a 20 20 20 20 20 20 20 | ............(cl-incf.i))........ |
| 8540 | 20 20 20 20 20 28 3d 20 69 20 6e 29 29 29 29 0a 20 20 20 63 61 6e 64 69 64 61 74 65 73 29 29 0a | .....(=.i.n))))....candidates)). |
| 8560 | 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 65 6e 73 75 72 65 2d 76 69 73 69 62 6c 65 20 28 | .(defun.swiper--ensure-visible.( |
| 8580 | 29 0a 20 20 22 52 65 6d 6f 76 65 20 6f 76 65 72 6c 61 79 73 20 68 69 64 69 6e 67 20 70 6f 69 6e | )..."Remove.overlays.hiding.poin |
| 85a0 | 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 6f 76 65 72 6c 61 79 73 20 28 6f 76 65 72 6c 61 79 73 2d | t."...(let.((overlays.(overlays- |
| 85c0 | 61 74 20 28 31 2d 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 6f 76 20 65 78 70 | at.(1-.(point)))).........ov.exp |
| 85e0 | 6f 73 65 29 0a 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 71 20 6f 76 20 28 70 6f 70 20 6f 76 | ose).....(while.(setq.ov.(pop.ov |
| 8600 | 65 72 6c 61 79 73 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 69 6e 76 69 73 69 62 | erlays)).......(if.(and.(invisib |
| 8620 | 6c 65 2d 70 20 28 6f 76 65 72 6c 61 79 2d 67 65 74 20 6f 76 20 27 69 6e 76 69 73 69 62 6c 65 29 | le-p.(overlay-get.ov.'invisible) |
| 8640 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 78 70 6f 73 65 20 28 6f | )................(setq.expose.(o |
| 8660 | 76 65 72 6c 61 79 2d 67 65 74 20 6f 76 20 27 69 73 65 61 72 63 68 2d 6f 70 65 6e 2d 69 6e 76 69 | verlay-get.ov.'isearch-open-invi |
| 8680 | 73 69 62 6c 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 65 78 70 6f | sible)))...........(funcall.expo |
| 86a0 | 73 65 20 6f 76 29 29 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 6f 76 65 72 | se.ov)))))..(defvar.swiper--over |
| 86c0 | 6c 61 79 73 20 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 6f 76 65 72 6c 61 79 73 2e 22 29 0a 0a 28 | lays.nil..."Store.overlays.")..( |
| 86e0 | 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 | defvar.swiper--isearch-highlight |
| 8700 | 2d 74 69 6d 65 72 20 6e 69 6c 0a 20 20 22 54 68 69 73 20 74 69 6d 65 72 20 75 73 65 64 20 62 79 | -timer.nil..."This.timer.used.by |
| 8720 | 20 60 73 77 69 70 65 72 2d 2d 64 65 6c 61 79 65 64 2d 61 64 64 2d 6f 76 65 72 6c 61 79 73 27 2e | .`swiper--delayed-add-overlays'. |
| 8740 | 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 20 28 29 0a 20 20 | ")..(defun.swiper--cleanup.()... |
| 8760 | 22 43 6c 65 61 6e 20 75 70 20 74 68 65 20 6f 76 65 72 6c 61 79 73 2e 22 0a 20 20 28 77 68 69 6c | "Clean.up.the.overlays."...(whil |
| 8780 | 65 20 73 77 69 70 65 72 2d 2d 6f 76 65 72 6c 61 79 73 0a 20 20 20 20 28 64 65 6c 65 74 65 2d 6f | e.swiper--overlays.....(delete-o |
| 87a0 | 76 65 72 6c 61 79 20 28 70 6f 70 20 73 77 69 70 65 72 2d 2d 6f 76 65 72 6c 61 79 73 29 29 29 0a | verlay.(pop.swiper--overlays))). |
| 87c0 | 20 20 3b 3b 20 66 6f 72 63 65 20 63 6c 65 61 6e 75 70 20 75 6e 6c 65 73 73 20 69 74 27 73 20 3a | ..;;.force.cleanup.unless.it's.: |
| 87e0 | 75 6e 77 69 6e 64 0a 20 20 28 6c 61 7a 79 2d 68 69 67 68 6c 69 67 68 74 2d 63 6c 65 61 6e 75 70 | unwind...(lazy-highlight-cleanup |
| 8800 | 0a 20 20 20 28 69 66 20 28 65 71 20 69 76 79 2d 65 78 69 74 20 27 64 6f 6e 65 29 20 6c 61 7a 79 | ....(if.(eq.ivy-exit.'done).lazy |
| 8820 | 2d 68 69 67 68 6c 69 67 68 74 2d 63 6c 65 61 6e 75 70 20 74 29 29 0a 20 20 28 77 68 65 6e 20 28 | -highlight-cleanup.t))...(when.( |
| 8840 | 74 69 6d 65 72 70 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 | timerp.swiper--isearch-highlight |
| 8860 | 2d 74 69 6d 65 72 29 0a 20 20 20 20 28 63 61 6e 63 65 6c 2d 74 69 6d 65 72 20 73 77 69 70 65 72 | -timer).....(cancel-timer.swiper |
| 8880 | 2d 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 2d 74 69 6d 65 72 29 0a 20 20 20 20 28 | --isearch-highlight-timer).....( |
| 88a0 | 73 65 74 71 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 2d 74 | setq.swiper--isearch-highlight-t |
| 88c0 | 69 6d 65 72 20 6e 69 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 61 64 64 2d | imer.nil)))..(defun.swiper--add- |
| 88e0 | 63 75 72 73 6f 72 2d 6f 76 65 72 6c 61 79 20 28 77 6e 64 29 0a 20 20 28 6c 65 74 2a 20 28 28 73 | cursor-overlay.(wnd)...(let*.((s |
| 8900 | 70 65 63 69 61 6c 20 28 6f 72 20 28 65 6f 6c 70 29 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5c | pecial.(or.(eolp).(looking-at."\ |
| 8920 | 74 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6f 76 20 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 | t")))..........(ov.(make-overlay |
| 8940 | 20 28 70 6f 69 6e 74 29 20 28 69 66 20 73 70 65 63 69 61 6c 20 28 70 6f 69 6e 74 29 20 28 31 2b | .(point).(if.special.(point).(1+ |
| 8960 | 20 28 70 6f 69 6e 74 29 29 29 29 29 29 0a 20 20 20 20 28 69 66 20 73 70 65 63 69 61 6c 0a 20 20 | .(point)))))).....(if.special... |
| 8980 | 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 61 66 74 65 72 2d 73 74 72 | ......(overlay-put.ov.'after-str |
| 89a0 | 69 6e 67 20 28 70 72 6f 70 65 72 74 69 7a 65 20 22 20 22 20 27 66 61 63 65 20 27 69 76 79 2d 63 | ing.(propertize.".".'face.'ivy-c |
| 89c0 | 75 72 73 6f 72 29 29 0a 20 20 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 20 27 66 | ursor)).......(overlay-put.ov.'f |
| 89e0 | 61 63 65 20 27 69 76 79 2d 63 75 72 73 6f 72 29 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 | ace.'ivy-cursor)).....(overlay-p |
| 8a00 | 75 74 20 6f 76 20 27 77 69 6e 64 6f 77 20 77 6e 64 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d | ut.ov.'window.wnd).....(overlay- |
| 8a20 | 70 75 74 20 6f 76 20 27 70 72 69 6f 72 69 74 79 20 32 29 0a 20 20 20 20 28 70 75 73 68 20 6f 76 | put.ov.'priority.2).....(push.ov |
| 8a40 | 20 73 77 69 70 65 72 2d 2d 6f 76 65 72 6c 61 79 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 | .swiper--overlays)))..(defun.swi |
| 8a60 | 70 65 72 2d 2d 61 64 64 2d 6c 69 6e 65 2d 6f 76 65 72 6c 61 79 20 28 77 6e 64 29 0a 20 20 28 6c | per--add-line-overlay.(wnd)...(l |
| 8a80 | 65 74 20 28 28 62 65 67 20 28 69 66 20 76 69 73 75 61 6c 2d 6c 69 6e 65 2d 6d 6f 64 65 0a 20 20 | et.((beg.(if.visual-line-mode... |
| 8aa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 | ...............(save-excursion.. |
| 8ac0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d | ..................(beginning-of- |
| 8ae0 | 76 69 73 75 61 6c 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | visual-line).................... |
| 8b00 | 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 62 65 | (point))................(line-be |
| 8b20 | 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 6e 64 | ginning-position))).........(end |
| 8b40 | 20 28 69 66 20 76 69 73 75 61 6c 2d 6c 69 6e 65 2d 6d 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 | .(if.visual-line-mode........... |
| 8b60 | 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 | .......(save-excursion.......... |
| 8b80 | 20 20 20 20 20 20 20 20 20 20 28 65 6e 64 2d 6f 66 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 29 0a 20 | ..........(end-of-visual-line).. |
| 8ba0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 | ..................(point))...... |
| 8bc0 | 20 20 20 20 20 20 20 20 20 20 28 31 2b 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e | ..........(1+.(line-end-position |
| 8be0 | 29 29 29 29 29 0a 20 20 20 20 28 70 75 73 68 20 28 73 77 69 70 65 72 2d 2d 6d 61 6b 65 2d 6f 76 | ))))).....(push.(swiper--make-ov |
| 8c00 | 65 72 6c 61 79 20 62 65 67 20 65 6e 64 20 27 73 77 69 70 65 72 2d 6c 69 6e 65 2d 66 61 63 65 20 | erlay.beg.end.'swiper-line-face. |
| 8c20 | 77 6e 64 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 2d 6f 76 65 72 6c 61 79 | wnd.0)...........swiper--overlay |
| 8c40 | 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 6d 61 6b 65 2d 6f 76 65 72 6c 61 | s)))..(defun.swiper--make-overla |
| 8c60 | 79 20 28 62 65 67 20 65 6e 64 20 66 61 63 65 20 77 6e 64 20 70 72 69 6f 72 69 74 79 29 0a 20 20 | y.(beg.end.face.wnd.priority)... |
| 8c80 | 22 43 72 65 61 74 65 20 61 6e 20 6f 76 65 72 6c 61 79 20 62 6f 75 6e 64 20 62 79 20 42 45 47 20 | "Create.an.overlay.bound.by.BEG. |
| 8ca0 | 61 6e 64 20 45 4e 44 2e 0a 46 41 43 45 2c 20 57 4e 44 20 61 6e 64 20 50 52 49 4f 52 49 54 59 20 | and.END..FACE,.WND.and.PRIORITY. |
| 8cc0 | 61 72 65 20 70 72 6f 70 65 72 74 69 65 73 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 0a | are.properties.corresponding.to. |
| 8ce0 | 74 68 65 20 66 61 63 65 2c 20 77 69 6e 64 6f 77 20 61 6e 64 20 70 72 69 6f 72 69 74 79 20 6f 66 | the.face,.window.and.priority.of |
| 8d00 | 20 74 68 65 20 6f 76 65 72 6c 61 79 2e 22 0a 20 20 28 6c 65 74 20 28 28 6f 76 65 72 6c 61 79 20 | .the.overlay."...(let.((overlay. |
| 8d20 | 28 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 62 65 67 20 65 6e 64 29 29 29 0a 20 20 20 20 28 6f 76 | (make-overlay.beg.end))).....(ov |
| 8d40 | 65 72 6c 61 79 2d 70 75 74 20 6f 76 65 72 6c 61 79 20 27 66 61 63 65 20 66 61 63 65 29 0a 20 20 | erlay-put.overlay.'face.face)... |
| 8d60 | 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 65 72 6c 61 79 20 27 77 69 6e 64 6f 77 20 77 | ..(overlay-put.overlay.'window.w |
| 8d80 | 6e 64 29 0a 20 20 20 20 28 6f 76 65 72 6c 61 79 2d 70 75 74 20 6f 76 65 72 6c 61 79 20 27 70 72 | nd).....(overlay-put.overlay.'pr |
| 8da0 | 69 6f 72 69 74 79 20 70 72 69 6f 72 69 74 79 29 0a 20 20 20 20 6f 76 65 72 6c 61 79 29 29 0a 0a | iority.priority).....overlay)).. |
| 8dc0 | 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 72 65 63 65 6e 74 65 72 2d 70 20 28 29 0a 20 20 28 | (defun.swiper--recenter-p.()...( |
| 8de0 | 6f 72 20 28 64 69 73 70 6c 61 79 2d 67 72 61 70 68 69 63 2d 70 29 0a 20 20 20 20 20 20 28 6e 6f | or.(display-graphic-p).......(no |
| 8e00 | 74 20 72 65 63 65 6e 74 65 72 2d 72 65 64 69 73 70 6c 61 79 29 29 29 0a 0a 28 64 65 66 75 6e 20 | t.recenter-redisplay)))..(defun. |
| 8e20 | 73 77 69 70 65 72 2d 2d 70 6f 73 69 74 69 76 65 2d 72 65 67 65 78 70 73 20 28 29 0a 20 20 28 69 | swiper--positive-regexps.()...(i |
| 8e40 | 66 20 28 6c 69 73 74 70 20 69 76 79 2d 72 65 67 65 78 29 0a 20 20 20 20 20 20 28 6d 61 70 63 61 | f.(listp.ivy-regex).......(mapca |
| 8e60 | 72 20 23 27 63 61 72 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 2d 6e 6f 74 20 23 27 63 64 72 20 | r.#'car.(cl-remove-if-not.#'cdr. |
| 8e80 | 69 76 79 2d 72 65 67 65 78 29 29 0a 20 20 20 20 28 6c 69 73 74 20 69 76 79 2d 72 65 67 65 78 29 | ivy-regex)).....(list.ivy-regex) |
| 8ea0 | 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 75 70 64 61 74 65 2d 69 6e 70 75 74 2d | ))..(defun.swiper--update-input- |
| 8ec0 | 69 76 79 20 28 29 0a 20 20 22 43 61 6c 6c 65 64 20 77 68 65 6e 20 60 69 76 79 27 20 69 6e 70 75 | ivy.()..."Called.when.`ivy'.inpu |
| 8ee0 | 74 20 69 73 20 75 70 64 61 74 65 64 2e 22 0a 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f | t.is.updated."...(with-ivy-windo |
| 8f00 | 77 0a 20 20 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 29 0a 20 20 20 20 28 77 68 65 | w.....(swiper--cleanup).....(whe |
| 8f20 | 6e 20 28 3e 20 28 6c 65 6e 67 74 68 20 28 69 76 79 2d 73 74 61 74 65 2d 63 75 72 72 65 6e 74 20 | n.(>.(length.(ivy-state-current. |
| 8f40 | 69 76 79 2d 6c 61 73 74 29 29 20 30 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 72 65 67 65 78 | ivy-last)).0).......(let.((regex |
| 8f60 | 70 73 20 28 73 77 69 70 65 72 2d 2d 70 6f 73 69 74 69 76 65 2d 72 65 67 65 78 70 73 29 29 0a 20 | ps.(swiper--positive-regexps)).. |
| 8f80 | 20 20 20 20 20 20 20 20 20 20 20 28 72 65 2d 69 64 78 20 2d 31 29 0a 20 20 20 20 20 20 20 20 20 | ...........(re-idx.-1).......... |
| 8fa0 | 20 20 20 28 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 28 69 76 79 2d 2d 63 61 73 65 2d | ...(case-fold-search.(ivy--case- |
| 8fc0 | 66 6f 6c 64 2d 70 20 69 76 79 2d 74 65 78 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 | fold-p.ivy-text))).........(doli |
| 8fe0 | 73 74 20 28 72 65 20 72 65 67 65 78 70 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 | st.(re.regexps)...........(setq. |
| 9000 | 72 65 2d 69 64 78 20 28 31 2b 20 72 65 2d 69 64 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c | re-idx.(1+.re-idx))...........(l |
| 9020 | 65 74 2a 20 28 28 72 65 20 28 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 | et*.((re.(replace-regexp-in-stri |
| 9040 | 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 20 20 22 20 | ng......................."....". |
| 9060 | 22 5c 74 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 29 29 0a | "\t".......................re)). |
| 9080 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6d 20 28 73 77 69 70 65 72 2d 2d 6c | .................(num.(swiper--l |
| 90a0 | 69 6e 65 2d 6e 75 6d 62 65 72 20 28 69 76 79 2d 73 74 61 74 65 2d 63 75 72 72 65 6e 74 20 69 76 | ine-number.(ivy-state-current.iv |
| 90c0 | 79 2d 6c 61 73 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 | y-last)))).............(unless.( |
| 90e0 | 6d 65 6d 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 28 69 76 79 2d 79 61 6e 6b 2d 77 6f 72 | memq.this-command.'(ivy-yank-wor |
| 9100 | 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d............................... |
| 9120 | 20 20 20 20 20 20 20 20 20 20 20 69 76 79 2d 79 61 6e 6b 2d 73 79 6d 62 6f 6c 0a 20 20 20 20 20 | ...........ivy-yank-symbol...... |
| 9140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 9160 | 20 20 20 20 69 76 79 2d 79 61 6e 6b 2d 63 68 61 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ....ivy-yank-char............... |
| 9180 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 63 72 6f 6c | ...........................scrol |
| 91a0 | 6c 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | l-other-window))...............( |
| 91c0 | 77 68 65 6e 20 28 63 6c 2d 70 6c 75 73 70 20 6e 75 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | when.(cl-plusp.num)............. |
| 91e0 | 20 20 20 20 28 75 6e 6c 65 73 73 20 28 69 66 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d | ....(unless.(if.swiper--current- |
| 9200 | 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | line............................ |
| 9220 | 20 28 65 71 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 6c 69 6e 65 20 6e 75 6d 29 0a 20 | .(eq.swiper--current-line.num).. |
| 9240 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 28 6c 69 | .........................(eq.(li |
| 9260 | 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 29 20 6e 75 6d 29 29 0a 20 20 20 20 20 20 20 20 | ne-number-at-pos).num))......... |
| 9280 | 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 77 69 70 65 72 2d 2d 70 6f 69 | ..........(goto-char.swiper--poi |
| 92a0 | 6e 74 2d 6d 69 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 73 77 | nt-min)...................(if.sw |
| 92c0 | 69 70 65 72 2d 75 73 65 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 | iper-use-visual-line............ |
| 92e0 | 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 6d 6f 76 65 20 28 31 2d 20 6e 75 6d 29 29 0a | ...........(line-move.(1-.num)). |
| 9300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e | ....................(forward-lin |
| 9320 | 65 20 28 31 2d 20 6e 75 6d 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 | e.(1-.num)))).................(i |
| 9340 | 66 20 28 61 6e 64 20 28 65 71 75 61 6c 20 69 76 79 2d 74 65 78 74 20 22 22 29 0a 20 20 20 20 20 | f.(and.(equal.ivy-text."")...... |
| 9360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 3d 20 28 6c 69 6e 65 2d 62 65 | ....................(<=.(line-be |
| 9380 | 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ginning-position)............... |
| 93a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 0a 20 20 | ...............swiper--opoint... |
| 93c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 | ...........................(line |
| 93e0 | 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -end-position)))................ |
| 9400 | 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 77 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 29 0a | .....(goto-char.swiper--opoint). |
| 9420 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 73 77 69 70 65 72 | ..................(if.(eq.swiper |
| 9440 | 2d 2d 63 75 72 72 65 6e 74 2d 6c 69 6e 65 20 6e 75 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | --current-line.num)............. |
| 9460 | 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d | ..........(when.swiper--current- |
| 9480 | 6d 61 74 63 68 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | match-start..................... |
| 94a0 | 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 6d | ....(goto-char.swiper--current-m |
| 94c0 | 61 74 63 68 2d 73 74 61 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | atch-start)).................... |
| 94e0 | 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 6c 69 6e 65 20 6e 75 6d 29 | .(setq.swiper--current-line.num) |
| 9500 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73 65 | )...................(when.(re-se |
| 9520 | 61 72 63 68 2d 66 6f 72 77 61 72 64 20 72 65 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 | arch-forward.re.(line-end-positi |
| 9540 | 6f 6e 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 | on).t).....................(setq |
| 9560 | 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 6d 61 74 63 68 2d 73 74 61 72 74 20 28 6d 61 | .swiper--current-match-start.(ma |
| 9580 | 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | tch-beginning.0))))............. |
| 95a0 | 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 69 73 65 61 72 63 68 2d 66 69 6c 74 65 72 2d 70 72 65 64 | ....(funcall.isearch-filter-pred |
| 95c0 | 69 63 61 74 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | icate..........................( |
| 95e0 | 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 | line-beginning-position)........ |
| 9600 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 | ..................(line-end-posi |
| 9620 | 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d | tion)).................(swiper-- |
| 9640 | 6d 61 79 62 65 2d 72 65 63 65 6e 74 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 | maybe-recenter))).............(s |
| 9660 | 77 69 70 65 72 2d 2d 61 64 64 2d 6f 76 65 72 6c 61 79 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 | wiper--add-overlays............. |
| 9680 | 20 72 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 78 0a 20 20 20 20 20 20 20 20 20 20 | .re..............(max........... |
| 96a0 | 20 20 20 20 28 69 66 20 28 73 77 69 70 65 72 2d 2d 72 65 63 65 6e 74 65 72 2d 70 29 0a 20 20 20 | ....(if.(swiper--recenter-p).... |
| 96c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 6e 64 6f 77 2d 73 74 61 72 74 29 0a 20 20 | ...............(window-start)... |
| 96e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f | ..............(line-beginning-po |
| 9700 | 73 69 74 69 6f 6e 20 28 2d 20 28 77 69 6e 64 6f 77 2d 68 65 69 67 68 74 29 29 29 29 0a 20 20 20 | sition.(-.(window-height)))).... |
| 9720 | 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 2d 70 6f 69 6e 74 2d 6d 69 6e 29 0a 20 20 | ...........swiper--point-min)... |
| 9740 | 20 20 20 20 20 20 20 20 20 20 20 28 6d 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 | ...........(min...............(i |
| 9760 | 66 20 28 73 77 69 70 65 72 2d 2d 72 65 63 65 6e 74 65 72 2d 70 29 0a 20 20 20 20 20 20 20 20 20 | f.(swiper--recenter-p).......... |
| 9780 | 20 20 20 20 20 20 20 20 20 28 77 69 6e 64 6f 77 2d 65 6e 64 20 28 73 65 6c 65 63 74 65 64 2d 77 | .........(window-end.(selected-w |
| 97a0 | 69 6e 64 6f 77 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d | indow).t).................(line- |
| 97c0 | 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 20 28 77 69 6e 64 6f 77 2d 68 65 69 67 68 74 29 29 29 0a 20 | end-position.(window-height))).. |
| 97e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 2d 70 6f 69 6e 74 2d 6d 61 78 29 0a | .............swiper--point-max). |
| 9800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 | .............nil..............re |
| 9820 | 2d 69 64 78 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 61 64 64 2d | -idx)))))))..(defun.swiper--add- |
| 9840 | 6f 76 65 72 6c 61 79 73 20 28 72 65 20 26 6f 70 74 69 6f 6e 61 6c 20 62 65 67 20 65 6e 64 20 77 | overlays.(re.&optional.beg.end.w |
| 9860 | 6e 64 20 72 65 2d 69 64 78 29 0a 20 20 22 41 64 64 20 6f 76 65 72 6c 61 79 73 20 66 6f 72 20 52 | nd.re-idx)..."Add.overlays.for.R |
| 9880 | 45 20 72 65 67 65 78 70 20 69 6e 20 76 69 73 69 62 6c 65 20 70 61 72 74 20 6f 66 20 74 68 65 20 | E.regexp.in.visible.part.of.the. |
| 98a0 | 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 42 45 47 20 61 6e 64 20 45 4e 44 2c 20 77 68 65 | current.buffer..BEG.and.END,.whe |
| 98c0 | 6e 20 73 70 65 63 69 66 69 65 64 2c 20 61 72 65 20 74 68 65 20 70 6f 69 6e 74 20 62 6f 75 6e 64 | n.specified,.are.the.point.bound |
| 98e0 | 73 2e 0a 57 4e 44 2c 20 77 68 65 6e 20 73 70 65 63 69 66 69 65 64 20 69 73 20 74 68 65 20 77 69 | s..WND,.when.specified.is.the.wi |
| 9900 | 6e 64 6f 77 2e 22 0a 20 20 28 73 65 74 71 20 77 6e 64 20 28 6f 72 20 77 6e 64 20 28 69 76 79 2d | ndow."...(setq.wnd.(or.wnd.(ivy- |
| 9920 | 73 74 61 74 65 2d 77 69 6e 64 6f 77 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 28 73 77 69 70 | state-window.ivy-last)))...(swip |
| 9940 | 65 72 2d 2d 61 64 64 2d 6c 69 6e 65 2d 6f 76 65 72 6c 61 79 20 77 6e 64 29 0a 20 20 28 6c 65 74 | er--add-line-overlay.wnd)...(let |
| 9960 | 2a 20 28 28 70 74 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 68 20 28 77 69 | *.((pt.(point))..........(wh.(wi |
| 9980 | 6e 64 6f 77 2d 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 20 28 62 65 67 20 28 6f 72 20 | ndow-height))..........(beg.(or. |
| 99a0 | 62 65 67 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 | beg.(save-excursion............. |
| 99c0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 28 2d 20 77 68 29 | ............(forward-line.(-.wh) |
| 99e0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 | ).........................(point |
| 9a00 | 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 65 6e 64 20 28 6f 72 20 65 6e 64 20 28 73 61 76 65 | ))))..........(end.(or.end.(save |
| 9a20 | 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -excursion...................... |
| 9a40 | 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 77 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ...(forward-line.wh)............ |
| 9a60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 20 20 | .............(point))))......... |
| 9a80 | 20 28 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 28 69 76 79 2d 2d 63 61 73 65 2d 66 6f | .(case-fold-search.(ivy--case-fo |
| 9aa0 | 6c 64 2d 70 20 72 65 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 3e 3d 20 28 6c 65 6e 67 74 68 | ld-p.re))).....(when.(>=.(length |
| 9ac0 | 20 72 65 29 20 73 77 69 70 65 72 2d 6d 69 6e 2d 68 69 67 68 6c 69 67 68 74 29 0a 20 20 20 20 20 | .re).swiper-min-highlight)...... |
| 9ae0 | 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 | .(save-excursion.........(goto-c |
| 9b00 | 68 61 72 20 62 65 67 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 52 45 20 63 61 6e 20 62 65 63 6f 6d | har.beg).........;;.RE.can.becom |
| 9b20 | 65 20 61 6e 20 69 6e 76 61 6c 69 64 20 72 65 67 65 78 70 0a 20 20 20 20 20 20 20 20 28 77 68 69 | e.an.invalid.regexp.........(whi |
| 9b40 | 6c 65 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e | le.(progn..................(when |
| 9b60 | 20 28 65 6f 6c 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 | .(eolp)....................(unle |
| 9b80 | 73 73 20 28 65 6f 62 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | ss.(eobp)......................( |
| 9ba0 | 66 6f 72 77 61 72 64 2d 63 68 61 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | forward-char)))................. |
| 9bc0 | 20 28 61 6e 64 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 20 28 72 65 2d 73 65 61 72 63 68 2d | .(and.(ignore-errors.(re-search- |
| 9be0 | 66 6f 72 77 61 72 64 20 72 65 20 65 6e 64 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | forward.re.end.t)).............. |
| 9c00 | 20 20 20 20 20 20 20 20 20 28 3e 20 28 2d 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 20 28 6d 61 | .........(>.(-.(match-end.0).(ma |
| 9c20 | 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 20 | tch-beginning.0)).0))).......... |
| 9c40 | 20 3b 3b 20 44 6f 6e 27 74 20 68 69 67 68 6c 69 67 68 74 20 61 20 6d 61 74 63 68 20 69 66 20 69 | .;;.Don't.highlight.a.match.if.i |
| 9c60 | 74 20 73 70 61 6e 73 20 6d 75 6c 74 69 70 6c 65 0a 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6c 69 | t.spans.multiple...........;;.li |
| 9c80 | 6e 65 73 2e 20 60 63 6f 75 6e 74 2d 6c 69 6e 65 73 27 20 72 65 74 75 72 6e 73 20 31 20 69 66 20 | nes..`count-lines'.returns.1.if. |
| 9ca0 | 74 68 65 20 6d 61 74 63 68 20 69 73 20 77 69 74 68 69 6e 20 61 0a 20 20 20 20 20 20 20 20 20 20 | the.match.is.within.a........... |
| 9cc0 | 3b 3b 20 73 69 6e 67 6c 65 20 6c 69 6e 65 2c 20 65 76 65 6e 20 69 66 20 69 74 20 69 6e 63 6c 75 | ;;.single.line,.even.if.it.inclu |
| 9ce0 | 64 65 73 20 74 68 65 20 6e 65 77 6c 69 6e 65 2c 20 61 6e 64 20 32 20 6f 72 0a 20 20 20 20 20 20 | des.the.newline,.and.2.or....... |
| 9d00 | 20 20 20 20 3b 3b 20 67 72 65 61 74 65 72 20 6f 74 68 65 72 77 69 73 65 2e 20 57 65 20 68 6f 70 | ....;;.greater.otherwise..We.hop |
| 9d20 | 65 20 74 68 61 74 20 74 68 65 20 69 6e 63 6c 75 73 69 6f 6e 20 6f 66 20 74 68 65 0a 20 20 20 20 | e.that.the.inclusion.of.the..... |
| 9d40 | 20 20 20 20 20 20 3b 3b 20 6e 65 77 6c 69 6e 65 20 77 69 6c 6c 20 6e 6f 74 20 65 76 65 72 20 62 | ......;;.newline.will.not.ever.b |
| 9d60 | 65 20 61 20 70 72 6f 62 6c 65 6d 20 69 6e 20 70 72 61 63 74 69 63 65 2e 0a 20 20 20 20 20 20 20 | e.a.problem.in.practice......... |
| 9d80 | 20 20 20 28 77 68 65 6e 20 28 3c 20 28 63 6f 75 6e 74 2d 6c 69 6e 65 73 20 28 6d 61 74 63 68 2d | ...(when.(<.(count-lines.(match- |
| 9da0 | 62 65 67 69 6e 6e 69 6e 67 20 30 29 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 29 20 32 29 0a 20 | beginning.0).(match-end.0)).2).. |
| 9dc0 | 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 2a 20 28 28 66 61 63 65 73 20 28 69 66 20 28 3d 20 | ...........(let*.((faces.(if.(=. |
| 9de0 | 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 20 70 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (match-end.0).pt)............... |
| 9e00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 66 61 63 65 73 0a 20 20 20 | ................swiper-faces.... |
| 9e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d | .........................swiper- |
| 9e40 | 62 61 63 6b 67 72 6f 75 6e 64 2d 66 61 63 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | background-faces)).............. |
| 9e60 | 20 20 20 20 20 20 28 61 64 64 65 72 2d 66 6e 20 28 6c 61 6d 62 64 61 20 28 62 65 67 20 65 6e 64 | ......(adder-fn.(lambda.(beg.end |
| 9e80 | 20 66 61 63 65 20 70 72 69 6f 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .face.priority)................. |
| 9ea0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 73 77 69 70 65 72 2d 2d 6d 61 | ...............(push.(swiper--ma |
| 9ec0 | 6b 65 2d 6f 76 65 72 6c 61 79 20 62 65 67 20 65 6e 64 20 66 61 63 65 20 77 6e 64 20 70 72 69 6f | ke-overlay.beg.end.face.wnd.prio |
| 9ee0 | 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rity)........................... |
| 9f00 | 20 20 20 20 20 20 20 20 20 20 20 69 73 65 61 72 63 68 2d 6c 61 7a 79 2d 68 69 67 68 6c 69 67 68 | ...........isearch-lazy-highligh |
| 9f20 | 74 2d 6f 76 65 72 6c 61 79 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 75 6e | t-overlays))))...............(un |
| 9f40 | 6c 65 73 73 20 28 61 6e 64 20 28 63 6f 6e 73 70 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 29 0a 20 20 | less.(and.(consp.ivy--old-re)... |
| 9f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 75 6c 6c 0a 20 | .........................(null.. |
| 9f80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 | ...........................(save |
| 9fa0 | 2d 6d 61 74 63 68 2d 64 61 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -match-data..................... |
| 9fc0 | 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 2d 72 65 2d 66 69 6c 74 65 72 20 69 76 79 2d 2d 6f | ..........(ivy--re-filter.ivy--o |
| 9fe0 | 6c 64 2d 72 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ld-re........................... |
| a000 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 0a 20 20 20 20 20 20 | ....................(list....... |
| a020 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a040 | 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 | .........(buffer-substring-no-pr |
| a060 | 6f 70 65 72 74 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | operties........................ |
| a080 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 62 | .........................(line-b |
| a0a0 | 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | eginning-position).............. |
| a0c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a0e0 | 20 20 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 29 29 29 29 0a 20 20 20 | ...(line-end-position))))))).... |
| a100 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 61 64 64 2d 70 72 6f 70 65 72 | .............(swiper--add-proper |
| a120 | 74 69 65 73 20 66 61 63 65 73 20 61 64 64 65 72 2d 66 6e 20 72 65 2d 69 64 78 29 29 29 29 29 29 | ties.faces.adder-fn.re-idx)))))) |
| a140 | 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 61 64 64 2d 70 72 6f 70 65 72 74 69 | )))..(defun.swiper--add-properti |
| a160 | 65 73 20 28 66 61 63 65 73 20 61 64 64 65 72 2d 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 72 65 2d | es.(faces.adder-fn.&optional.re- |
| a180 | 69 64 78 29 0a 20 20 28 6c 65 74 20 28 28 6d 62 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e | idx)...(let.((mb.(match-beginnin |
| a1a0 | 67 20 30 29 29 0a 20 20 20 20 20 20 20 20 28 6d 65 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 29 | g.0)).........(me.(match-end.0)) |
| a1c0 | 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 3e 20 28 2d 20 6d 65 20 6d 62 29 20 32 30 31 37 29 | ).....(unless.(>.(-.me.mb).2017) |
| a1e0 | 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 61 64 64 65 72 2d 66 6e 0a 20 20 20 20 20 20 20 | .......(funcall.adder-fn........ |
| a200 | 20 20 20 20 20 20 20 20 6d 62 20 6d 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 | ........mb.me................(if |
| a220 | 20 28 61 6e 64 20 69 76 79 2d 75 73 65 2d 67 72 6f 75 70 2d 66 61 63 65 2d 69 66 2d 6e 6f 2d 67 | .(and.ivy-use-group-face-if-no-g |
| a240 | 72 6f 75 70 73 20 28 7a 65 72 6f 70 20 69 76 79 2d 2d 73 75 62 65 78 70 73 29 29 0a 20 20 20 20 | roups.(zerop.ivy--subexps))..... |
| a260 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 28 31 2b 20 28 6d 6f 64 20 28 6f 72 | ...............(nth.(1+.(mod.(or |
| a280 | 20 72 65 2d 69 64 78 20 30 29 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 66 61 63 65 73 29 29 29 29 | .re-idx.0).(1-.(length.faces)))) |
| a2a0 | 20 66 61 63 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72 20 66 61 | .faces)..................(car.fa |
| a2c0 | 63 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 29 29 29 0a 20 20 28 6c 65 74 | ces))................0)))...(let |
| a2e0 | 20 28 28 69 20 31 29 0a 20 20 20 20 20 20 20 20 28 6a 20 30 29 29 0a 20 20 20 20 28 77 68 69 6c | .((i.1).........(j.0)).....(whil |
| a300 | 65 20 28 3c 3d 20 28 63 6c 2d 69 6e 63 66 20 6a 29 20 69 76 79 2d 2d 73 75 62 65 78 70 73 29 0a | e.(<=.(cl-incf.j).ivy--subexps). |
| a320 | 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 6d 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 | ......(let.((bm.(match-beginning |
| a340 | 20 6a 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6d 20 28 6d 61 74 63 68 2d 65 6e 64 20 | .j)).............(em.(match-end. |
| a360 | 6a 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 28 69 6e 74 65 67 65 72 | j))).........(when.(and.(integer |
| a380 | 70 20 65 6d 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 74 65 67 65 | p.em)....................(intege |
| a3a0 | 72 70 20 62 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 28 69 76 79 | rp.bm))...........(when.(eq.(ivy |
| a3c0 | 2d 61 6c 69 73 74 2d 73 65 74 74 69 6e 67 20 69 76 79 2d 72 65 2d 62 75 69 6c 64 65 72 73 2d 61 | -alist-setting.ivy-re-builders-a |
| a3e0 | 6c 69 73 74 20 74 29 20 23 27 69 76 79 2d 2d 72 65 67 65 78 2d 66 75 7a 7a 79 29 0a 20 20 20 20 | list.t).#'ivy--regex-fuzzy)..... |
| a400 | 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 3c 20 6a 20 69 76 79 2d 2d 73 75 | ........(while.(and.(<.j.ivy--su |
| a420 | 62 65 78 70 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | bexps).........................( |
| a440 | 69 6e 74 65 67 65 72 70 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 28 2b 20 6a 20 31 | integerp.(match-beginning.(+.j.1 |
| a460 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 20 65 | ))).........................(=.e |
| a480 | 6d 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 28 2b 20 6a 20 31 29 29 29 29 0a 20 20 | m.(match-beginning.(+.j.1))))... |
| a4a0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 65 6d 20 28 6d 61 74 63 68 2d 65 6e 64 20 | ............(setq.em.(match-end. |
| a4c0 | 28 63 6c 2d 69 6e 63 66 20 6a 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 | (cl-incf.j)))))...........(funca |
| a4e0 | 6c 6c 20 61 64 64 65 72 2d 66 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 | ll.adder-fn....................b |
| a500 | 6d 20 65 6d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 74 68 20 28 31 2b | m.em....................(nth.(1+ |
| a520 | 20 28 6d 6f 64 20 28 2b 20 69 20 32 29 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 66 61 63 65 73 29 | .(mod.(+.i.2).(1-.(length.faces) |
| a540 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 61 63 65 | ))).........................face |
| a560 | 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 29 0a 20 20 20 20 20 20 20 | s)....................i)........ |
| a580 | 20 20 20 28 63 6c 2d 69 6e 63 66 20 69 29 29 29 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 | ...(cl-incf.i))))))..(defcustom. |
| a5a0 | 73 77 69 70 65 72 2d 61 63 74 69 6f 6e 2d 72 65 63 65 6e 74 65 72 20 6e 69 6c 0a 20 20 22 57 68 | swiper-action-recenter.nil..."Wh |
| a5c0 | 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 72 65 63 65 6e 74 65 72 20 61 66 74 65 72 20 65 78 69 74 69 | en.non-nil,.recenter.after.exiti |
| a5e0 | 6e 67 20 60 73 77 69 70 65 72 27 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a | ng.`swiper'."...:type.'boolean). |
| a600 | 28 64 65 66 76 61 72 20 65 76 69 6c 2d 73 65 61 72 63 68 2d 6d 6f 64 75 6c 65 29 0a 28 64 65 66 | (defvar.evil-search-module).(def |
| a620 | 76 61 72 20 65 76 69 6c 2d 65 78 2d 73 65 61 72 63 68 2d 70 61 74 74 65 72 6e 29 0a 28 64 65 66 | var.evil-ex-search-pattern).(def |
| a640 | 76 61 72 20 65 76 69 6c 2d 65 78 2d 73 65 61 72 63 68 2d 70 65 72 73 69 73 74 65 6e 74 2d 68 69 | var.evil-ex-search-persistent-hi |
| a660 | 67 68 6c 69 67 68 74 29 0a 28 64 65 66 76 61 72 20 65 76 69 6c 2d 65 78 2d 73 65 61 72 63 68 2d | ghlight).(defvar.evil-ex-search- |
| a680 | 64 69 72 65 63 74 69 6f 6e 29 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 65 76 69 | direction).(declare-function.evi |
| a6a0 | 6c 2d 65 78 2d 73 65 61 72 63 68 2d 61 63 74 69 76 61 74 65 2d 68 69 67 68 6c 69 67 68 74 20 22 | l-ex-search-activate-highlight." |
| a6c0 | 65 76 69 6c 2d 65 78 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 6d 61 79 62 65 2d | evil-ex")..(defun.swiper--maybe- |
| a6e0 | 72 65 63 65 6e 74 65 72 20 28 29 0a 20 20 28 63 6f 6e 64 20 28 73 77 69 70 65 72 2d 61 63 74 69 | recenter.()...(cond.(swiper-acti |
| a700 | 6f 6e 2d 72 65 63 65 6e 74 65 72 0a 20 20 20 20 20 20 20 20 20 28 72 65 63 65 6e 74 65 72 29 29 | on-recenter..........(recenter)) |
| a720 | 0a 20 20 20 20 20 20 20 20 28 28 73 77 69 70 65 72 2d 2d 72 65 63 65 6e 74 65 72 2d 70 29 0a 20 | .........((swiper--recenter-p).. |
| a740 | 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 77 69 | ........(when.swiper--current-wi |
| a760 | 6e 64 6f 77 2d 73 74 61 72 74 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 2d 77 69 6e 64 6f | ndow-start............(set-windo |
| a780 | 77 2d 73 74 61 72 74 20 28 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 29 20 73 77 69 70 65 72 | w-start.(selected-window).swiper |
| a7a0 | 2d 2d 63 75 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 73 74 61 72 74 29 29 0a 20 20 20 20 20 20 20 | --current-window-start))........ |
| a7c0 | 20 20 28 77 68 65 6e 20 28 6f 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 20 28 | ..(when.(or.................(<.( |
| a7e0 | 70 6f 69 6e 74 29 20 28 77 69 6e 64 6f 77 2d 73 74 61 72 74 29 29 0a 20 20 20 20 20 20 20 20 20 | point).(window-start)).......... |
| a800 | 20 20 20 20 20 20 20 28 3e 20 28 70 6f 69 6e 74 29 20 28 77 69 6e 64 6f 77 2d 65 6e 64 20 28 69 | .......(>.(point).(window-end.(i |
| a820 | 76 79 2d 73 74 61 74 65 2d 77 69 6e 64 6f 77 20 69 76 79 2d 6c 61 73 74 29 20 74 29 29 29 0a 20 | vy-state-window.ivy-last).t))).. |
| a840 | 20 20 20 20 20 20 20 20 20 20 28 72 65 63 65 6e 74 65 72 29 29 29 29 0a 20 20 28 73 65 74 71 20 | ..........(recenter))))...(setq. |
| a860 | 73 77 69 70 65 72 2d 2d 63 75 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 73 74 61 72 74 20 28 77 69 | swiper--current-window-start.(wi |
| a880 | 6e 64 6f 77 2d 73 74 61 72 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 6c 69 | ndow-start)))..(defun.swiper--li |
| a8a0 | 6e 65 2d 6e 75 6d 62 65 72 20 28 78 29 0a 20 20 28 6f 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 | ne-number.(x)...(or.(get-text-pr |
| a8c0 | 6f 70 65 72 74 79 20 30 20 27 73 77 69 70 65 72 2d 6c 69 6e 65 2d 6e 75 6d 62 65 72 20 78 29 0a | operty.0.'swiper-line-number.x). |
| a8e0 | 20 20 20 20 20 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 31 20 27 73 77 69 70 | ......(get-text-property.1.'swip |
| a900 | 65 72 2d 6c 69 6e 65 2d 6e 75 6d 62 65 72 20 78 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 | er-line-number.x)))..(defcustom. |
| a920 | 73 77 69 70 65 72 2d 76 65 72 62 6f 73 65 20 74 0a 20 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c | swiper-verbose.t..."When.non-nil |
| a940 | 2c 20 70 72 69 6e 74 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 61 6c 20 6d 65 73 73 61 | ,.print.more.informational.messa |
| a960 | 67 65 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 0a 28 64 65 66 75 6e 20 | ges."...:type.'boolean)..(defun. |
| a980 | 73 77 69 70 65 72 2d 2d 70 75 73 68 2d 6d 61 72 6b 20 28 29 0a 20 20 28 77 68 65 6e 20 28 2f 3d | swiper--push-mark.()...(when.(/= |
| a9a0 | 20 28 70 6f 69 6e 74 29 20 73 77 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 29 0a 20 20 20 20 28 75 6e | .(point).swiper--opoint).....(un |
| a9c0 | 6c 65 73 73 20 28 61 6e 64 20 74 72 61 6e 73 69 65 6e 74 2d 6d 61 72 6b 2d 6d 6f 64 65 20 6d 61 | less.(and.transient-mark-mode.ma |
| a9e0 | 72 6b 2d 61 63 74 69 76 65 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 69 76 79 2d 65 | rk-active).......(when.(eq.ivy-e |
| aa00 | 78 69 74 20 27 64 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 28 70 75 73 68 2d 6d 61 72 6b 20 73 77 | xit.'done).........(push-mark.sw |
| aa20 | 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 20 74 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 73 77 | iper--opoint.t).........(when.sw |
| aa40 | 69 70 65 72 2d 76 65 72 62 6f 73 65 0a 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 | iper-verbose...........(message. |
| aa60 | 22 4d 61 72 6b 20 73 61 76 65 64 20 77 68 65 72 65 20 73 65 61 72 63 68 20 73 74 61 72 74 65 64 | "Mark.saved.where.search.started |
| aa80 | 22 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 61 63 74 69 6f 6e 20 28 | "))))))..(defun.swiper--action.( |
| aaa0 | 78 29 0a 20 20 22 47 6f 74 6f 20 6c 69 6e 65 20 58 2e 22 0a 20 20 28 6c 65 74 20 28 28 6c 6e 20 | x)..."Goto.line.X."...(let.((ln. |
| aac0 | 28 31 2d 20 28 73 77 69 70 65 72 2d 2d 6c 69 6e 65 2d 6e 75 6d 62 65 72 20 78 29 29 29 0a 20 20 | (1-.(swiper--line-number.x)))... |
| aae0 | 20 20 20 20 20 20 28 72 65 20 28 69 76 79 2d 2d 72 65 67 65 78 20 69 76 79 2d 74 65 78 74 29 29 | ......(re.(ivy--regex.ivy-text)) |
| ab00 | 0a 20 20 20 20 20 20 20 20 28 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 28 69 76 79 2d | .........(case-fold-search.(ivy- |
| ab20 | 2d 63 61 73 65 2d 66 6f 6c 64 2d 70 20 69 76 79 2d 74 65 78 74 29 29 29 0a 20 20 20 20 28 69 66 | -case-fold-p.ivy-text))).....(if |
| ab40 | 20 28 6e 75 6c 6c 20 78 29 0a 20 20 20 20 20 20 20 20 28 75 73 65 72 2d 65 72 72 6f 72 20 22 4e | .(null.x).........(user-error."N |
| ab60 | 6f 20 63 61 6e 64 69 64 61 74 65 73 22 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 | o.candidates").......(with-ivy-w |
| ab80 | 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 71 75 61 6c 20 28 63 75 | indow.........(unless.(equal.(cu |
| aba0 | 72 72 65 6e 74 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rrent-buffer)................... |
| abc0 | 20 20 20 20 20 28 69 76 79 2d 73 74 61 74 65 2d 62 75 66 66 65 72 20 69 76 79 2d 6c 61 73 74 29 | .....(ivy-state-buffer.ivy-last) |
| abe0 | 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 28 69 | )...........(switch-to-buffer.(i |
| ac00 | 76 79 2d 73 74 61 74 65 2d 62 75 66 66 65 72 20 69 76 79 2d 6c 61 73 74 29 29 29 0a 20 20 20 20 | vy-state-buffer.ivy-last)))..... |
| ac20 | 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 62 75 66 | ....(goto-char..........(if.(buf |
| ac40 | 66 65 72 2d 6e 61 72 72 6f 77 65 64 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 | fer-narrowed-p)..............swi |
| ac60 | 70 65 72 2d 2d 70 6f 69 6e 74 2d 6d 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 | per--point-min............(point |
| ac80 | 2d 6d 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 69 66 20 73 77 69 | -min))).........(funcall.(if.swi |
| aca0 | 70 65 72 2d 75 73 65 2d 76 69 73 75 61 6c 2d 6c 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 | per-use-visual-line............. |
| acc0 | 20 20 20 20 20 20 20 20 20 23 27 6c 69 6e 65 2d 6d 6f 76 65 0a 20 20 20 20 20 20 20 20 20 20 20 | .........#'line-move............ |
| ace0 | 20 20 20 20 20 20 20 20 23 27 66 6f 72 77 61 72 64 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 | ........#'forward-line)......... |
| ad00 | 20 20 20 20 20 20 20 20 20 6c 6e 29 0a 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 | .........ln).........(when.(and. |
| ad20 | 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 72 65 20 28 6c 69 6e 65 2d 65 6e 64 2d | (re-search-forward.re.(line-end- |
| ad40 | 70 6f 73 69 74 69 6f 6e 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | position).t).................... |
| ad60 | 73 77 69 70 65 72 2d 67 6f 74 6f 2d 73 74 61 72 74 2d 6f 66 2d 6d 61 74 63 68 29 0a 20 20 20 20 | swiper-goto-start-of-match)..... |
| ad80 | 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e | ......(goto-char.(match-beginnin |
| ada0 | 67 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 65 6e 73 75 72 65 2d 76 | g.0))).........(swiper--ensure-v |
| adc0 | 69 73 69 62 6c 65 29 0a 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 6d 61 79 62 65 2d 72 | isible).........(swiper--maybe-r |
| ade0 | 65 63 65 6e 74 65 72 29 0a 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 70 75 73 68 2d 6d | ecenter).........(swiper--push-m |
| ae00 | 61 72 6b 29 0a 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 72 65 6d 65 6d 62 65 72 2d 73 | ark).........(swiper--remember-s |
| ae20 | 65 61 72 63 68 2d 68 69 73 74 6f 72 79 20 72 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 | earch-history.re)))))..(defun.sw |
| ae40 | 69 70 65 72 2d 2d 72 65 6d 65 6d 62 65 72 2d 73 65 61 72 63 68 2d 68 69 73 74 6f 72 79 20 28 72 | iper--remember-search-history.(r |
| ae60 | 65 29 0a 20 20 22 41 64 64 20 74 68 65 20 73 65 61 72 63 68 20 70 61 74 74 65 72 6e 20 52 45 20 | e)..."Add.the.search.pattern.RE. |
| ae80 | 74 6f 20 74 68 65 20 73 65 61 72 63 68 20 68 69 73 74 6f 72 79 20 72 69 6e 67 2e 22 0a 20 20 28 | to.the.search.history.ring."...( |
| aea0 | 61 64 64 2d 74 6f 2d 68 69 73 74 6f 72 79 0a 20 20 20 27 72 65 67 65 78 70 2d 73 65 61 72 63 68 | add-to-history....'regexp-search |
| aec0 | 2d 72 69 6e 67 0a 20 20 20 72 65 0a 20 20 20 72 65 67 65 78 70 2d 73 65 61 72 63 68 2d 72 69 6e | -ring....re....regexp-search-rin |
| aee0 | 67 2d 6d 61 78 29 0a 20 20 3b 3b 20 69 6e 74 65 67 72 61 74 69 6f 6e 20 77 69 74 68 20 65 76 69 | g-max)...;;.integration.with.evi |
| af00 | 6c 2d 6d 6f 64 65 27 73 20 73 65 61 72 63 68 0a 20 20 28 77 68 65 6e 20 28 62 6f 75 6e 64 2d 61 | l-mode's.search...(when.(bound-a |
| af20 | 6e 64 2d 74 72 75 65 2d 70 20 65 76 69 6c 2d 6d 6f 64 65 29 0a 20 20 20 20 28 77 68 65 6e 20 28 | nd-true-p.evil-mode).....(when.( |
| af40 | 65 71 20 65 76 69 6c 2d 73 65 61 72 63 68 2d 6d 6f 64 75 6c 65 20 27 69 73 65 61 72 63 68 29 0a | eq.evil-search-module.'isearch). |
| af60 | 20 20 20 20 20 20 28 73 65 74 71 20 69 73 65 61 72 63 68 2d 73 74 72 69 6e 67 20 69 76 79 2d 74 | ......(setq.isearch-string.ivy-t |
| af80 | 65 78 74 29 29 0a 20 20 20 20 28 77 68 65 6e 20 28 65 71 20 65 76 69 6c 2d 73 65 61 72 63 68 2d | ext)).....(when.(eq.evil-search- |
| afa0 | 6d 6f 64 75 6c 65 20 27 65 76 69 6c 2d 73 65 61 72 63 68 29 0a 20 20 20 20 20 20 28 61 64 64 2d | module.'evil-search).......(add- |
| afc0 | 74 6f 2d 68 69 73 74 6f 72 79 20 27 65 76 69 6c 2d 65 78 2d 73 65 61 72 63 68 2d 68 69 73 74 6f | to-history.'evil-ex-search-histo |
| afe0 | 72 79 20 72 65 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 65 76 69 6c 2d 65 78 2d 73 65 61 72 63 | ry.re).......(setq.evil-ex-searc |
| b000 | 68 2d 70 61 74 74 65 72 6e 20 28 6c 69 73 74 20 72 65 20 74 20 74 29 29 0a 20 20 20 20 20 20 28 | h-pattern.(list.re.t.t)).......( |
| b020 | 73 65 74 71 20 65 76 69 6c 2d 65 78 2d 73 65 61 72 63 68 2d 64 69 72 65 63 74 69 6f 6e 20 27 66 | setq.evil-ex-search-direction.'f |
| b040 | 6f 72 77 61 72 64 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 65 76 69 6c 2d 65 78 2d 73 65 61 72 | orward).......(when.evil-ex-sear |
| b060 | 63 68 2d 70 65 72 73 69 73 74 65 6e 74 2d 68 69 67 68 6c 69 67 68 74 0a 20 20 20 20 20 20 20 20 | ch-persistent-highlight......... |
| b080 | 28 65 76 69 6c 2d 65 78 2d 73 65 61 72 63 68 2d 61 63 74 69 76 61 74 65 2d 68 69 67 68 6c 69 67 | (evil-ex-search-activate-highlig |
| b0a0 | 68 74 20 65 76 69 6c 2d 65 78 2d 73 65 61 72 63 68 2d 70 61 74 74 65 72 6e 29 29 29 29 29 0a 0a | ht.evil-ex-search-pattern))))).. |
| b0c0 | 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 66 72 6f 6d 2d 69 73 65 61 72 63 68 20 28 29 0a 20 20 | (defun.swiper-from-isearch.()... |
| b0e0 | 22 49 6e 76 6f 6b 65 20 60 73 77 69 70 65 72 27 20 66 72 6f 6d 20 69 73 65 61 72 63 68 2e 22 0a | "Invoke.`swiper'.from.isearch.". |
| b100 | 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 73 77 69 70 65 72 20 28 70 72 6f 67 31 | ..(interactive)...(swiper.(prog1 |
| b120 | 20 28 69 66 20 69 73 65 61 72 63 68 2d 72 65 67 65 78 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .(if.isearch-regexp............. |
| b140 | 20 20 20 20 20 20 20 20 20 69 73 65 61 72 63 68 2d 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 | .........isearch-string......... |
| b160 | 20 20 20 20 20 20 20 20 20 20 20 28 72 65 67 65 78 70 2d 71 75 6f 74 65 20 69 73 65 61 72 63 68 | ...........(regexp-quote.isearch |
| b180 | 2d 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 65 61 | -string)).............(let.((sea |
| b1a0 | 72 63 68 2d 6e 6f 6e 69 6e 63 72 65 6d 65 6e 74 61 6c 2d 69 6e 73 74 65 61 64 20 6e 69 6c 29 29 | rch-nonincremental-instead.nil)) |
| b1c0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 73 65 61 72 63 68 2d 65 78 69 74 29 29 29 29 | ...............(isearch-exit)))) |
| b1e0 | 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 62 75 66 66 65 72 73 20 | )..(defvar.swiper-multi-buffers. |
| b200 | 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 73 74 20 6f 66 | nil..."Store.the.current.list.of |
| b220 | 20 62 75 66 66 65 72 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 6d 75 6c 74 | .buffers.")..(defvar.swiper-mult |
| b240 | 69 2d 63 61 6e 64 69 64 61 74 65 73 20 6e 69 6c 0a 20 20 22 53 74 6f 72 65 20 74 68 65 20 6c 69 | i-candidates.nil..."Store.the.li |
| b260 | 73 74 20 6f 66 20 63 61 6e 64 69 64 61 74 65 73 20 66 6f 72 20 60 73 77 69 70 65 72 2d 6d 75 6c | st.of.candidates.for.`swiper-mul |
| b280 | 74 69 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 70 72 6f 6d | ti'.")..(defun.swiper-multi-prom |
| b2a0 | 70 74 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 70 72 6f 6d 70 74 20 66 6f 72 20 60 73 77 69 70 | pt.()..."Return.prompt.for.`swip |
| b2c0 | 65 72 2d 6d 75 6c 74 69 27 2e 22 0a 20 20 28 66 6f 72 6d 61 74 20 22 42 75 66 66 65 72 73 20 28 | er-multi'."...(format."Buffers.( |
| b2e0 | 25 73 29 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 69 64 | %s):."...........(mapconcat.#'id |
| b300 | 65 6e 74 69 74 79 20 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 62 75 66 66 65 72 73 20 22 2c 20 22 | entity.swiper-multi-buffers.",." |
| b320 | 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 77 69 6e 64 6f 77 2d 77 69 64 74 68 | )))..(defvar.swiper-window-width |
| b340 | 20 38 30 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 6d 75 6c 74 69 20 28 29 0a 20 20 22 | .80)..(defun.swiper-multi.()..." |
| b360 | 53 65 6c 65 63 74 20 6f 6e 65 20 6f 72 20 6d 6f 72 65 20 62 75 66 66 65 72 73 2e 0a 52 75 6e 20 | Select.one.or.more.buffers..Run. |
| b380 | 60 73 77 69 70 65 72 27 20 66 6f 72 20 74 68 6f 73 65 20 62 75 66 66 65 72 73 2e 22 0a 20 20 28 | `swiper'.for.those.buffers."...( |
| b3a0 | 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 6d 75 6c 74 | interactive)...(setq.swiper-mult |
| b3c0 | 69 2d 62 75 66 66 65 72 73 20 6e 69 6c 29 0a 20 20 28 6c 65 74 20 28 28 69 76 79 2d 75 73 65 2d | i-buffers.nil)...(let.((ivy-use- |
| b3e0 | 76 69 72 74 75 61 6c 2d 62 75 66 66 65 72 73 20 6e 69 6c 29 29 0a 20 20 20 20 28 69 76 79 2d 72 | virtual-buffers.nil)).....(ivy-r |
| b400 | 65 61 64 20 28 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 70 72 6f 6d 70 74 29 0a 20 20 20 20 20 20 | ead.(swiper-multi-prompt)....... |
| b420 | 20 20 20 20 20 20 20 20 23 27 69 6e 74 65 72 6e 61 6c 2d 63 6f 6d 70 6c 65 74 65 2d 62 75 66 66 | ........#'internal-complete-buff |
| b440 | 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 73 77 69 70 65 | er...............:action.#'swipe |
| b460 | 72 2d 6d 75 6c 74 69 2d 61 63 74 69 6f 6e 2d 31 29 29 0a 20 20 28 6c 65 74 20 28 28 73 77 69 70 | r-multi-action-1))...(let.((swip |
| b480 | 65 72 2d 77 69 6e 64 6f 77 2d 77 69 64 74 68 20 28 2d 20 28 2d 20 28 66 72 61 6d 65 2d 77 69 64 | er-window-width.(-.(-.(frame-wid |
| b4a0 | 74 68 29 20 28 69 66 20 28 64 69 73 70 6c 61 79 2d 67 72 61 70 68 69 63 2d 70 29 20 30 20 31 29 | th).(if.(display-graphic-p).0.1) |
| b4c0 | 29 20 34 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 22 53 77 69 70 65 72 3a 20 22 20 | ).4))).....(ivy-read."Swiper:.". |
| b4e0 | 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 | swiper-multi-candidates......... |
| b500 | 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 61 63 74 | ......:action.#'swiper-multi-act |
| b520 | 69 6f 6e 2d 32 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 73 77 69 | ion-2...............:caller.'swi |
| b540 | 70 65 72 2d 6d 75 6c 74 69 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 73 77 | per-multi)))..(ivy-configure.'sw |
| b560 | 69 70 65 72 2d 6d 75 6c 74 69 0a 20 20 3a 75 6e 77 69 6e 64 2d 66 6e 20 23 27 73 77 69 70 65 72 | iper-multi...:unwind-fn.#'swiper |
| b580 | 2d 2d 63 6c 65 61 6e 75 70 0a 20 20 3a 69 6e 64 65 78 2d 66 6e 20 23 27 69 76 79 2d 72 65 63 6f | --cleanup...:index-fn.#'ivy-reco |
| b5a0 | 6d 70 75 74 65 2d 69 6e 64 65 78 2d 73 77 69 70 65 72 0a 20 20 3a 66 6f 72 6d 61 74 2d 66 6e 20 | mpute-index-swiper...:format-fn. |
| b5c0 | 23 27 73 77 69 70 65 72 2d 2d 61 6c 6c 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 0a | #'swiper--all-format-function).. |
| b5e0 | 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 61 63 74 69 6f 6e 2d 31 20 28 78 29 | (defun.swiper-multi-action-1.(x) |
| b600 | 0a 20 20 22 41 64 64 20 58 20 74 6f 20 6c 69 73 74 20 6f 66 20 73 65 6c 65 63 74 65 64 20 62 75 | ..."Add.X.to.list.of.selected.bu |
| b620 | 66 66 65 72 73 20 60 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 62 75 66 66 65 72 73 27 2e 0a 49 66 | ffers.`swiper-multi-buffers'..If |
| b640 | 20 58 20 69 73 20 61 6c 72 65 61 64 79 20 70 61 72 74 20 6f 66 20 74 68 65 20 6c 69 73 74 2c 20 | .X.is.already.part.of.the.list,. |
| b660 | 72 65 6d 6f 76 65 20 69 74 20 69 6e 73 74 65 61 64 2e 20 20 51 75 69 74 20 74 68 65 20 73 65 6c | remove.it.instead...Quit.the.sel |
| b680 | 65 63 74 69 6f 6e 20 69 66 0a 58 20 69 73 20 73 65 6c 65 63 74 65 64 20 62 79 20 65 69 74 68 65 | ection.if.X.is.selected.by.eithe |
| b6a0 | 72 20 60 69 76 79 2d 64 6f 6e 65 27 2c 20 60 69 76 79 2d 61 6c 74 2d 64 6f 6e 65 27 20 6f 72 20 | r.`ivy-done',.`ivy-alt-done'.or. |
| b6c0 | 60 69 76 79 2d 69 6d 6d 65 64 69 61 74 65 2d 64 6f 6e 65 27 2c 0a 6f 74 68 65 72 77 69 73 65 20 | `ivy-immediate-done',.otherwise. |
| b6e0 | 63 6f 6e 74 69 6e 75 65 20 70 72 6f 6d 70 74 69 6e 67 20 66 6f 72 20 62 75 66 66 65 72 73 2e 22 | continue.prompting.for.buffers." |
| b700 | 0a 20 20 28 69 66 20 28 6d 65 6d 62 65 72 20 78 20 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 62 75 | ...(if.(member.x.swiper-multi-bu |
| b720 | 66 66 65 72 73 29 0a 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 28 73 65 74 | ffers).......(progn.........(set |
| b740 | 71 20 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 62 75 66 66 65 72 73 20 28 64 65 6c 65 74 65 20 78 | q.swiper-multi-buffers.(delete.x |
| b760 | 20 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 62 75 66 66 65 72 73 29 29 29 0a 20 20 20 20 28 75 6e | .swiper-multi-buffers))).....(un |
| b780 | 6c 65 73 73 20 28 65 71 75 61 6c 20 78 20 22 22 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 77 | less.(equal.x."").......(setq.sw |
| b7a0 | 69 70 65 72 2d 6d 75 6c 74 69 2d 62 75 66 66 65 72 73 20 28 61 70 70 65 6e 64 20 73 77 69 70 65 | iper-multi-buffers.(append.swipe |
| b7c0 | 72 2d 6d 75 6c 74 69 2d 62 75 66 66 65 72 73 20 28 6c 69 73 74 20 78 29 29 29 29 29 0a 20 20 28 | r-multi-buffers.(list.x)))))...( |
| b7e0 | 6c 65 74 20 28 28 70 72 6f 6d 70 74 20 28 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 70 72 6f 6d 70 | let.((prompt.(swiper-multi-promp |
| b800 | 74 29 29 29 0a 20 20 20 20 28 73 65 74 66 20 28 69 76 79 2d 73 74 61 74 65 2d 70 72 6f 6d 70 74 | t))).....(setf.(ivy-state-prompt |
| b820 | 20 69 76 79 2d 6c 61 73 74 29 20 70 72 6f 6d 70 74 29 0a 20 20 20 20 28 73 65 74 71 20 69 76 79 | .ivy-last).prompt).....(setq.ivy |
| b840 | 2d 2d 70 72 6f 6d 70 74 20 28 63 6f 6e 63 61 74 20 22 25 2d 34 64 20 22 20 70 72 6f 6d 70 74 29 | --prompt.(concat."%-4d.".prompt) |
| b860 | 29 29 0a 20 20 28 63 6f 6e 64 20 28 28 6d 65 6d 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 | ))...(cond.((memq.this-command.' |
| b880 | 28 69 76 79 2d 64 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (ivy-done....................... |
| b8a0 | 20 20 20 20 20 20 20 20 69 76 79 2d 61 6c 74 2d 64 6f 6e 65 0a 20 20 20 20 20 20 20 20 20 20 20 | ........ivy-alt-done............ |
| b8c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 76 79 2d 69 6d 6d 65 64 69 61 74 65 | ...................ivy-immediate |
| b8e0 | 2d 64 6f 6e 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 6d 75 | -done))..........(setq.swiper-mu |
| b900 | 6c 74 69 2d 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 | lti-candidates................(s |
| b920 | 77 69 70 65 72 2d 2d 6d 75 6c 74 69 2d 63 61 6e 64 69 64 61 74 65 73 0a 20 20 20 20 20 20 20 20 | wiper--multi-candidates......... |
| b940 | 20 20 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 23 27 67 65 74 2d 62 75 66 66 65 72 20 73 77 69 | ........(mapcar.#'get-buffer.swi |
| b960 | 70 65 72 2d 6d 75 6c 74 69 2d 62 75 66 66 65 72 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 28 | per-multi-buffers)))).........(( |
| b980 | 65 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 69 76 79 2d 63 61 6c 6c 29 0a 20 20 20 20 20 | eq.this-command.'ivy-call)...... |
| b9a0 | 20 20 20 20 28 77 69 74 68 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 28 61 63 74 69 76 | ....(with-selected-window.(activ |
| b9c0 | 65 2d 6d 69 6e 69 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 29 0a 20 20 20 20 20 20 20 20 20 20 20 | e-minibuffer-window)............ |
| b9e0 | 28 64 65 6c 65 74 65 2d 6d 69 6e 69 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 29 29 29 29 29 | (delete-minibuffer-contents))))) |
| ba00 | 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 6d 75 6c 74 69 2d 61 63 74 69 6f 6e 2d 32 20 28 | ..(defun.swiper-multi-action-2.( |
| ba20 | 78 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 63 61 6e 64 69 64 61 74 65 20 58 20 66 72 6f 6d 20 60 | x)..."Move.to.candidate.X.from.` |
| ba40 | 73 77 69 70 65 72 2d 6d 75 6c 74 69 27 2e 22 0a 20 20 28 77 68 65 6e 20 28 3e 20 28 6c 65 6e 67 | swiper-multi'."...(when.(>.(leng |
| ba60 | 74 68 20 78 29 20 30 29 0a 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 2d 6e 61 6d 65 20 | th.x).0).....(let.((buffer-name. |
| ba80 | 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 62 75 66 66 65 72 20 78 29 29 | (get-text-property.0.'buffer.x)) |
| baa0 | 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 62 75 66 66 65 72 2d 6e 61 6d 65 0a 20 20 20 20 20 20 | ).......(when.buffer-name....... |
| bac0 | 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 28 73 77 | ..(with-ivy-window...........(sw |
| bae0 | 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 2d 6e 61 6d 65 29 0a 20 20 20 20 | itch-to-buffer.buffer-name)..... |
| bb00 | 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 | ......(goto-char.(point-min))... |
| bb20 | 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 28 31 2d 20 28 73 77 69 70 65 | ........(forward-line.(1-.(swipe |
| bb40 | 72 2d 2d 6c 69 6e 65 2d 6e 75 6d 62 65 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 72 | r--line-number.x)))...........(r |
| bb60 | 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 | e-search-forward............(ivy |
| bb80 | 2d 2d 72 65 67 65 78 20 69 76 79 2d 74 65 78 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 | --regex.ivy-text)............(li |
| bba0 | 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 | ne-end-position).t)...........(f |
| bbc0 | 75 6e 63 61 6c 6c 20 69 73 65 61 72 63 68 2d 66 69 6c 74 65 72 2d 70 72 65 64 69 63 61 74 65 0a | uncall.isearch-filter-predicate. |
| bbe0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 | ...................(line-beginni |
| bc00 | 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ng-position).................... |
| bc20 | 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 | (line-end-position))...........( |
| bc40 | 75 6e 6c 65 73 73 20 28 65 71 20 69 76 79 2d 65 78 69 74 20 27 64 6f 6e 65 29 0a 20 20 20 20 20 | unless.(eq.ivy-exit.'done)...... |
| bc60 | 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 29 0a 20 20 20 20 20 20 20 | .......(swiper--cleanup)........ |
| bc80 | 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 61 64 64 2d 6f 76 65 72 6c 61 79 73 20 28 69 76 79 2d | .....(swiper--add-overlays.(ivy- |
| bca0 | 2d 72 65 67 65 78 20 69 76 79 2d 74 65 78 74 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 | -regex.ivy-text))))))))..(defun. |
| bcc0 | 73 77 69 70 65 72 2d 61 6c 6c 2d 62 75 66 66 65 72 2d 70 20 28 62 75 66 66 65 72 29 0a 20 20 22 | swiper-all-buffer-p.(buffer)..." |
| bce0 | 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 42 55 46 46 45 52 20 73 68 6f 75 6c 64 20 | Return.non-nil.if.BUFFER.should. |
| bd00 | 62 65 20 63 6f 6e 73 69 64 65 72 65 64 20 62 79 20 60 73 77 69 70 65 72 2d 61 6c 6c 27 2e 22 0a | be.considered.by.`swiper-all'.". |
| bd20 | 20 20 28 6c 65 74 20 28 28 6d 6f 64 65 20 28 62 75 66 66 65 72 2d 6c 6f 63 61 6c 2d 76 61 6c 75 | ..(let.((mode.(buffer-local-valu |
| bd40 | 65 20 27 6d 61 6a 6f 72 2d 6d 6f 64 65 20 28 67 65 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 | e.'major-mode.(get-buffer.buffer |
| bd60 | 29 29 29 29 0a 20 20 20 20 28 63 6f 6e 64 0a 20 20 20 20 20 20 3b 3b 20 49 67 6e 6f 72 65 20 54 | )))).....(cond.......;;.Ignore.T |
| bd80 | 41 47 53 20 62 75 66 66 65 72 73 2c 20 74 68 65 79 20 74 65 6e 64 20 74 6f 20 61 64 64 20 64 75 | AGS.buffers,.they.tend.to.add.du |
| bda0 | 70 6c 69 63 61 74 65 20 72 65 73 75 6c 74 73 2e 0a 20 20 20 20 20 20 28 28 65 71 20 6d 6f 64 65 | plicate.results........((eq.mode |
| bdc0 | 20 23 27 74 61 67 73 2d 74 61 62 6c 65 2d 6d 6f 64 65 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 3b | .#'tags-table-mode).nil).......; |
| bde0 | 3b 20 41 6c 77 61 79 73 20 63 6f 6e 73 69 64 65 72 20 64 69 72 65 64 20 62 75 66 66 65 72 73 2c | ;.Always.consider.dired.buffers, |
| be00 | 20 65 76 65 6e 20 74 68 6f 75 67 68 20 74 68 65 79 27 72 65 20 6e 6f 74 20 62 61 63 6b 65 64 0a | .even.though.they're.not.backed. |
| be20 | 20 20 20 20 20 20 3b 3b 20 62 79 20 61 20 66 69 6c 65 2e 0a 20 20 20 20 20 20 28 28 65 71 20 6d | ......;;.by.a.file........((eq.m |
| be40 | 6f 64 65 20 23 27 64 69 72 65 64 2d 6d 6f 64 65 29 20 74 29 0a 20 20 20 20 20 20 3b 3b 20 41 6c | ode.#'dired-mode).t).......;;.Al |
| be60 | 77 61 79 73 20 63 6f 6e 73 69 64 65 72 20 73 74 61 73 68 20 62 75 66 66 65 72 73 20 74 6f 6f 2c | ways.consider.stash.buffers.too, |
| be80 | 20 61 73 20 74 68 65 79 20 6d 61 79 20 68 61 76 65 0a 20 20 20 20 20 20 3b 3b 20 69 6e 74 65 72 | .as.they.may.have.......;;.inter |
| bea0 | 65 73 74 69 6e 67 20 63 6f 6e 74 65 6e 74 20 6e 6f 74 20 70 72 65 73 65 6e 74 20 69 6e 20 61 6e | esting.content.not.present.in.an |
| bec0 | 79 20 62 75 66 66 65 72 73 2e 20 57 65 20 64 6f 6e 27 74 20 23 27 0a 20 20 20 20 20 20 3b 3b 20 | y.buffers..We.don't.#'.......;;. |
| bee0 | 71 75 6f 74 65 20 74 6f 20 73 61 74 69 73 66 79 20 74 68 65 20 62 79 74 65 2d 63 6f 6d 70 69 6c | quote.to.satisfy.the.byte-compil |
| bf00 | 65 72 2e 0a 20 20 20 20 20 20 28 28 65 71 20 6d 6f 64 65 20 27 6d 61 67 69 74 2d 73 74 61 73 68 | er........((eq.mode.'magit-stash |
| bf20 | 2d 6d 6f 64 65 29 20 74 29 0a 20 20 20 20 20 20 3b 3b 20 45 6d 61 69 6c 20 62 75 66 66 65 72 73 | -mode).t).......;;.Email.buffers |
| bf40 | 20 68 61 76 65 20 6e 6f 20 66 69 6c 65 2c 20 62 75 74 20 61 72 65 20 75 73 65 66 75 6c 20 74 6f | .have.no.file,.but.are.useful.to |
| bf60 | 20 73 65 61 72 63 68 0a 20 20 20 20 20 20 28 28 65 71 20 6d 6f 64 65 20 27 67 6e 75 73 2d 61 72 | .search.......((eq.mode.'gnus-ar |
| bf80 | 74 69 63 6c 65 2d 6d 6f 64 65 29 20 74 29 0a 20 20 20 20 20 20 3b 3b 20 4f 74 68 65 72 77 69 73 | ticle-mode).t).......;;.Otherwis |
| bfa0 | 65 2c 20 6f 6e 6c 79 20 63 6f 6e 73 69 64 65 72 20 74 68 65 20 66 69 6c 65 20 69 66 20 69 74 27 | e,.only.consider.the.file.if.it' |
| bfc0 | 73 20 62 61 63 6b 65 64 20 62 79 20 61 20 66 69 6c 65 2e 0a 20 20 20 20 20 20 28 74 20 28 62 75 | s.backed.by.a.file........(t.(bu |
| bfe0 | 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 29 29 29 29 29 0a 0a 3b 3b 2a 20 | ffer-file-name.buffer)))))..;;*. |
| c000 | 60 73 77 69 70 65 72 2d 61 6c 6c 27 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 61 6c 6c 2d 66 | `swiper-all'.(defun.swiper-all-f |
| c020 | 75 6e 63 74 69 6f 6e 20 28 73 74 72 29 0a 20 20 22 53 65 61 72 63 68 20 69 6e 20 61 6c 6c 20 6f | unction.(str)..."Search.in.all.o |
| c040 | 70 65 6e 20 62 75 66 66 65 72 73 20 66 6f 72 20 53 54 52 2e 22 0a 20 20 28 6f 72 0a 20 20 20 28 | pen.buffers.for.STR."...(or....( |
| c060 | 69 76 79 2d 6d 6f 72 65 2d 63 68 61 72 73 29 0a 20 20 20 28 6c 65 74 2a 20 28 28 62 75 66 66 65 | ivy-more-chars)....(let*.((buffe |
| c080 | 72 73 20 28 63 6c 2d 72 65 6d 6f 76 65 2d 69 66 2d 6e 6f 74 20 23 27 73 77 69 70 65 72 2d 61 6c | rs.(cl-remove-if-not.#'swiper-al |
| c0a0 | 6c 2d 62 75 66 66 65 72 2d 70 20 28 62 75 66 66 65 72 2d 6c 69 73 74 29 29 29 0a 20 20 20 20 20 | l-buffer-p.(buffer-list)))...... |
| c0c0 | 20 20 20 20 20 28 72 65 2d 66 75 6c 6c 20 69 76 79 2d 72 65 67 65 78 29 0a 20 20 20 20 20 20 20 | .....(re-full.ivy-regex)........ |
| c0e0 | 20 20 20 72 65 20 72 65 2d 74 61 69 6c 0a 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 73 20 6d 61 | ...re.re-tail...........cands.ma |
| c100 | 74 63 68 0a 20 20 20 20 20 20 20 20 20 20 28 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 | tch...........(case-fold-search. |
| c120 | 28 69 76 79 2d 2d 63 61 73 65 2d 66 6f 6c 64 2d 70 20 73 74 72 29 29 29 0a 20 20 20 20 20 28 73 | (ivy--case-fold-p.str)))......(s |
| c140 | 65 74 71 20 72 65 20 28 69 76 79 2d 72 65 2d 74 6f 2d 73 74 72 20 72 65 2d 66 75 6c 6c 29 29 0a | etq.re.(ivy-re-to-str.re-full)). |
| c160 | 20 20 20 20 20 28 77 68 65 6e 20 28 63 6f 6e 73 70 20 72 65 2d 66 75 6c 6c 29 0a 20 20 20 20 20 | .....(when.(consp.re-full)...... |
| c180 | 20 20 28 73 65 74 71 20 72 65 2d 74 61 69 6c 20 28 63 64 72 20 72 65 2d 66 75 6c 6c 29 29 29 0a | ..(setq.re-tail.(cdr.re-full))). |
| c1a0 | 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 62 75 66 66 65 72 20 62 75 66 66 65 72 73 29 0a 20 20 | .....(dolist.(buffer.buffers)... |
| c1c0 | 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 | .....(with-current-buffer.buffer |
| c1e0 | 0a 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 | ..........(save-excursion....... |
| c200 | 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 | .....(goto-char.(point-min)).... |
| c220 | 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 | ........(while.(re-search-forwar |
| c240 | 64 20 72 65 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6d | d.re.nil.t)..............(setq.m |
| c260 | 61 74 63 68 20 28 69 66 20 28 6d 65 6d 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 28 6f 72 67 2d | atch.(if.(memq.major-mode.'(org- |
| c280 | 6d 6f 64 65 20 64 69 72 65 64 2d 6d 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mode.dired-mode))............... |
| c2a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 | ...............(buffer-substring |
| c2c0 | 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -no-properties.................. |
| c2e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 | .............(line-beginning-pos |
| c300 | 69 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ition).......................... |
| c320 | 20 20 20 20 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 | .....(line-end-position))....... |
| c340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 75 62 | .....................(buffer-sub |
| c360 | 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | string.......................... |
| c380 | 20 20 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 0a 20 20 20 | ...(line-beginning-position).... |
| c3a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 65 | .........................(line-e |
| c3c0 | 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 | nd-position))))..............(pu |
| c3e0 | 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 | t-text-property...............0. |
| c400 | 31 20 27 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d | 1.'buffer...............(buffer- |
| c420 | 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 61 74 63 68 29 0a 20 20 20 20 20 | name)...............match)...... |
| c440 | 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 31 20 27 | ........(put-text-property.0.1.' |
| c460 | 70 6f 69 6e 74 20 28 70 6f 69 6e 74 29 20 6d 61 74 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 | point.(point).match)............ |
| c480 | 20 20 28 77 68 65 6e 20 28 6f 72 20 28 6e 75 6c 6c 20 72 65 2d 74 61 69 6c 29 20 28 69 76 79 2d | ..(when.(or.(null.re-tail).(ivy- |
| c4a0 | 72 65 2d 6d 61 74 63 68 20 72 65 2d 74 61 69 6c 20 6d 61 74 63 68 29 29 0a 20 20 20 20 20 20 20 | re-match.re-tail.match))........ |
| c4c0 | 20 20 20 20 20 20 20 20 28 70 75 73 68 20 6d 61 74 63 68 20 63 61 6e 64 73 29 29 29 29 29 29 0a | ........(push.match.cands)))))). |
| c4e0 | 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 20 72 65 2d 66 75 6c 6c 29 0a | .....(setq.ivy--old-re.re-full). |
| c500 | 20 20 20 20 20 28 69 66 20 28 6e 75 6c 6c 20 63 61 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 28 | .....(if.(null.cands)..........( |
| c520 | 6c 69 73 74 20 22 22 29 0a 20 20 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 63 | list."")........(setq.ivy--old-c |
| c540 | 61 6e 64 73 20 28 6e 72 65 76 65 72 73 65 20 63 61 6e 64 73 29 29 29 29 29 29 0a 0a 28 64 65 66 | ands.(nreverse.cands))))))..(def |
| c560 | 75 6e 20 73 77 69 70 65 72 2d 2d 61 6c 6c 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 20 28 | un.swiper--all-format-function.( |
| c580 | 63 61 6e 64 73 29 0a 20 20 22 46 6f 72 6d 61 74 20 43 41 4e 44 53 20 66 6f 72 20 60 73 77 69 70 | cands)..."Format.CANDS.for.`swip |
| c5a0 | 65 72 2d 61 6c 6c 27 2e 0a 53 65 65 20 60 69 76 79 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f | er-all'..See.`ivy-format-functio |
| c5c0 | 6e 73 2d 61 6c 69 73 74 27 20 66 6f 72 20 66 75 72 74 68 65 72 20 69 6e 66 6f 72 6d 61 74 69 6f | ns-alist'.for.further.informatio |
| c5e0 | 6e 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 77 77 20 73 77 69 70 65 72 2d 77 69 6e 64 6f 77 2d 77 | n."...(let*.((ww.swiper-window-w |
| c600 | 69 64 74 68 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6c 32 20 31 29 0a 20 20 20 20 20 20 20 20 | idth)..........(col2.1)......... |
| c620 | 20 28 63 61 6e 64 73 2d 77 69 74 68 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 28 6d | .(cands-with-buffer...........(m |
| c640 | 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | apcar.(lambda.(s)............... |
| c660 | 20 20 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 | ......(let.((buffer.(get-text-pr |
| c680 | 6f 70 65 72 74 79 20 30 20 27 62 75 66 66 65 72 20 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 | operty.0.'buffer.s)))........... |
| c6a0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 63 6f 6c 32 20 28 6d 61 78 20 63 6f 6c 32 | ............(setq.col2.(max.col2 |
| c6c0 | 20 28 6c 65 6e 67 74 68 20 62 75 66 66 65 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(length.buffer))).............. |
| c6e0 | 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 73 20 62 75 66 66 65 72 29 29 29 20 63 61 6e 64 73 | .........(cons.s.buffer))).cands |
| c700 | 29 29 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6c 31 20 28 2d 20 77 77 20 34 20 63 6f 6c 32 29 29 | ))..........(col1.(-.ww.4.col2)) |
| c720 | 29 0a 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 73 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 | ).....(setq.cands...........(map |
| c740 | 63 61 72 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | car.(lambda.(x)................. |
| c760 | 20 20 20 20 28 69 66 20 28 63 64 72 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ....(if.(cdr.x)................. |
| c780 | 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 73 20 28 69 76 79 2d 2d 74 72 75 6e 63 61 74 65 2d | ........(let.((s.(ivy--truncate- |
| c7a0 | 73 74 72 69 6e 67 20 28 63 61 72 20 78 29 20 63 6f 6c 31 29 29 29 0a 20 20 20 20 20 20 20 20 20 | string.(car.x).col1))).......... |
| c7c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 | .................(concat........ |
| c7e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 0a 20 20 20 20 20 20 20 20 20 20 | ....................s........... |
| c800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 6b 65 2d 73 74 72 69 6e 67 0a 20 20 | .................(make-string... |
| c820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 78 20 30 | ..........................(max.0 |
| c840 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| c860 | 20 20 28 2d 20 77 77 20 28 73 74 72 69 6e 67 2d 77 69 64 74 68 20 73 29 20 28 6c 65 6e 67 74 68 | ..(-.ww.(string-width.s).(length |
| c880 | 20 28 63 64 72 20 78 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(cdr.x))))..................... |
| c8a0 | 20 20 20 20 20 20 20 20 3f 5c 20 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ........?\.).................... |
| c8c0 | 20 20 20 20 20 20 20 20 28 63 64 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ........(cdr.x)))............... |
| c8e0 | 20 20 20 20 20 20 20 20 28 63 61 72 20 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ........(car.x)))............... |
| c900 | 20 20 20 20 63 61 6e 64 73 2d 77 69 74 68 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 28 69 76 79 | ....cands-with-buffer)).....(ivy |
| c920 | 2d 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 2d 67 65 6e 65 72 69 63 0a 20 20 20 20 20 28 | --format-function-generic......( |
| c940 | 6c 61 6d 62 64 61 20 28 73 74 72 29 0a 20 20 20 20 20 20 20 28 69 76 79 2d 2d 61 64 64 2d 66 61 | lambda.(str)........(ivy--add-fa |
| c960 | 63 65 20 73 74 72 20 27 69 76 79 2d 63 75 72 72 65 6e 74 2d 6d 61 74 63 68 29 29 0a 20 20 20 20 | ce.str.'ivy-current-match))..... |
| c980 | 20 28 6c 61 6d 62 64 61 20 28 73 74 72 29 0a 20 20 20 20 20 20 20 73 74 72 29 0a 20 20 20 20 20 | .(lambda.(str)........str)...... |
| c9a0 | 63 61 6e 64 73 0a 20 20 20 20 20 22 5c 6e 22 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 77 69 70 | cands......"\n")))..(defvar.swip |
| c9c0 | 65 72 2d 61 6c 6c 2d 6d 61 70 0a 20 20 28 6c 65 74 20 28 28 6d 61 70 20 28 6d 61 6b 65 2d 73 70 | er-all-map...(let.((map.(make-sp |
| c9e0 | 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d | arse-keymap))).....(define-key.m |
| ca00 | 61 70 20 28 6b 62 64 20 22 4d 2d 71 22 29 20 27 73 77 69 70 65 72 2d 61 6c 6c 2d 71 75 65 72 79 | ap.(kbd."M-q").'swiper-all-query |
| ca20 | 2d 72 65 70 6c 61 63 65 29 0a 20 20 20 20 6d 61 70 29 0a 20 20 22 4b 65 79 6d 61 70 20 66 6f 72 | -replace).....map)..."Keymap.for |
| ca40 | 20 60 73 77 69 70 65 72 2d 61 6c 6c 27 2e 22 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 | .`swiper-all'.")..;;;###autoload |
| ca60 | 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 61 6c 6c 20 28 26 6f 70 74 69 6f 6e 61 6c 20 69 6e | .(defun.swiper-all.(&optional.in |
| ca80 | 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 52 75 6e 20 60 73 77 69 70 65 72 27 20 66 6f 72 | itial-input)..."Run.`swiper'.for |
| caa0 | 20 61 6c 6c 20 6f 70 65 6e 20 62 75 66 66 65 72 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 | .all.open.buffers."...(interacti |
| cac0 | 76 65 29 0a 20 20 28 6c 65 74 20 28 28 73 77 69 70 65 72 2d 77 69 6e 64 6f 77 2d 77 69 64 74 68 | ve)...(let.((swiper-window-width |
| cae0 | 20 28 2d 20 28 66 72 61 6d 65 2d 77 69 64 74 68 29 20 28 69 66 20 28 64 69 73 70 6c 61 79 2d 67 | .(-.(frame-width).(if.(display-g |
| cb00 | 72 61 70 68 69 63 2d 70 29 20 30 20 31 29 29 29 29 0a 20 20 20 20 28 69 76 79 2d 72 65 61 64 20 | raphic-p).0.1)))).....(ivy-read. |
| cb20 | 22 73 77 69 70 65 72 2d 61 6c 6c 3a 20 22 20 27 73 77 69 70 65 72 2d 61 6c 6c 2d 66 75 6e 63 74 | "swiper-all:.".'swiper-all-funct |
| cb40 | 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 73 77 69 70 | ion...............:action.#'swip |
| cb60 | 65 72 2d 61 6c 6c 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 79 6e | er-all-action...............:dyn |
| cb80 | 61 6d 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | amic-collection.t............... |
| cba0 | 3a 6b 65 79 6d 61 70 20 73 77 69 70 65 72 2d 61 6c 6c 2d 6d 61 70 0a 20 20 20 20 20 20 20 20 20 | :keymap.swiper-all-map.......... |
| cbc0 | 20 20 20 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 | .....:initial-input.initial-inpu |
| cbe0 | 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 73 77 69 70 65 72 2d | t...............:caller.'swiper- |
| cc00 | 61 6c 6c 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 73 77 69 70 65 72 2d 61 | all)))..(ivy-configure.'swiper-a |
| cc20 | 6c 6c 0a 20 20 3a 75 70 64 61 74 65 2d 66 6e 20 27 61 75 74 6f 0a 20 20 3a 75 6e 77 69 6e 64 2d | ll...:update-fn.'auto...:unwind- |
| cc40 | 66 6e 20 23 27 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 0a 20 20 3a 66 6f 72 6d 61 74 2d 66 | fn.#'swiper--cleanup...:format-f |
| cc60 | 6e 20 23 27 73 77 69 70 65 72 2d 2d 61 6c 6c 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 | n.#'swiper--all-format-function) |
| cc80 | 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 61 6c 6c 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 | ..(defun.swiper-all-action.(x).. |
| cca0 | 20 22 4d 6f 76 65 20 74 6f 20 63 61 6e 64 69 64 61 74 65 20 58 20 66 72 6f 6d 20 60 73 77 69 70 | ."Move.to.candidate.X.from.`swip |
| ccc0 | 65 72 2d 61 6c 6c 27 2e 22 0a 20 20 28 77 68 65 6e 20 28 3e 20 28 6c 65 6e 67 74 68 20 78 29 20 | er-all'."...(when.(>.(length.x). |
| cce0 | 30 29 0a 20 20 20 20 28 6c 65 74 20 28 28 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 67 65 74 2d 74 | 0).....(let.((buffer-name.(get-t |
| cd00 | 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 62 75 66 66 65 72 20 78 29 29 29 0a 20 20 20 20 | ext-property.0.'buffer.x)))..... |
| cd20 | 20 20 28 77 68 65 6e 20 62 75 66 66 65 72 2d 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 28 77 69 74 | ..(when.buffer-name.........(wit |
| cd40 | 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 28 73 77 69 74 63 68 2d 74 | h-ivy-window...........(switch-t |
| cd60 | 6f 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 2d 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 | o-buffer.buffer-name)........... |
| cd80 | 28 67 6f 74 6f 2d 63 68 61 72 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 | (goto-char.(get-text-property.0. |
| cda0 | 27 70 6f 69 6e 74 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 69 73 | 'point.x))...........(funcall.is |
| cdc0 | 65 61 72 63 68 2d 66 69 6c 74 65 72 2d 70 72 65 64 69 63 61 74 65 0a 20 20 20 20 20 20 20 20 20 | earch-filter-predicate.......... |
| cde0 | 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 | ..........(line-beginning-positi |
| ce00 | 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 65 6e 64 | on)....................(line-end |
| ce20 | 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 65 | -position))...........(unless.(e |
| ce40 | 71 20 69 76 79 2d 65 78 69 74 20 27 64 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 | q.ivy-exit.'done).............(s |
| ce60 | 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 | wiper--cleanup).............(swi |
| ce80 | 70 65 72 2d 2d 61 64 64 2d 6f 76 65 72 6c 61 79 73 20 28 69 76 79 2d 2d 72 65 67 65 78 20 69 76 | per--add-overlays.(ivy--regex.iv |
| cea0 | 79 2d 74 65 78 74 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 6d | y-text))))))))..(defun.swiper--m |
| cec0 | 75 6c 74 69 2d 63 61 6e 64 69 64 61 74 65 73 20 28 62 75 66 66 65 72 73 29 0a 20 20 22 45 78 74 | ulti-candidates.(buffers)..."Ext |
| cee0 | 72 61 63 74 20 63 61 6e 64 69 64 61 74 65 73 20 66 72 6f 6d 20 42 55 46 46 45 52 53 2e 22 0a 20 | ract.candidates.from.BUFFERS.".. |
| cf00 | 20 28 6c 65 74 20 28 28 72 65 73 20 6e 69 6c 29 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 62 | .(let.((res.nil)).....(dolist.(b |
| cf20 | 75 66 20 62 75 66 66 65 72 73 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d | uf.buffers).......(with-current- |
| cf40 | 62 75 66 66 65 72 20 62 75 66 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 72 65 73 0a 20 20 20 | buffer.buf.........(setq.res.... |
| cf60 | 20 20 20 20 20 20 20 20 20 20 20 28 6e 63 6f 6e 63 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...........(nconc............... |
| cf80 | 20 28 6d 61 70 63 61 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 | .(mapcar.................(lambda |
| cfa0 | 20 28 73 29 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 31 20 27 62 75 66 | .(s).(put-text-property.0.1.'buf |
| cfc0 | 66 65 72 20 28 62 75 66 66 65 72 2d 6e 61 6d 65 29 20 73 29 20 73 29 0a 20 20 20 20 20 20 20 20 | fer.(buffer-name).s).s)......... |
| cfe0 | 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 63 61 6e 64 69 64 61 74 65 73 20 34 29 29 0a | ........(swiper--candidates.4)). |
| d000 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 73 29 29 29 29 0a 20 20 20 20 72 65 73 29 29 | ...............res)))).....res)) |
| d020 | 0a 0a 3b 3b 2a 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 0a 28 64 65 66 75 6e 20 73 77 | ..;;*.`swiper-isearch'.(defun.sw |
| d040 | 69 70 65 72 2d 69 73 65 61 72 63 68 2d 66 75 6e 63 74 69 6f 6e 20 28 73 74 72 29 0a 20 20 22 43 | iper-isearch-function.(str)..."C |
| d060 | 6f 6c 6c 65 63 74 20 53 54 52 20 6d 61 74 63 68 65 73 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e | ollect.STR.matches.in.the.curren |
| d080 | 74 20 62 75 66 66 65 72 20 66 6f 72 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 2e 22 0a | t.buffer.for.`swiper-isearch'.". |
| d0a0 | 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 28 73 77 69 70 65 72 2d 2d | ..(with-ivy-window.....(swiper-- |
| d0c0 | 69 73 65 61 72 63 68 2d 66 75 6e 63 74 69 6f 6e 20 73 74 72 29 29 29 0a 0a 28 64 65 66 75 6e 20 | isearch-function.str)))..(defun. |
| d0e0 | 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 75 73 61 62 6c 65 2d 70 20 28 29 0a 20 20 28 6f 72 20 73 | swiper-match-usable-p.()...(or.s |
| d100 | 65 61 72 63 68 2d 69 6e 76 69 73 69 62 6c 65 0a 20 20 20 20 20 20 28 6e 6f 74 20 28 63 6c 2d 66 | earch-invisible.......(not.(cl-f |
| d120 | 69 6e 64 2d 69 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 6f 76 29 0a | ind-if.............(lambda.(ov). |
| d140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 76 69 73 69 62 6c 65 2d 70 20 28 6f 76 65 72 | ..............(invisible-p.(over |
| d160 | 6c 61 79 2d 67 65 74 20 6f 76 20 27 69 6e 76 69 73 69 62 6c 65 29 29 29 0a 20 20 20 20 20 20 20 | lay-get.ov.'invisible)))........ |
| d180 | 20 20 20 20 20 28 6f 76 65 72 6c 61 79 73 2d 61 74 20 28 70 6f 69 6e 74 29 29 29 29 29 29 0a 0a | .....(overlays-at.(point)))))).. |
| d1a0 | 28 64 65 66 76 61 72 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 | (defvar.swiper--isearch-backward |
| d1c0 | 20 6e 69 6c 0a 20 20 22 4e 6f 6e 2d 6e 69 6c 20 77 68 65 6e 20 70 65 72 66 6f 72 6d 69 6e 67 20 | .nil..."Non-nil.when.performing. |
| d1e0 | 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 27 2e 22 29 0a 0a 28 64 | `swiper-isearch-backward'.")..(d |
| d200 | 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 66 75 6e 63 74 69 6f 6e 2d 31 20 | efun.swiper--isearch-function-1. |
| d220 | 28 72 65 20 62 61 63 6b 77 61 72 64 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d | (re.backward)...(unless.(string= |
| d240 | 20 72 65 20 22 2e 22 29 0a 20 20 20 20 28 6c 65 74 20 28 63 61 6e 64 73 29 0a 20 20 20 20 20 20 | .re.".").....(let.(cands)....... |
| d260 | 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 | (save-excursion.........(goto-ch |
| d280 | 61 72 20 28 69 66 20 62 61 63 6b 77 61 72 64 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 28 70 6f 69 | ar.(if.backward.(point-max).(poi |
| d2a0 | 6e 74 2d 6d 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 66 | nt-min))).........(while.(and.(f |
| d2c0 | 75 6e 63 61 6c 6c 20 28 69 66 20 62 61 63 6b 77 61 72 64 20 23 27 72 65 2d 73 65 61 72 63 68 2d | uncall.(if.backward.#'re-search- |
| d2e0 | 62 61 63 6b 77 61 72 64 20 23 27 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 29 20 72 65 | backward.#'re-search-forward).re |
| d300 | 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 | .nil.t).....................(not |
| d320 | 20 28 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(and........................... |
| d340 | 28 3d 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 20 28 6d 61 74 63 68 2d 65 6e | (=.(match-beginning.0).(match-en |
| d360 | 64 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d.0))........................... |
| d380 | 28 69 66 20 62 61 63 6b 77 61 72 64 20 28 62 6f 62 70 29 20 28 65 6f 62 70 29 29 29 29 29 0a 20 | (if.backward.(bobp).(eobp))))).. |
| d3a0 | 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 77 69 70 65 72 2d 6d 61 74 63 68 2d 75 73 61 | .........(when.(swiper-match-usa |
| d3c0 | 62 6c 65 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 6f 73 20 28 69 | ble-p).............(let.((pos.(i |
| d3e0 | 66 20 28 6f 72 20 62 61 63 6b 77 61 72 64 20 73 77 69 70 65 72 2d 67 6f 74 6f 2d 73 74 61 72 74 | f.(or.backward.swiper-goto-start |
| d400 | 2d 6f 66 2d 6d 61 74 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -of-match)...................... |
| d420 | 20 20 20 20 20 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 0a 20 20 20 20 20 20 | ......(match-beginning.0)....... |
| d440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 69 6e 74 29 29 29 29 0a 20 20 | ...................(point))))... |
| d460 | 20 20 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 70 6f 73 20 63 61 6e 64 73 29 29 29 0a 20 | ............(push.pos.cands))).. |
| d480 | 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 3d 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 | .........(when.(=.(match-beginni |
| d4a0 | 6e 67 20 30 29 20 28 6d 61 74 63 68 2d 65 6e 64 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ng.0).(match-end.0))............ |
| d4c0 | 20 28 69 66 20 62 61 63 6b 77 61 72 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 | .(if.backward.................(b |
| d4e0 | 61 63 6b 77 61 72 64 2d 63 68 61 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 | ackward-char)...............(for |
| d500 | 77 61 72 64 2d 63 68 61 72 29 29 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 62 61 63 6b 77 61 72 | ward-char))))).......(if.backwar |
| d520 | 64 0a 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 73 0a 20 20 20 20 20 20 20 20 28 6e 72 65 76 65 | d...........cands.........(nreve |
| d540 | 72 73 65 20 63 61 6e 64 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 69 | rse.cands)))))..(defun.swiper--i |
| d560 | 73 65 61 72 63 68 2d 6e 65 78 74 2d 69 74 65 6d 20 28 72 65 20 63 61 6e 64 73 29 0a 20 20 28 6f | search-next-item.(re.cands)...(o |
| d580 | 72 20 28 69 66 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 0a 20 | r.(if.swiper--isearch-backward.. |
| d5a0 | 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 | .........(save-excursion........ |
| d5c0 | 20 20 20 20 20 3b 3b 20 4d 61 74 63 68 20 52 45 20 73 74 61 72 74 69 6e 67 20 61 74 20 65 61 63 | .....;;.Match.RE.starting.at.eac |
| d5e0 | 68 20 70 6f 73 69 74 69 6f 6e 20 69 6e 20 43 41 4e 44 53 2e 0a 20 20 20 20 20 20 20 20 20 20 20 | h.position.in.CANDS............. |
| d600 | 20 28 73 65 74 71 20 72 65 20 28 63 6f 6e 63 61 74 20 22 5c 5c 3d 5c 5c 28 3f 3a 22 20 72 65 20 | .(setq.re.(concat."\\=\\(?:".re. |
| d620 | 22 5c 5c 29 22 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 70 6f 73 69 74 69 6f 6e | "\\)")).............(cl-position |
| d640 | 2d 69 66 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 | -if..............(lambda.(x).... |
| d660 | 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 3c 20 78 20 73 77 69 70 65 72 2d 2d 6f | ............(when.(<.x.swiper--o |
| d680 | 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 | point)..................(goto-ch |
| d6a0 | 61 72 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4e 6f 74 65 3a 20 | ar.x)..................;;.Note:. |
| d6c0 | 4e 6f 74 20 71 75 69 74 65 20 74 68 65 20 73 61 6d 65 20 61 73 20 60 6c 6f 6f 6b 69 6e 67 2d 61 | Not.quite.the.same.as.`looking-a |
| d6e0 | 74 27 20 2b 20 60 6d 61 74 63 68 2d 65 6e 64 27 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | t'.+.`match-end'................ |
| d700 | 20 20 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 72 65 20 73 77 69 70 65 72 2d | ...(re-search-forward.re.swiper- |
| d720 | 2d 6f 70 6f 69 6e 74 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6e 64 73 0a | -opoint.t)))..............cands. |
| d740 | 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 66 72 6f 6d 2d 65 6e 64 20 74 29 29 0a 20 20 20 20 20 | .............:from-end.t))...... |
| d760 | 20 20 20 28 63 6c 2d 70 6f 73 69 74 69 6f 6e 20 73 77 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 20 63 | ...(cl-position.swiper--opoint.c |
| d780 | 61 6e 64 73 20 3a 74 65 73 74 20 23 27 3c 29 29 0a 20 20 20 20 20 20 30 29 29 0a 0a 28 64 65 66 | ands.:test.#'<)).......0))..(def |
| d7a0 | 75 6e 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 66 69 6c 74 65 72 2d 69 67 6e 6f 72 65 | un.swiper--isearch-filter-ignore |
| d7c0 | 2d 6f 72 64 65 72 20 28 72 65 2d 66 75 6c 6c 20 63 61 6e 64 73 29 0a 20 20 28 6c 65 74 20 28 66 | -order.(re-full.cands)...(let.(f |
| d7e0 | 69 6c 74 65 72 65 64 2d 63 61 6e 64 73 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 72 65 2d 63 | iltered-cands).....(dolist.(re-c |
| d800 | 6f 6e 73 20 72 65 2d 66 75 6c 6c 20 63 61 6e 64 73 29 0a 20 20 20 20 20 20 28 73 61 76 65 2d 65 | ons.re-full.cands).......(save-e |
| d820 | 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 28 64 6f 6c 69 73 74 20 28 63 61 6e 64 20 63 | xcursion.........(dolist.(cand.c |
| d840 | 61 6e 64 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 63 61 6e 64 29 | ands)...........(goto-char.cand) |
| d860 | 0a 20 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 0a 20 | ...........(beginning-of-line).. |
| d880 | 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 69 66 20 28 72 65 2d 73 65 61 72 63 68 2d | .........(unless.(if.(re-search- |
| d8a0 | 66 6f 72 77 61 72 64 20 28 63 61 72 20 72 65 2d 63 6f 6e 73 29 20 28 6c 69 6e 65 2d 65 6e 64 2d | forward.(car.re-cons).(line-end- |
| d8c0 | 70 6f 73 69 74 69 6f 6e 29 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | position).t).................... |
| d8e0 | 20 20 20 28 6e 6f 74 20 28 63 64 72 20 72 65 2d 63 6f 6e 73 29 29 0a 20 20 20 20 20 20 20 20 20 | ...(not.(cdr.re-cons)).......... |
| d900 | 20 20 20 20 20 20 20 20 20 20 20 28 63 64 72 20 72 65 2d 63 6f 6e 73 29 29 0a 20 20 20 20 20 20 | ...........(cdr.re-cons))....... |
| d920 | 20 20 20 20 20 20 28 70 75 73 68 20 63 61 6e 64 20 66 69 6c 74 65 72 65 64 2d 63 61 6e 64 73 29 | ......(push.cand.filtered-cands) |
| d940 | 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 63 61 6e 64 73 20 28 6e 72 65 76 65 72 73 65 20 | ))).......(setq.cands.(nreverse. |
| d960 | 66 69 6c 74 65 72 65 64 2d 63 61 6e 64 73 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 66 69 6c | filtered-cands)).......(setq.fil |
| d980 | 74 65 72 65 64 2d 63 61 6e 64 73 20 6e 69 6c 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 | tered-cands.nil))))..(defun.swip |
| d9a0 | 65 72 2d 2d 69 73 65 61 72 63 68 2d 66 75 6e 63 74 69 6f 6e 20 28 73 74 72 29 0a 20 20 28 6c 65 | er--isearch-function.(str)...(le |
| d9c0 | 74 20 28 28 72 65 2d 66 75 6c 6c 20 69 76 79 2d 72 65 67 65 78 29 29 0a 20 20 20 20 28 75 6e 6c | t.((re-full.ivy-regex)).....(unl |
| d9e0 | 65 73 73 20 28 65 71 75 61 6c 20 72 65 2d 66 75 6c 6c 20 22 22 29 0a 20 20 20 20 20 20 28 6c 65 | ess.(equal.re-full."").......(le |
| da00 | 74 2a 20 28 28 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 28 69 76 79 2d 2d 63 61 73 65 | t*.((case-fold-search.(ivy--case |
| da20 | 2d 66 6f 6c 64 2d 70 20 73 74 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 0a 20 | -fold-p.str))..............(re.. |
| da40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 72 65 2d 66 75 6c | .............(if.(stringp.re-ful |
| da60 | 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 2d 66 75 6c 6c 0a 20 20 20 | l)...................re-full.... |
| da80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 | .............(mapconcat......... |
| daa0 | 20 20 20 20 20 20 20 20 20 23 27 69 76 79 2d 2d 72 65 67 65 78 2d 6f 72 2d 6c 69 74 65 72 61 6c | .........#'ivy--regex-or-literal |
| dac0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 71 20 6e 69 6c 20 28 6d 61 70 | ..................(delq.nil.(map |
| dae0 | 63 61 72 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 61 6e 64 20 28 63 64 72 20 78 29 20 28 63 61 | car.(lambda.(x).(and.(cdr.x).(ca |
| db00 | 72 20 78 29 29 29 20 72 65 2d 66 75 6c 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | r.x))).re-full))................ |
| db20 | 20 20 22 5c 5c 7c 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 6e 64 73 20 28 | .."\\|")))..............(cands.( |
| db40 | 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 66 75 6e 63 74 69 6f 6e 2d 31 20 72 65 20 73 77 | swiper--isearch-function-1.re.sw |
| db60 | 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 29 29 29 0a 20 20 20 20 20 20 | iper--isearch-backward)))....... |
| db80 | 20 20 28 77 68 65 6e 20 28 63 6f 6e 73 70 20 72 65 2d 66 75 6c 6c 29 0a 20 20 20 20 20 20 20 20 | ..(when.(consp.re-full)......... |
| dba0 | 20 20 28 73 65 74 71 20 63 61 6e 64 73 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 66 | ..(setq.cands.(swiper--isearch-f |
| dbc0 | 69 6c 74 65 72 2d 69 67 6e 6f 72 65 2d 6f 72 64 65 72 20 72 65 2d 66 75 6c 6c 20 63 61 6e 64 73 | ilter-ignore-order.re-full.cands |
| dbe0 | 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 72 65 20 72 65 | ))).........(setq.ivy--old-re.re |
| dc00 | 29 0a 20 20 20 20 20 20 20 20 28 69 76 79 2d 73 65 74 2d 69 6e 64 65 78 20 28 73 77 69 70 65 72 | ).........(ivy-set-index.(swiper |
| dc20 | 2d 2d 69 73 65 61 72 63 68 2d 6e 65 78 74 2d 69 74 65 6d 20 72 65 20 63 61 6e 64 73 29 29 0a 20 | --isearch-next-item.re.cands)).. |
| dc40 | 20 20 20 20 20 20 20 28 73 65 74 71 20 69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 20 63 61 6e 64 | .......(setq.ivy--old-cands.cand |
| dc60 | 73 29 29 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 | s)))))..(defcustom.swiper-isearc |
| dc80 | 68 2d 68 69 67 68 6c 69 67 68 74 2d 64 65 6c 61 79 20 27 28 32 20 30 2e 32 29 0a 20 20 22 57 68 | h-highlight-delay.'(2.0.2)..."Wh |
| dca0 | 65 6e 20 60 69 76 79 2d 74 65 78 74 27 20 69 73 20 74 6f 6f 20 73 68 6f 72 74 2c 20 64 65 6c 61 | en.`ivy-text'.is.too.short,.dela |
| dcc0 | 79 20 73 68 6f 77 69 6e 67 20 74 68 65 20 6f 76 65 72 6c 61 79 2e 0a 0a 54 68 65 20 64 65 66 61 | y.showing.the.overlay...The.defa |
| dce0 | 75 6c 74 20 76 61 6c 75 65 20 77 69 6c 6c 20 64 65 6c 61 79 20 73 68 6f 77 69 6e 67 20 74 68 65 | ult.value.will.delay.showing.the |
| dd00 | 20 6f 76 65 72 6c 61 79 20 62 79 20 30 2e 32 20 73 65 63 6f 6e 64 73 0a 69 66 20 60 69 76 79 2d | .overlay.by.0.2.seconds.if.`ivy- |
| dd20 | 74 65 78 74 27 20 69 73 20 73 68 6f 72 74 65 72 20 74 68 61 6e 20 32 20 63 68 61 72 61 63 74 65 | text'.is.shorter.than.2.characte |
| dd40 | 72 73 2e 0a 0a 54 68 65 20 61 69 6d 20 69 73 20 74 6f 20 72 65 64 75 63 65 20 74 68 65 20 76 69 | rs...The.aim.is.to.reduce.the.vi |
| dd60 | 73 75 61 6c 20 63 6c 75 74 74 65 72 2c 20 73 69 6e 63 65 20 69 74 27 73 20 76 65 72 79 20 72 61 | sual.clutter,.since.it's.very.ra |
| dd80 | 72 65 0a 74 68 61 74 20 77 65 20 73 65 61 72 63 68 20 6f 6e 6c 79 20 66 6f 72 20 6f 6e 65 20 63 | re.that.we.search.only.for.one.c |
| dda0 | 68 61 72 61 63 74 65 72 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 6c 69 73 74 0a 20 20 20 20 20 20 | haracter."...:type.'(list....... |
| ddc0 | 20 20 20 20 28 69 6e 74 65 67 65 72 20 3a 74 61 67 20 22 54 65 78 74 20 6c 65 6e 67 74 68 22 29 | ....(integer.:tag."Text.length") |
| dde0 | 0a 20 20 20 20 20 20 20 20 20 20 28 66 6c 6f 61 74 20 3a 74 61 67 20 22 44 65 6c 61 79 20 69 6e | ...........(float.:tag."Delay.in |
| de00 | 20 73 65 63 6f 6e 64 73 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 64 65 6c | .seconds")))..(defun.swiper--del |
| de20 | 61 79 65 64 2d 61 64 64 2d 6f 76 65 72 6c 61 79 73 20 28 29 0a 20 20 28 69 66 20 28 61 6e 64 20 | ayed-add-overlays.()...(if.(and. |
| de40 | 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 2d 64 65 6c 61 79 0a 20 | swiper-isearch-highlight-delay.. |
| de60 | 20 20 20 20 20 20 20 20 20 20 28 3c 20 28 6c 65 6e 67 74 68 20 69 76 79 2d 74 65 78 74 29 20 28 | ..........(<.(length.ivy-text).( |
| de80 | 63 61 72 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 2d 64 65 6c | car.swiper-isearch-highlight-del |
| dea0 | 61 79 29 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 | ay))).......(setq.swiper--isearc |
| dec0 | 68 2d 68 69 67 68 6c 69 67 68 74 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 72 | h-highlight-timer.............(r |
| dee0 | 75 6e 2d 77 69 74 68 2d 69 64 6c 65 2d 74 69 6d 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | un-with-idle-timer.............. |
| df00 | 28 63 61 64 72 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 2d 64 | (cadr.swiper-isearch-highlight-d |
| df20 | 65 6c 61 79 29 20 6e 69 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 | elay).nil..............(lambda.( |
| df40 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f | )................(with-ivy-windo |
| df60 | 77 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 61 64 64 2d | w..................(swiper--add- |
| df80 | 6f 76 65 72 6c 61 79 73 20 28 69 76 79 2d 2d 72 65 67 65 78 20 69 76 79 2d 74 65 78 74 29 29 29 | overlays.(ivy--regex.ivy-text))) |
| dfa0 | 29 29 29 0a 20 20 20 20 28 64 6f 6c 69 73 74 20 28 72 65 20 28 73 77 69 70 65 72 2d 2d 70 6f 73 | ))).....(dolist.(re.(swiper--pos |
| dfc0 | 69 74 69 76 65 2d 72 65 67 65 78 70 73 29 29 0a 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 61 | itive-regexps)).......(swiper--a |
| dfe0 | 64 64 2d 6f 76 65 72 6c 61 79 73 20 72 65 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 | dd-overlays.re))))..(defun.swipe |
| e000 | 72 2d 2d 69 73 65 61 72 63 68 2d 63 61 6e 64 69 64 61 74 65 2d 70 6f 73 20 28 63 61 6e 64 29 0a | r--isearch-candidate-pos.(cand). |
| e020 | 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 62 75 66 66 65 72 20 70 6f 73 69 74 69 6f 6e 20 6f 66 | .."Return.the.buffer.position.of |
| e040 | 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 20 43 41 4e 44 2c 20 6f 72 20 6e 69 6c 2e 22 | .`swiper-isearch'.CAND,.or.nil." |
| e060 | 0a 20 20 28 63 6f 6e 64 20 28 28 69 6e 74 65 67 65 72 2d 6f 72 2d 6d 61 72 6b 65 72 2d 70 20 63 | ...(cond.((integer-or-marker-p.c |
| e080 | 61 6e 64 29 20 63 61 6e 64 29 0a 20 20 20 20 20 20 20 20 28 28 61 6e 64 20 28 73 74 72 69 6e 67 | and).cand).........((and.(string |
| e0a0 | 70 20 63 61 6e 64 29 20 28 3e 20 28 6c 65 6e 67 74 68 20 63 61 6e 64 29 20 30 29 29 0a 20 20 20 | p.cand).(>.(length.cand).0)).... |
| e0c0 | 20 20 20 20 20 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 70 6f 69 6e | ......(get-text-property.0.'poin |
| e0e0 | 74 20 63 61 6e 64 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 | t.cand))))..(defun.swiper--isear |
| e100 | 63 68 2d 63 61 6e 64 69 64 61 74 65 2d 73 74 72 69 6e 67 20 28 63 61 6e 64 29 0a 20 20 22 52 65 | ch-candidate-string.(cand)..."Re |
| e120 | 74 75 72 6e 20 66 75 6c 6c 20 6d 61 74 63 68 20 6f 66 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 | turn.full.match.of.`swiper-isear |
| e140 | 63 68 27 20 63 61 6e 64 69 64 61 74 65 20 43 41 4e 44 2e 0a 53 69 67 6e 61 6c 20 61 6e 20 65 72 | ch'.candidate.CAND..Signal.an.er |
| e160 | 72 6f 72 20 6f 6e 20 66 61 69 6c 75 72 65 2e 22 0a 20 20 3b 3b 20 46 49 58 4d 45 3a 20 42 65 74 | ror.on.failure."...;;.FIXME:.Bet |
| e180 | 74 65 72 20 77 61 79 20 6f 66 20 67 65 74 74 69 6e 67 20 63 75 72 72 65 6e 74 20 63 61 6e 64 69 | ter.way.of.getting.current.candi |
| e1a0 | 64 61 74 65 3f 0a 20 20 28 6f 72 20 28 6c 65 74 20 28 28 70 6f 73 20 28 73 77 69 70 65 72 2d 2d | date?...(or.(let.((pos.(swiper-- |
| e1c0 | 69 73 65 61 72 63 68 2d 63 61 6e 64 69 64 61 74 65 2d 70 6f 73 20 63 61 6e 64 29 29 0a 20 20 20 | isearch-candidate-pos.cand)).... |
| e1e0 | 20 20 20 20 20 20 20 20 20 28 72 65 20 28 69 76 79 2d 72 65 2d 74 6f 2d 73 74 72 20 69 76 79 2d | .........(re.(ivy-re-to-str.ivy- |
| e200 | 72 65 67 65 78 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 | regex))).........(save-match-dat |
| e220 | 61 0a 20 20 20 20 20 20 20 20 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 | a...........(save-excursion..... |
| e240 | 20 20 20 20 20 20 20 20 28 61 6e 64 20 70 6f 73 20 28 67 6f 74 6f 2d 63 68 61 72 20 70 6f 73 29 | ........(and.pos.(goto-char.pos) |
| e260 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6f 72 20 73 77 69 70 65 72 | ..................(if.(or.swiper |
| e280 | 2d 2d 69 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 73 77 69 70 65 72 2d 67 6f 74 6f 2d 73 | --isearch-backward.swiper-goto-s |
| e2a0 | 74 61 72 74 2d 6f 66 2d 6d 61 74 63 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | tart-of-match).................. |
| e2c0 | 20 20 20 20 28 6c 6f 6f 6b 69 6e 67 2d 61 74 20 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ....(looking-at.re)............. |
| e2e0 | 20 20 20 20 20 20 20 28 6c 6f 6f 6b 69 6e 67 2d 62 61 63 6b 20 72 65 20 28 70 6f 69 6e 74 2d 6d | .......(looking-back.re.(point-m |
| e300 | 69 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 74 63 68 2d 73 74 | in)))..................(match-st |
| e320 | 72 69 6e 67 20 30 29 29 29 29 29 0a 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 6f 75 6c 64 20 | ring.0))))).......(error."Could. |
| e340 | 6e 6f 74 20 65 78 74 72 61 63 74 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 20 63 61 6e | not.extract.`swiper-isearch'.can |
| e360 | 64 69 64 61 74 65 3a 20 25 53 22 20 63 61 6e 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 | didate:.%S".cand)))..(defun.swip |
| e380 | 65 72 2d 69 73 65 61 72 63 68 2d 61 63 74 69 6f 6e 20 28 78 29 0a 20 20 22 4d 6f 76 65 20 74 6f | er-isearch-action.(x)..."Move.to |
| e3a0 | 20 58 20 66 6f 72 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 2e 22 0a 20 20 28 69 66 20 | .X.for.`swiper-isearch'."...(if. |
| e3c0 | 28 73 65 74 71 20 78 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 63 61 6e 64 69 64 61 | (setq.x.(swiper--isearch-candida |
| e3e0 | 74 65 2d 70 6f 73 20 78 29 29 0a 20 20 20 20 20 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f | te-pos.x)).......(with-ivy-windo |
| e400 | 77 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 78 29 0a 20 20 20 20 20 20 20 20 | w.........(goto-char.x)......... |
| e420 | 28 77 68 65 6e 20 28 61 6e 64 20 28 6f 72 20 28 65 71 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 | (when.(and.(or.(eq.this-command. |
| e440 | 27 69 76 79 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 2d 6f 72 2d 68 69 73 74 6f 72 79 29 0a 20 | 'ivy-previous-line-or-history).. |
| e460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 28 65 71 20 74 | ......................(and.(eq.t |
| e480 | 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 27 69 76 79 2d 64 6f 6e 65 29 0a 20 20 20 20 20 20 20 20 20 | his-command.'ivy-done).......... |
| e4a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 6c 61 73 74 2d 63 6f 6d 6d | ...................(eq.last-comm |
| e4c0 | 61 6e 64 20 27 69 76 79 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 2d 6f 72 2d 68 69 73 74 6f 72 | and.'ivy-previous-line-or-histor |
| e4e0 | 79 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 6f 6f 6b 69 6e 67 | y)))....................(looking |
| e500 | 2d 62 61 63 6b 20 69 76 79 2d 72 65 67 65 78 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d | -back.ivy-regex.(line-beginning- |
| e520 | 70 6f 73 69 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 | position)))...........(goto-char |
| e540 | 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 28 | .(match-beginning.0))).........( |
| e560 | 66 75 6e 63 61 6c 6c 20 69 73 65 61 72 63 68 2d 66 69 6c 74 65 72 2d 70 72 65 64 69 63 61 74 65 | funcall.isearch-filter-predicate |
| e580 | 20 28 70 6f 69 6e 74 29 20 28 31 2b 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 | .(point).(1+.(point))).........( |
| e5a0 | 73 77 69 70 65 72 2d 2d 6d 61 79 62 65 2d 72 65 63 65 6e 74 65 72 29 0a 20 20 20 20 20 20 20 20 | swiper--maybe-recenter)......... |
| e5c0 | 28 69 66 20 28 6f 72 20 28 65 71 20 69 76 79 2d 65 78 69 74 20 27 64 6f 6e 65 29 0a 20 20 20 20 | (if.(or.(eq.ivy-exit.'done)..... |
| e5e0 | 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 49 58 4d 45 3a 20 57 69 74 68 20 74 68 65 20 64 | ............;;.FIXME:.With.the.d |
| e600 | 65 66 61 75 6c 74 20 61 63 74 69 6f 6e 20 27 4d 2d 6f 20 6f 27 2c 20 60 69 76 79 2d 65 78 69 74 | efault.action.'M-o.o',.`ivy-exit |
| e620 | 27 20 72 65 6d 61 69 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e 69 6c | '.remains.................;;.nil |
| e640 | 20 66 6f 72 20 73 6f 6d 65 20 72 65 61 73 6f 6e 2c 20 73 6f 20 63 68 65 63 6b 20 60 74 68 69 73 | .for.some.reason,.so.check.`this |
| e660 | 2d 63 6f 6d 6d 61 6e 64 27 20 69 6e 73 74 65 61 64 20 74 6f 0a 20 20 20 20 20 20 20 20 20 20 20 | -command'.instead.to............ |
| e680 | 20 20 20 20 20 3b 3b 20 74 65 6c 6c 20 77 68 65 74 68 65 72 20 77 65 27 72 65 20 22 64 6f 6e 65 | .....;;.tell.whether.we're."done |
| e6a0 | 22 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 71 20 74 68 69 73 2d 63 6f 6d 6d | "..................(eq.this-comm |
| e6c0 | 61 6e 64 20 23 27 69 76 79 2d 64 69 73 70 61 74 63 68 69 6e 67 2d 64 6f 6e 65 29 29 0a 20 20 20 | and.#'ivy-dispatching-done)).... |
| e6e0 | 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 | .........(progn...............(s |
| e700 | 77 69 70 65 72 2d 2d 70 75 73 68 2d 6d 61 72 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | wiper--push-mark)............... |
| e720 | 28 73 77 69 70 65 72 2d 2d 72 65 6d 65 6d 62 65 72 2d 73 65 61 72 63 68 2d 68 69 73 74 6f 72 79 | (swiper--remember-search-history |
| e740 | 20 28 69 76 79 2d 2d 72 65 67 65 78 20 69 76 79 2d 74 65 78 74 29 29 29 0a 20 20 20 20 20 20 20 | .(ivy--regex.ivy-text)))........ |
| e760 | 20 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 29 0a 20 20 20 20 20 20 20 20 20 20 28 | ...(swiper--cleanup)...........( |
| e780 | 73 77 69 70 65 72 2d 2d 64 65 6c 61 79 65 64 2d 61 64 64 2d 6f 76 65 72 6c 61 79 73 29 0a 20 20 | swiper--delayed-add-overlays)... |
| e7a0 | 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 61 64 64 2d 63 75 72 73 6f 72 2d 6f 76 65 72 | ........(swiper--add-cursor-over |
| e7c0 | 6c 61 79 0a 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 73 74 61 74 65 2d 77 69 6e 64 6f 77 | lay............(ivy-state-window |
| e7e0 | 20 69 76 79 2d 6c 61 73 74 29 29 29 29 0a 20 20 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e | .ivy-last)))).....(swiper--clean |
| e800 | 75 70 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 61 63 74 69 6f 6e 2d 63 6f 70 79 | up)))..(defun.swiper-action-copy |
| e820 | 20 28 5f 78 29 0a 20 20 22 43 6f 70 79 20 6c 69 6e 65 20 61 74 20 70 6f 69 6e 74 20 61 6e 64 20 | .(_x)..."Copy.line.at.point.and. |
| e840 | 67 6f 20 62 61 63 6b 2e 22 0a 20 20 28 6b 69 6c 6c 2d 6e 65 77 0a 20 20 20 28 62 75 66 66 65 72 | go.back."...(kill-new....(buffer |
| e860 | 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 0a 20 20 20 20 28 6c 69 | -substring-no-properties.....(li |
| e880 | 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 20 28 6c 69 6e 65 2d 65 6e 64 | ne-beginning-position).(line-end |
| e8a0 | 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 77 69 70 65 72 | -position)))...(goto-char.swiper |
| e8c0 | 2d 2d 6f 70 6f 69 6e 74 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 | --opoint))..(defun.swiper-isearc |
| e8e0 | 68 2d 61 63 74 69 6f 6e 2d 63 6f 70 79 20 28 63 61 6e 64 29 0a 20 20 22 53 61 76 65 20 60 73 77 | h-action-copy.(cand)..."Save.`sw |
| e900 | 69 70 65 72 2d 69 73 65 61 72 63 68 27 20 63 61 6e 64 69 64 61 74 65 20 43 41 4e 44 20 74 6f 20 | iper-isearch'.candidate.CAND.to. |
| e920 | 60 6b 69 6c 6c 2d 72 69 6e 67 27 2e 0a 52 65 74 75 72 6e 20 74 6f 20 6f 72 69 67 69 6e 61 6c 20 | `kill-ring'..Return.to.original. |
| e940 | 70 6f 73 69 74 69 6f 6e 2e 22 0a 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 | position."...(unwind-protect.... |
| e960 | 20 20 20 28 6b 69 6c 6c 2d 6e 65 77 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 63 61 | ...(kill-new.(swiper--isearch-ca |
| e980 | 6e 64 69 64 61 74 65 2d 73 74 72 69 6e 67 20 63 61 6e 64 29 29 0a 20 20 20 20 3b 3b 20 49 6e 20 | ndidate-string.cand)).....;;.In. |
| e9a0 | 63 61 73 65 20 6f 66 20 75 6e 65 78 70 65 63 74 65 64 20 65 72 72 6f 72 2e 0a 20 20 20 20 28 67 | case.of.unexpected.error......(g |
| e9c0 | 6f 74 6f 2d 63 68 61 72 20 73 77 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 29 29 29 0a 0a 28 64 65 66 | oto-char.swiper--opoint)))..(def |
| e9e0 | 75 6e 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 61 63 74 69 6f 6e 2d 69 6e 73 65 72 74 20 | un.swiper-isearch-action-insert. |
| ea00 | 28 63 61 6e 64 29 0a 20 20 22 49 6e 73 65 72 74 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 | (cand)..."Insert.`swiper-isearch |
| ea20 | 27 20 63 61 6e 64 69 64 61 74 65 20 43 41 4e 44 20 77 68 65 72 65 20 69 6e 76 6f 6b 65 64 2e 0a | '.candidate.CAND.where.invoked.. |
| ea40 | 54 68 69 73 20 63 61 6e 6e 6f 74 20 63 75 72 72 65 6e 74 6c 79 20 62 65 20 63 61 6c 6c 65 64 20 | This.cannot.currently.be.called. |
| ea60 | 72 65 70 65 61 74 65 64 6c 79 20 77 69 74 68 6f 75 74 20 65 78 69 74 69 6e 67 0a 63 6f 6d 70 6c | repeatedly.without.exiting.compl |
| ea80 | 65 74 69 6f 6e 2e 22 0a 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 77 69 70 65 72 2d 2d 6f 70 6f | etion."...(goto-char.swiper--opo |
| eaa0 | 69 6e 74 29 0a 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 63 74 0a 20 20 20 20 20 20 3b 3b 20 | int)...(unwind-protect.......;;. |
| eac0 | 46 49 58 4d 45 3a 20 54 68 69 73 20 73 65 65 6d 73 20 74 6f 20 69 6e 76 61 6c 69 64 61 74 65 20 | FIXME:.This.seems.to.invalidate. |
| eae0 | 6d 61 6e 79 20 63 61 63 68 65 64 20 62 75 66 66 65 72 20 70 6f 73 69 74 69 6f 6e 73 2c 20 74 68 | many.cached.buffer.positions,.th |
| eb00 | 75 73 0a 20 20 20 20 20 20 3b 3b 20 62 72 65 61 6b 69 6e 67 20 60 69 76 79 2d 64 69 73 70 61 74 | us.......;;.breaking.`ivy-dispat |
| eb20 | 63 68 69 6e 67 2d 63 61 6c 6c 27 2e 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 28 73 77 69 70 | ching-call'........(insert.(swip |
| eb40 | 65 72 2d 2d 69 73 65 61 72 63 68 2d 63 61 6e 64 69 64 61 74 65 2d 73 74 72 69 6e 67 20 63 61 6e | er--isearch-candidate-string.can |
| eb60 | 64 29 29 0a 20 20 20 20 3b 3b 20 49 6e 20 63 61 73 65 20 6f 66 20 75 6e 65 78 70 65 63 74 65 64 | d)).....;;.In.case.of.unexpected |
| eb80 | 20 65 72 72 6f 72 2e 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 73 77 69 70 65 72 2d 2d 6f | .error......(goto-char.swiper--o |
| eba0 | 70 6f 69 6e 74 29 29 29 0a 0a 28 69 76 79 2d 61 64 64 2d 61 63 74 69 6f 6e 73 20 27 73 77 69 70 | point)))..(ivy-add-actions.'swip |
| ebc0 | 65 72 2d 69 73 65 61 72 63 68 20 27 28 28 22 77 22 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 | er-isearch.'(("w".swiper-isearch |
| ebe0 | 2d 61 63 74 69 6f 6e 2d 63 6f 70 79 20 22 63 6f 70 79 22 29 29 29 0a 28 69 76 79 2d 61 64 64 2d | -action-copy."copy"))).(ivy-add- |
| ec00 | 61 63 74 69 6f 6e 73 20 27 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 20 27 28 28 22 69 22 20 73 | actions.'swiper-isearch.'(("i".s |
| ec20 | 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 61 63 74 69 6f 6e 2d 69 6e 73 65 72 74 20 22 69 6e 73 | wiper-isearch-action-insert."ins |
| ec40 | 65 72 74 22 29 29 29 0a 28 69 76 79 2d 61 64 64 2d 61 63 74 69 6f 6e 73 20 27 73 77 69 70 65 72 | ert"))).(ivy-add-actions.'swiper |
| ec60 | 20 27 28 28 22 77 22 20 73 77 69 70 65 72 2d 61 63 74 69 6f 6e 2d 63 6f 70 79 20 22 63 6f 70 79 | .'(("w".swiper-action-copy."copy |
| ec80 | 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 69 6e 73 | ")))..(defun.swiper--isearch-ins |
| eca0 | 65 72 74 2d 63 75 72 72 65 6e 74 20 28 29 0a 20 20 22 52 65 70 6c 61 63 65 20 6d 69 6e 69 62 75 | ert-current.()..."Replace.minibu |
| ecc0 | 66 66 65 72 20 63 6f 6e 74 65 6e 74 73 20 77 69 74 68 20 74 68 65 20 63 75 72 72 65 6e 74 20 63 | ffer.contents.with.the.current.c |
| ece0 | 61 6e 64 69 64 61 74 65 2e 0a 4c 69 6b 65 20 60 69 76 79 2d 69 6e 73 65 72 74 2d 63 75 72 72 65 | andidate..Like.`ivy-insert-curre |
| ed00 | 6e 74 27 2c 20 62 75 74 20 74 61 69 6c 6f 72 65 64 20 66 6f 72 20 60 73 77 69 70 65 72 2d 69 73 | nt',.but.tailored.for.`swiper-is |
| ed20 | 65 61 72 63 68 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 64 65 6c 65 | earch'."...(interactive)...(dele |
| ed40 | 74 65 2d 6d 69 6e 69 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 29 0a 20 20 28 6c 65 74 20 28 | te-minibuffer-contents)...(let.( |
| ed60 | 28 63 75 72 20 28 69 76 79 2d 73 74 61 74 65 2d 63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 74 | (cur.(ivy-state-current.ivy-last |
| ed80 | 29 29 29 0a 20 20 20 20 28 69 6e 73 65 72 74 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 | ))).....(insert.(with-ivy-window |
| eda0 | 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 63 61 6e 64 69 64 61 74 65 2d 73 74 72 69 | .(swiper--isearch-candidate-stri |
| edc0 | 6e 67 20 63 75 72 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 69 73 65 61 72 | ng.cur)))))..(defun.swiper-isear |
| ede0 | 63 68 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 28 29 0a 20 20 22 49 6e 73 65 72 74 20 60 | ch-thing-at-point.()..."Insert.` |
| ee00 | 73 79 6d 62 6f 6c 2d 61 74 2d 70 6f 69 6e 74 27 20 69 6e 74 6f 20 74 68 65 20 6d 69 6e 69 62 75 | symbol-at-point'.into.the.minibu |
| ee20 | 66 66 65 72 20 6f 66 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 2e 0a 57 68 65 6e 20 6e | ffer.of.`swiper-isearch'..When.n |
| ee40 | 6f 74 20 72 75 6e 6e 69 6e 67 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 20 61 6c 72 65 | ot.running.`swiper-isearch'.alre |
| ee60 | 61 64 79 2c 20 73 74 61 72 74 20 69 74 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a | ady,.start.it."...(interactive). |
| ee80 | 20 20 28 69 66 20 28 77 69 6e 64 6f 77 2d 6d 69 6e 69 62 75 66 66 65 72 2d 70 29 0a 20 20 20 20 | ..(if.(window-minibuffer-p)..... |
| eea0 | 20 20 28 6c 65 74 20 28 62 6e 64 20 73 74 72 20 72 65 67 69 6f 6e 70 29 0a 20 20 20 20 20 20 20 | ..(let.(bnd.str.regionp)........ |
| eec0 | 20 28 77 69 74 68 2d 69 76 79 2d 77 69 6e 64 6f 77 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 | .(with-ivy-window...........(set |
| eee0 | 71 20 62 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 73 65 74 71 20 | q.bnd.................(if.(setq. |
| ef00 | 72 65 67 69 6f 6e 70 20 28 72 65 67 69 6f 6e 2d 61 63 74 69 76 65 2d 70 29 29 0a 20 20 20 20 20 | regionp.(region-active-p))...... |
| ef20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 31 20 28 63 6f 6e 73 20 28 72 65 67 | ...............(prog1.(cons.(reg |
| ef40 | 69 6f 6e 2d 62 65 67 69 6e 6e 69 6e 67 29 20 28 72 65 67 69 6f 6e 2d 65 6e 64 29 29 0a 20 20 20 | ion-beginning).(region-end)).... |
| ef60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 61 63 74 69 76 61 74 65 2d 6d | ...................(deactivate-m |
| ef80 | 61 72 6b 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62 6f 75 6e 64 73 2d | ark))...................(bounds- |
| efa0 | 6f 66 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 27 73 79 6d 62 6f 6c 29 29 29 0a 20 20 20 | of-thing-at-point.'symbol))).... |
| efc0 | 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 72 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 | .......(setq.str.(buffer-substri |
| efe0 | 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 28 63 61 72 20 62 6e 64 29 20 28 63 64 72 20 | ng-no-properties.(car.bnd).(cdr. |
| f000 | 62 6e 64 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 73 74 72 29 0a 20 20 20 | bnd)))).........(insert.str).... |
| f020 | 20 20 20 20 20 28 75 6e 6c 65 73 73 20 72 65 67 69 6f 6e 70 0a 20 20 20 20 20 20 20 20 20 20 28 | .....(unless.regionp...........( |
| f040 | 69 76 79 2d 2d 69 6e 73 65 72 74 2d 73 79 6d 62 6f 6c 2d 62 6f 75 6e 64 61 72 69 65 73 29 29 29 | ivy--insert-symbol-boundaries))) |
| f060 | 0a 20 20 20 20 28 6c 65 74 20 28 74 68 69 6e 67 29 0a 20 20 20 20 20 20 28 69 66 20 28 75 73 65 | .....(let.(thing).......(if.(use |
| f080 | 2d 72 65 67 69 6f 6e 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 | -region-p)...........(progn..... |
| f0a0 | 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 68 69 6e 67 20 28 62 75 66 66 65 72 2d 73 75 62 73 | ........(setq.thing.(buffer-subs |
| f0c0 | 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 | tring-no-properties............. |
| f0e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 67 69 6f 6e 2d 62 65 67 69 6e 6e 69 6e 67 29 20 | .............(region-beginning). |
| f100 | 28 72 65 67 69 6f 6e 2d 65 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f | (region-end))).............(goto |
| f120 | 2d 63 68 61 72 20 28 72 65 67 69 6f 6e 2d 62 65 67 69 6e 6e 69 6e 67 29 29 0a 20 20 20 20 20 20 | -char.(region-beginning))....... |
| f140 | 20 20 20 20 20 20 28 64 65 61 63 74 69 76 61 74 65 2d 6d 61 72 6b 29 29 0a 20 20 20 20 20 20 20 | ......(deactivate-mark))........ |
| f160 | 20 28 6c 65 74 20 28 28 62 6e 64 20 28 62 6f 75 6e 64 73 2d 6f 66 2d 74 68 69 6e 67 2d 61 74 2d | .(let.((bnd.(bounds-of-thing-at- |
| f180 | 70 6f 69 6e 74 20 27 73 79 6d 62 6f 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e | point.'symbol)))...........(when |
| f1a0 | 20 62 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 63 61 72 | .bnd.............(goto-char.(car |
| f1c0 | 20 62 6e 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 68 69 6e 67 20 28 69 | .bnd)))...........(setq.thing.(i |
| f1e0 | 76 79 2d 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 29 29 29 29 0a 20 20 20 20 20 20 28 73 77 69 | vy-thing-at-point)))).......(swi |
| f200 | 70 65 72 2d 69 73 65 61 72 63 68 20 74 68 69 6e 67 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 | per-isearch.thing))))..(defun.sw |
| f220 | 69 70 65 72 2d 69 73 65 61 72 63 68 2d 43 2d 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 | iper-isearch-C-r.(&optional.arg) |
| f240 | 0a 20 20 22 4d 6f 76 65 20 63 75 72 73 6f 72 20 76 65 72 74 69 63 61 6c 6c 79 20 75 70 20 41 52 | ..."Move.cursor.vertically.up.AR |
| f260 | 47 20 63 61 6e 64 69 64 61 74 65 73 2e 0a 57 68 65 6e 20 74 68 65 20 69 6e 70 75 74 20 69 73 20 | G.candidates..When.the.input.is. |
| f280 | 65 6d 70 74 79 2c 20 62 72 6f 77 73 65 20 74 68 65 20 73 65 61 72 63 68 20 68 69 73 74 6f 72 79 | empty,.browse.the.search.history |
| f2a0 | 20 69 6e 73 74 65 61 64 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 0a 20 | .instead."...(interactive."p").. |
| f2c0 | 20 28 69 66 20 28 73 74 72 69 6e 67 3d 20 69 76 79 2d 74 65 78 74 20 22 22 29 0a 20 20 20 20 20 | .(if.(string=.ivy-text."")...... |
| f2e0 | 20 28 69 76 79 2d 72 65 76 65 72 73 65 2d 69 2d 73 65 61 72 63 68 29 0a 20 20 20 20 28 69 76 79 | .(ivy-reverse-i-search).....(ivy |
| f300 | 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 61 72 67 29 29 29 0a 0a 28 64 65 66 76 61 72 20 73 | -previous-line.arg)))..(defvar.s |
| f320 | 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 6d 61 70 0a 20 20 28 6c 65 74 20 28 28 6d 61 70 20 28 | wiper-isearch-map...(let.((map.( |
| f340 | 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 29 0a 20 20 20 20 28 73 65 74 2d 6b | make-sparse-keymap))).....(set-k |
| f360 | 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 6d 61 70 20 73 77 69 70 65 72 2d 6d 61 70 29 0a 20 20 20 | eymap-parent.map.swiper-map).... |
| f380 | 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 5b 72 65 6d 61 70 20 69 76 79 2d 69 6e 73 65 | .(define-key.map.[remap.ivy-inse |
| f3a0 | 72 74 2d 63 75 72 72 65 6e 74 5d 20 23 27 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 69 6e | rt-current].#'swiper--isearch-in |
| f3c0 | 73 65 72 74 2d 63 75 72 72 65 6e 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 | sert-current).....(define-key.ma |
| f3e0 | 70 20 28 6b 62 64 20 22 4d 2d 6e 22 29 20 23 27 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 74 | p.(kbd."M-n").#'swiper-isearch-t |
| f400 | 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d | hing-at-point).....(define-key.m |
| f420 | 61 70 20 28 6b 62 64 20 22 43 2d 72 22 29 20 23 27 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d | ap.(kbd."C-r").#'swiper-isearch- |
| f440 | 43 2d 72 29 0a 20 20 20 20 6d 61 70 29 0a 20 20 22 4b 65 79 6d 61 70 20 66 6f 72 20 60 73 77 69 | C-r).....map)..."Keymap.for.`swi |
| f460 | 70 65 72 2d 69 73 65 61 72 63 68 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d | per-isearch'.")..(defun.swiper-- |
| f480 | 69 73 65 61 72 63 68 2d 73 61 6d 65 2d 6c 69 6e 65 2d 70 20 28 73 31 20 73 32 29 0a 20 20 22 43 | isearch-same-line-p.(s1.s2)..."C |
| f4a0 | 68 65 63 6b 20 69 66 20 53 31 20 61 6e 64 20 53 32 20 61 72 65 20 65 71 75 61 6c 20 61 6e 64 20 | heck.if.S1.and.S2.are.equal.and. |
| f4c0 | 6f 6e 20 74 68 65 20 73 61 6d 65 20 6c 69 6e 65 2e 22 0a 20 20 28 61 6e 64 20 28 65 71 75 61 6c | on.the.same.line."...(and.(equal |
| f4e0 | 20 73 31 20 73 32 29 0a 20 20 20 20 20 20 20 28 3c 3d 20 28 63 6f 75 6e 74 2d 6c 69 6e 65 73 0a | .s1.s2)........(<=.(count-lines. |
| f500 | 20 20 20 20 20 20 20 20 20 20 20 20 28 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 30 | ............(get-text-property.0 |
| f520 | 20 27 70 6f 69 6e 74 20 73 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 67 65 74 2d 74 65 78 | .'point.s2).............(get-tex |
| f540 | 74 2d 70 72 6f 70 65 72 74 79 20 30 20 27 70 6f 69 6e 74 20 73 31 29 29 0a 20 20 20 20 20 20 20 | t-property.0.'point.s1))........ |
| f560 | 20 20 20 20 31 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d | ....1)))..(defun.swiper-isearch- |
| f580 | 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 20 28 63 61 6e 64 73 29 0a 20 20 28 69 66 20 28 6e | format-function.(cands)...(if.(n |
| f5a0 | 75 6d 62 65 72 70 20 28 63 61 72 2d 73 61 66 65 20 63 61 6e 64 73 29 29 0a 20 20 20 20 20 20 28 | umberp.(car-safe.cands)).......( |
| f5c0 | 6c 65 74 20 28 28 72 65 20 28 69 76 79 2d 72 65 2d 74 6f 2d 73 74 72 20 69 76 79 2d 72 65 67 65 | let.((re.(ivy-re-to-str.ivy-rege |
| f5e0 | 78 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 3d 20 72 65 20 22 5e 24 | x))).........(if.(string=.re."^$ |
| f600 | 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 22 0a 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 | ").............""...........(map |
| f620 | 63 6f 6e 63 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 23 27 69 64 65 6e 74 69 74 79 0a 20 20 20 | concat............#'identity.... |
| f640 | 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 66 6f 72 6d 61 74 0a | ........(swiper--isearch-format. |
| f660 | 20 20 20 20 20 20 20 20 20 20 20 20 69 76 79 2d 2d 69 6e 64 65 78 20 69 76 79 2d 2d 6c 65 6e 67 | ............ivy--index.ivy--leng |
| f680 | 74 68 20 28 6f 72 20 69 76 79 2d 2d 6f 6c 64 2d 63 61 6e 64 73 20 69 76 79 2d 2d 61 6c 6c 2d 63 | th.(or.ivy--old-cands.ivy--all-c |
| f6a0 | 61 6e 64 69 64 61 74 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 72 65 0a 20 20 20 20 20 20 | andidates).............re....... |
| f6c0 | 20 20 20 20 20 20 28 69 76 79 2d 73 74 61 74 65 2d 63 75 72 72 65 6e 74 20 69 76 79 2d 6c 61 73 | ......(ivy-state-current.ivy-las |
| f6e0 | 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 69 76 79 2d 73 74 61 74 65 2d 62 75 66 66 65 72 | t).............(ivy-state-buffer |
| f700 | 20 69 76 79 2d 6c 61 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 22 5c 6e 22 29 29 29 0a 20 | .ivy-last))............"\n"))).. |
| f720 | 20 20 20 28 66 75 6e 63 61 6c 6c 0a 20 20 20 20 20 28 69 76 79 2d 61 6c 69 73 74 2d 73 65 74 74 | ...(funcall......(ivy-alist-sett |
| f740 | 69 6e 67 20 69 76 79 2d 66 6f 72 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 73 2d 61 6c 69 73 74 20 74 | ing.ivy-format-functions-alist.t |
| f760 | 29 0a 20 20 20 20 20 63 61 6e 64 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d | )......cands)))..(defun.swiper-- |
| f780 | 6c 69 6e 65 2d 61 74 2d 70 6f 69 6e 74 20 28 70 74 29 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 | line-at-point.(pt)...(save-excur |
| f7a0 | 73 69 6f 6e 0a 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 70 74 29 0a 20 20 20 20 28 6c 65 74 | sion.....(goto-char.pt).....(let |
| f7c0 | 20 28 28 73 20 28 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 | .((s.(buffer-substring.......... |
| f7e0 | 20 20 20 20 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 0a 20 | .....(line-beginning-position).. |
| f800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 | .............(line-end-position) |
| f820 | 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 73 74 72 69 6e 67 3d 20 73 20 22 22 29 0a 20 20 20 | ))).......(if.(string=.s."").... |
| f840 | 20 20 20 20 20 20 20 73 0a 20 20 20 20 20 20 20 20 28 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 | .......s.........(put-text-prope |
| f860 | 72 74 79 20 30 20 31 20 27 70 6f 69 6e 74 20 70 74 20 73 29 0a 20 20 20 20 20 20 20 20 28 69 76 | rty.0.1.'point.pt.s).........(iv |
| f880 | 79 2d 63 6c 65 61 6e 75 70 2d 73 74 72 69 6e 67 20 73 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 | y-cleanup-string.s)))))..(defun. |
| f8a0 | 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 20 28 73 74 72 20 26 | swiper--isearch-highlight.(str.& |
| f8c0 | 6f 70 74 69 6f 6e 61 6c 20 63 75 72 72 65 6e 74 29 0a 20 20 28 6c 65 74 20 28 28 73 74 61 72 74 | optional.current)...(let.((start |
| f8e0 | 20 30 29 0a 20 20 20 20 20 20 20 20 28 69 20 30 29 0a 20 20 20 20 20 20 20 20 28 72 65 20 28 69 | .0).........(i.0).........(re.(i |
| f900 | 76 79 2d 72 65 2d 74 6f 2d 73 74 72 20 69 76 79 2d 72 65 67 65 78 29 29 29 0a 20 20 20 20 28 63 | vy-re-to-str.ivy-regex))).....(c |
| f920 | 61 74 63 68 20 27 64 6f 6e 65 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 74 72 69 6e 67 2d | atch.'done.......(while.(string- |
| f940 | 6d 61 74 63 68 20 72 65 20 73 74 72 20 73 74 61 72 74 29 0a 20 20 20 20 20 20 20 20 28 69 66 20 | match.re.str.start).........(if. |
| f960 | 28 3d 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 20 28 6d 61 74 63 68 2d 65 6e | (=.(match-beginning.0).(match-en |
| f980 | 64 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 74 68 72 6f 77 20 27 64 6f 6e 65 20 74 | d.0)).............(throw.'done.t |
| f9a0 | 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 61 72 74 20 28 6d 61 74 63 68 2d 65 | )...........(setq.start.(match-e |
| f9c0 | 6e 64 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 61 64 64 2d 70 72 6f | nd.0))).........(swiper--add-pro |
| f9e0 | 70 65 72 74 69 65 73 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 20 63 75 72 72 65 6e 74 | perties..........(if.(eq.current |
| fa00 | 20 69 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 66 61 63 65 73 0a 20 20 | .i)..............swiper-faces... |
| fa20 | 20 20 20 20 20 20 20 20 20 73 77 69 70 65 72 2d 62 61 63 6b 67 72 6f 75 6e 64 2d 66 61 63 65 73 | .........swiper-background-faces |
| fa40 | 29 0a 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 62 65 67 20 65 6e 64 20 66 61 63 65 | )..........(lambda.(beg.end.face |
| fa60 | 20 5f 70 72 69 6f 72 69 74 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 61 64 64 2d 66 61 63 65 | ._priority)............(add-face |
| fa80 | 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 62 65 67 20 65 6e 64 20 66 61 63 65 20 6e 69 6c 20 | -text-property.beg.end.face.nil. |
| faa0 | 73 74 72 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 69 29 29 29 0a 20 20 20 | str))).........(cl-incf.i))).... |
| fac0 | 20 73 74 72 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 66 | .str))..(defun.swiper--isearch-f |
| fae0 | 6f 72 6d 61 74 20 28 69 6e 64 65 78 20 6c 65 6e 67 74 68 20 63 61 6e 64 73 20 72 65 67 65 78 20 | ormat.(index.length.cands.regex. |
| fb00 | 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 29 0a 20 20 28 6c 65 74 2a 20 28 28 68 61 6c 66 2d 68 | current.buffer)...(let*.((half-h |
| fb20 | 65 69 67 68 74 20 28 2f 20 69 76 79 2d 68 65 69 67 68 74 20 32 29 29 0a 20 20 20 20 20 20 20 20 | eight.(/.ivy-height.2))......... |
| fb40 | 20 28 69 20 28 31 2d 20 69 6e 64 65 78 29 29 0a 20 20 20 20 20 20 20 20 20 28 6a 20 30 29 0a 20 | .(i.(1-.index))..........(j.0).. |
| fb60 | 20 20 20 20 20 20 20 20 28 6c 65 6e 20 30 29 0a 20 20 20 20 20 20 20 20 20 72 65 73 20 73 29 0a | ........(len.0)..........res.s). |
| fb80 | 20 20 20 20 28 77 69 74 68 2d 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 0a | ....(with-current-buffer.buffer. |
| fba0 | 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 3e 3d 20 69 20 30 29 0a 20 20 20 20 20 | ......(while.(and.(>=.i.0)...... |
| fbc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 73 61 | .............(swiper--isearch-sa |
| fbe0 | 6d 65 2d 6c 69 6e 65 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 | me-line-p....................(sw |
| fc00 | 69 70 65 72 2d 2d 6c 69 6e 65 2d 61 74 2d 70 6f 69 6e 74 20 28 6e 74 68 20 69 20 63 61 6e 64 73 | iper--line-at-point.(nth.i.cands |
| fc20 | 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 6c | ))....................(swiper--l |
| fc40 | 69 6e 65 2d 61 74 2d 70 6f 69 6e 74 20 63 75 72 72 65 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 | ine-at-point.current)))......... |
| fc60 | 28 63 6c 2d 64 65 63 66 20 69 29 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 6a 29 29 | (cl-decf.i).........(cl-incf.j)) |
| fc80 | 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 3e 3d 20 69 20 30 29 0a 20 20 20 20 | .......(while.(and.(>=.i.0)..... |
| fca0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3c 20 6c 65 6e 20 68 61 6c 66 2d 68 65 69 67 68 74 | ..............(<.len.half-height |
| fcc0 | 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 20 28 73 77 69 70 65 72 2d 2d 6c 69 6e 65 | )).........(setq.s.(swiper--line |
| fce0 | 2d 61 74 2d 70 6f 69 6e 74 20 28 6e 74 68 20 69 20 63 61 6e 64 73 29 29 29 0a 20 20 20 20 20 20 | -at-point.(nth.i.cands)))....... |
| fd00 | 20 20 28 75 6e 6c 65 73 73 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 73 61 6d 65 2d | ..(unless.(swiper--isearch-same- |
| fd20 | 6c 69 6e 65 2d 70 20 73 20 28 63 61 72 20 72 65 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 | line-p.s.(car.res))...........(p |
| fd40 | 75 73 68 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 20 73 | ush.(swiper--isearch-highlight.s |
| fd60 | 29 20 72 65 73 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 6c 65 6e 29 29 0a | ).res)...........(cl-incf.len)). |
| fd80 | 20 20 20 20 20 20 20 20 28 63 6c 2d 64 65 63 66 20 69 29 29 0a 20 20 20 20 20 20 28 73 65 74 71 | ........(cl-decf.i)).......(setq |
| fda0 | 20 72 65 73 20 28 6e 72 65 76 65 72 73 65 20 72 65 73 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 | .res.(nreverse.res)).......(let. |
| fdc0 | 28 28 63 75 72 72 65 6e 74 2d 73 74 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 | ((current-str..............(swip |
| fde0 | 65 72 2d 2d 6c 69 6e 65 2d 61 74 2d 70 6f 69 6e 74 20 63 75 72 72 65 6e 74 29 29 0a 20 20 20 20 | er--line-at-point.current))..... |
| fe00 | 20 20 20 20 20 20 20 20 28 73 74 61 72 74 20 30 29 29 0a 20 20 20 20 20 20 20 20 28 64 6f 74 69 | ........(start.0)).........(doti |
| fe20 | 6d 65 73 20 28 5f 20 28 31 2b 20 6a 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 | mes.(_.(1+.j))...........(string |
| fe40 | 2d 6d 61 74 63 68 20 72 65 67 65 78 20 63 75 72 72 65 6e 74 2d 73 74 72 20 73 74 61 72 74 29 0a | -match.regex.current-str.start). |
| fe60 | 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 73 74 61 72 74 20 28 6d 61 74 63 68 2d 65 6e 64 | ..........(setq.start.(match-end |
| fe80 | 20 30 29 29 29 0a 20 20 20 20 20 20 20 20 28 66 6f 6e 74 2d 6c 6f 63 6b 2d 70 72 65 70 65 6e 64 | .0))).........(font-lock-prepend |
| fea0 | 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 0a 20 20 20 20 20 20 20 20 20 30 20 28 6c 65 6e 67 74 | -text-property..........0.(lengt |
| fec0 | 68 20 63 75 72 72 65 6e 74 2d 73 74 72 29 0a 20 20 20 20 20 20 20 20 20 27 66 61 63 65 20 27 73 | h.current-str)..........'face.'s |
| fee0 | 77 69 70 65 72 2d 6c 69 6e 65 2d 66 61 63 65 20 63 75 72 72 65 6e 74 2d 73 74 72 29 0a 20 20 20 | wiper-line-face.current-str).... |
| ff00 | 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 20 | .....(swiper--isearch-highlight. |
| ff20 | 63 75 72 72 65 6e 74 2d 73 74 72 20 6a 29 0a 20 20 20 20 20 20 20 20 28 70 75 73 68 20 63 75 72 | current-str.j).........(push.cur |
| ff40 | 72 65 6e 74 2d 73 74 72 20 72 65 73 29 29 0a 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 20 6c 65 | rent-str.res)).......(cl-incf.le |
| ff60 | 6e 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 69 20 28 31 2b 20 69 6e 64 65 78 29 29 0a 20 20 20 | n).......(setq.i.(1+.index)).... |
| ff80 | 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 3c 20 69 20 6c 65 6e 67 74 68 29 0a 20 20 20 20 | ...(while.(and.(<.i.length)..... |
| ffa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 73 | ..............(swiper--isearch-s |
| ffc0 | 61 6d 65 2d 6c 69 6e 65 2d 70 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 | ame-line-p....................(s |
| ffe0 | 77 69 70 65 72 2d 2d 6c 69 6e 65 2d 61 74 2d 70 6f 69 6e 74 20 28 6e 74 68 20 69 20 63 61 6e 64 | wiper--line-at-point.(nth.i.cand |
| 10000 | 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 2d | s))....................(swiper-- |
| 10020 | 6c 69 6e 65 2d 61 74 2d 70 6f 69 6e 74 20 63 75 72 72 65 6e 74 29 29 29 0a 20 20 20 20 20 20 20 | line-at-point.current)))........ |
| 10040 | 20 28 63 6c 2d 69 6e 63 66 20 69 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 | .(cl-incf.i)).......(while.(and. |
| 10060 | 28 3c 20 69 20 6c 65 6e 67 74 68 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | (<.i.length)...................( |
| 10080 | 3c 20 6c 65 6e 20 69 76 79 2d 68 65 69 67 68 74 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 | <.len.ivy-height)).........(setq |
| 100a0 | 20 73 20 28 73 77 69 70 65 72 2d 2d 6c 69 6e 65 2d 61 74 2d 70 6f 69 6e 74 20 28 6e 74 68 20 69 | .s.(swiper--line-at-point.(nth.i |
| 100c0 | 20 63 61 6e 64 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 77 69 70 65 | .cands))).........(unless.(swipe |
| 100e0 | 72 2d 2d 69 73 65 61 72 63 68 2d 73 61 6d 65 2d 6c 69 6e 65 2d 70 20 73 20 28 63 61 72 20 72 65 | r--isearch-same-line-p.s.(car.re |
| 10100 | 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 70 75 73 68 20 28 73 77 69 70 65 72 2d 2d 69 73 65 | s))...........(push.(swiper--ise |
| 10120 | 61 72 63 68 2d 68 69 67 68 6c 69 67 68 74 20 73 29 20 72 65 73 29 0a 20 20 20 20 20 20 20 20 20 | arch-highlight.s).res).......... |
| 10140 | 20 28 63 6c 2d 69 6e 63 66 20 6c 65 6e 29 29 0a 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 66 | .(cl-incf.len)).........(cl-incf |
| 10160 | 20 69 29 29 0a 20 20 20 20 20 20 28 6e 72 65 76 65 72 73 65 20 72 65 73 29 29 29 29 0a 0a 28 64 | .i)).......(nreverse.res))))..(d |
| 10180 | 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 69 6e 69 74 20 28 29 0a 20 20 22 | efun.swiper--isearch-init.()..." |
| 101a0 | 49 6e 69 74 69 61 6c 69 7a 65 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 2e 22 0a 20 20 | Initialize.`swiper-isearch'."... |
| 101c0 | 28 73 77 69 70 65 72 2d 2d 69 6e 69 74 29 0a 20 20 28 73 77 69 70 65 72 2d 66 6f 6e 74 2d 6c 6f | (swiper--init)...(swiper-font-lo |
| 101e0 | 63 6b 2d 65 6e 73 75 72 65 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 2d 69 73 65 61 | ck-ensure))..(defun.swiper--isea |
| 10200 | 72 63 68 2d 75 6e 77 69 6e 64 20 28 29 0a 20 20 28 73 77 69 70 65 72 2d 2d 63 6c 65 61 6e 75 70 | rch-unwind.()...(swiper--cleanup |
| 10220 | 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 28 65 71 20 69 76 79 2d 65 78 69 74 20 27 64 6f | )...(unless.(or.(eq.ivy-exit.'do |
| 10240 | 6e 65 29 20 73 77 69 70 65 72 2d 73 74 61 79 2d 6f 6e 2d 71 75 69 74 29 0a 20 20 20 20 28 67 6f | ne).swiper-stay-on-quit).....(go |
| 10260 | 74 6f 2d 63 68 61 72 20 73 77 69 70 65 72 2d 2d 6f 70 6f 69 6e 74 29 29 0a 20 20 28 69 73 65 61 | to-char.swiper--opoint))...(isea |
| 10280 | 72 63 68 2d 63 6c 65 61 6e 2d 6f 76 65 72 6c 61 79 73 29 0a 20 20 28 73 77 69 70 65 72 2d 2d 65 | rch-clean-overlays)...(swiper--e |
| 102a0 | 6e 73 75 72 65 2d 76 69 73 69 62 6c 65 29 0a 20 20 28 75 6e 6c 65 73 73 20 28 6f 72 20 28 65 71 | nsure-visible)...(unless.(or.(eq |
| 102c0 | 20 69 76 79 2d 65 78 69 74 20 27 64 6f 6e 65 29 20 28 73 74 72 69 6e 67 3d 20 69 76 79 2d 74 65 | .ivy-exit.'done).(string=.ivy-te |
| 102e0 | 78 74 20 22 22 29 29 0a 20 20 20 20 28 63 6c 2d 70 75 73 68 6e 65 77 20 69 76 79 2d 74 65 78 74 | xt."")).....(cl-pushnew.ivy-text |
| 10300 | 20 73 77 69 70 65 72 2d 68 69 73 74 6f 72 79 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f | .swiper-history)))..;;;###autolo |
| 10320 | 61 64 0a 28 64 65 66 75 6e 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 20 28 26 6f 70 74 69 6f | ad.(defun.swiper-isearch.(&optio |
| 10340 | 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 41 20 60 73 77 69 70 65 72 27 | nal.initial-input)..."A.`swiper' |
| 10360 | 20 74 68 61 74 27 73 20 6e 6f 74 20 6c 69 6e 65 2d 62 61 73 65 64 2e 22 0a 20 20 28 69 6e 74 65 | .that's.not.line-based."...(inte |
| 10380 | 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 69 76 79 2d 66 69 78 65 64 2d 68 65 69 67 | ractive)...(let.((ivy-fixed-heig |
| 103a0 | 68 74 2d 6d 69 6e 69 62 75 66 66 65 72 20 74 29 0a 20 20 20 20 20 20 20 20 28 63 75 72 73 6f 72 | ht-minibuffer.t).........(cursor |
| 103c0 | 2d 69 6e 2d 6e 6f 6e 2d 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 73 20 6e 69 6c 29 0a 20 20 | -in-non-selected-windows.nil)... |
| 103e0 | 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 6d 69 6e 2d 68 69 67 68 6c 69 67 68 74 20 31 29 29 0a | ......(swiper-min-highlight.1)). |
| 10400 | 20 20 20 20 28 69 76 79 2d 72 65 61 64 0a 20 20 20 20 20 22 53 77 69 70 65 72 3a 20 22 0a 20 20 | ....(ivy-read......"Swiper:."... |
| 10420 | 20 20 20 23 27 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 | ...#'swiper-isearch-function.... |
| 10440 | 20 20 3a 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 0a 20 | ..:initial-input.initial-input.. |
| 10460 | 20 20 20 20 3a 6b 65 79 6d 61 70 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 6d 61 70 0a 20 | ....:keymap.swiper-isearch-map.. |
| 10480 | 20 20 20 20 3a 64 79 6e 61 6d 69 63 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 74 0a 20 20 20 20 20 3a | ....:dynamic-collection.t......: |
| 104a0 | 72 65 71 75 69 72 65 2d 6d 61 74 63 68 20 74 0a 20 20 20 20 20 3a 61 63 74 69 6f 6e 20 23 27 73 | require-match.t......:action.#'s |
| 104c0 | 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 61 63 74 69 6f 6e 0a 20 20 20 20 20 3a 72 65 2d 62 75 | wiper-isearch-action......:re-bu |
| 104e0 | 69 6c 64 65 72 20 23 27 73 77 69 70 65 72 2d 2d 72 65 2d 62 75 69 6c 64 65 72 0a 20 20 20 20 20 | ilder.#'swiper--re-builder...... |
| 10500 | 3a 68 69 73 74 6f 72 79 20 27 73 77 69 70 65 72 2d 68 69 73 74 6f 72 79 0a 20 20 20 20 20 3a 65 | :history.'swiper-history......:e |
| 10520 | 78 74 72 61 2d 70 72 6f 70 73 20 28 6c 69 73 74 20 3a 66 6e 61 6d 65 20 28 62 75 66 66 65 72 2d | xtra-props.(list.:fname.(buffer- |
| 10540 | 66 69 6c 65 2d 6e 61 6d 65 29 29 0a 20 20 20 20 20 3a 63 61 6c 6c 65 72 20 27 73 77 69 70 65 72 | file-name))......:caller.'swiper |
| 10560 | 2d 69 73 65 61 72 63 68 29 29 29 0a 0a 28 69 76 79 2d 63 6f 6e 66 69 67 75 72 65 20 27 73 77 69 | -isearch)))..(ivy-configure.'swi |
| 10580 | 70 65 72 2d 69 73 65 61 72 63 68 0a 20 20 3a 6f 63 63 75 72 20 23 27 73 77 69 70 65 72 2d 6f 63 | per-isearch...:occur.#'swiper-oc |
| 105a0 | 63 75 72 0a 20 20 3a 69 6e 69 74 2d 66 6e 20 23 27 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 | cur...:init-fn.#'swiper--isearch |
| 105c0 | 2d 69 6e 69 74 0a 20 20 3a 75 70 64 61 74 65 2d 66 6e 20 27 61 75 74 6f 0a 20 20 3a 75 6e 77 69 | -init...:update-fn.'auto...:unwi |
| 105e0 | 6e 64 2d 66 6e 20 23 27 73 77 69 70 65 72 2d 2d 69 73 65 61 72 63 68 2d 75 6e 77 69 6e 64 0a 20 | nd-fn.#'swiper--isearch-unwind.. |
| 10600 | 20 3a 66 6f 72 6d 61 74 2d 66 6e 20 23 27 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 66 6f 72 | .:format-fn.#'swiper-isearch-for |
| 10620 | 6d 61 74 2d 66 75 6e 63 74 69 6f 6e 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 | mat-function)..;;;###autoload.(d |
| 10640 | 65 66 75 6e 20 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 28 26 6f | efun.swiper-isearch-backward.(&o |
| 10660 | 70 74 69 6f 6e 61 6c 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 0a 20 20 22 4c 69 6b 65 20 60 | ptional.initial-input)..."Like.` |
| 10680 | 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 27 20 62 75 74 20 74 68 65 20 66 69 72 73 74 20 72 65 | swiper-isearch'.but.the.first.re |
| 106a0 | 73 75 6c 74 20 69 73 20 62 65 66 6f 72 65 20 74 68 65 20 70 6f 69 6e 74 2e 22 0a 20 20 28 69 6e | sult.is.before.the.point."...(in |
| 106c0 | 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 6c 65 74 20 28 28 73 77 69 70 65 72 2d 2d 69 73 65 61 | teractive)...(let.((swiper--isea |
| 106e0 | 72 63 68 2d 62 61 63 6b 77 61 72 64 20 74 29 29 0a 20 20 20 20 28 73 77 69 70 65 72 2d 69 73 65 | rch-backward.t)).....(swiper-ise |
| 10700 | 61 72 63 68 20 69 6e 69 74 69 61 6c 2d 69 6e 70 75 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 | arch.initial-input)))..(defun.sw |
| 10720 | 69 70 65 72 2d 69 73 65 61 72 63 68 2d 74 6f 67 67 6c 65 20 28 29 0a 20 20 22 54 77 6f 2d 77 61 | iper-isearch-toggle.()..."Two-wa |
| 10740 | 79 20 74 6f 67 67 6c 65 20 62 65 74 77 65 65 6e 20 60 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 | y.toggle.between.`swiper-isearch |
| 10760 | 27 20 61 6e 64 20 69 73 65 61 72 63 68 2e 0a 49 6e 74 65 6e 64 65 64 20 74 6f 20 62 65 20 62 6f | '.and.isearch..Intended.to.be.bo |
| 10780 | 75 6e 64 20 69 6e 20 60 69 73 65 61 72 63 68 2d 6d 6f 64 65 2d 6d 61 70 27 20 61 6e 64 20 60 73 | und.in.`isearch-mode-map'.and.`s |
| 107a0 | 77 69 70 65 72 2d 6d 61 70 27 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 | wiper-map'."...(interactive)...( |
| 107c0 | 69 66 20 69 73 65 61 72 63 68 2d 6d 6f 64 65 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 71 75 65 | if.isearch-mode.......(let.((que |
| 107e0 | 72 79 20 28 69 66 20 69 73 65 61 72 63 68 2d 72 65 67 65 78 70 0a 20 20 20 20 20 20 20 20 20 20 | ry.(if.isearch-regexp........... |
| 10800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 69 73 65 61 72 63 68 2d 73 74 72 69 6e 67 0a 20 20 20 20 | .............isearch-string..... |
| 10820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 67 65 78 70 2d 71 75 6f 74 65 20 69 | .................(regexp-quote.i |
| 10840 | 73 65 61 72 63 68 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 69 73 65 61 72 | search-string)))).........(isear |
| 10860 | 63 68 2d 65 78 69 74 29 0a 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 72 20 | ch-exit).........(goto-char.(or. |
| 10880 | 28 61 6e 64 20 69 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 69 73 65 61 72 63 68 2d 6f 74 68 | (and.isearch-forward.isearch-oth |
| 108a0 | 65 72 2d 65 6e 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | er-end)........................( |
| 108c0 | 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 20 20 28 73 77 69 70 65 72 2d 69 73 65 61 72 63 68 | point))).........(swiper-isearch |
| 108e0 | 20 71 75 65 72 79 29 29 0a 20 20 20 20 28 69 76 79 2d 65 78 69 74 2d 77 69 74 68 2d 61 63 74 69 | .query)).....(ivy-exit-with-acti |
| 10900 | 6f 6e 0a 20 20 20 20 20 28 6c 61 6d 62 64 61 20 28 5f 29 0a 20 20 20 20 20 20 20 28 77 68 65 6e | on......(lambda.(_)........(when |
| 10920 | 20 28 6c 6f 6f 6b 69 6e 67 2d 62 61 63 6b 20 28 69 76 79 2d 72 65 2d 74 6f 2d 73 74 72 20 69 76 | .(looking-back.(ivy-re-to-str.iv |
| 10940 | 79 2d 72 65 67 65 78 29 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f | y-regex).(line-beginning-positio |
| 10960 | 6e 29 29 0a 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 6d 61 74 63 68 2d 62 | n))..........(goto-char.(match-b |
| 10980 | 65 67 69 6e 6e 69 6e 67 20 30 29 29 29 0a 20 20 20 20 20 20 20 28 69 73 65 61 72 63 68 2d 6d 6f | eginning.0)))........(isearch-mo |
| 109a0 | 64 65 20 74 29 0a 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 74 72 69 6e 67 3d 20 69 76 | de.t)........(unless.(string=.iv |
| 109c0 | 79 2d 74 65 78 74 20 22 22 29 0a 20 20 20 20 20 20 20 20 20 28 69 73 65 61 72 63 68 2d 79 61 6e | y-text."")..........(isearch-yan |
| 109e0 | 6b 2d 73 74 72 69 6e 67 20 69 76 79 2d 74 65 78 74 29 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 | k-string.ivy-text))))))..(provid |
| 10a00 | 65 20 27 73 77 69 70 65 72 29 0a 0a 3b 3b 3b 20 73 77 69 70 65 72 2e 65 6c 20 65 6e 64 73 20 68 | e.'swiper)..;;;.swiper.el.ends.h |
| 10a20 | 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ere............................. |
| 10a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10a60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10aa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10be0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10c00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10c20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10c40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10c60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10c80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10cc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10d00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10d20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10d40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10d60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10d80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10da0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10dc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10de0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10e00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10e20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10e40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10e60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10e80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10ee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 10fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11000 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 110a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 110c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 110e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 111a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 111c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 111e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11260 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11280 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 112a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 112c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 112e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 113a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 113c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 113e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11400 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 114a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 114c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 114e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 115a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 115c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 115e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 116a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 116c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 116e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 11780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 117a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 117c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 117e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |