| ofs | hex dump | ascii |
|---|
| 0000 | 6d 6f 76 65 2d 74 65 78 74 2d 32 30 32 33 31 32 30 34 2e 31 35 31 34 2f 00 00 00 00 00 00 00 00 | move-text-20231204.1514/........ |
| 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 32 37 33 31 00 20 35 00 00 00 | 0000000.00000000000.012731..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 | 6d 6f 76 65 2d 74 65 78 74 2d 32 30 32 33 31 32 30 34 2e 31 35 31 34 2f 6d 6f 76 65 2d 74 65 78 | move-text-20231204.1514/move-tex |
| 0220 | 74 2d 70 6b 67 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | t-pkg.el........................ |
| 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 34 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 37 36 36 00 20 30 00 00 00 | 0000644.00000000000.015766..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 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63 | ;;.-*-.no-byte-compile:.t;.lexic |
| 0420 | 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 6e 69 6c 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b | al-binding:.nil.-*-.(define-pack |
| 0440 | 61 67 65 20 22 6d 6f 76 65 2d 74 65 78 74 22 20 22 32 30 32 33 31 32 30 34 2e 31 35 31 34 22 0a | age."move-text"."20231204.1514". |
| 0460 | 20 20 22 4d 6f 76 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 6f 72 20 72 65 67 69 6f 6e 20 77 | .."Move.current.line.or.region.w |
| 0480 | 69 74 68 20 4d 2d 75 70 20 6f 72 20 4d 2d 64 6f 77 6e 2e 22 0a 20 20 28 29 0a 20 20 3a 75 72 6c | ith.M-up.or.M-down."...()...:url |
| 04a0 | 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 65 6d 61 63 73 66 6f 64 64 65 72 | ."https://github.com/emacsfodder |
| 04c0 | 2f 6d 6f 76 65 2d 74 65 78 74 22 0a 20 20 3a 63 6f 6d 6d 69 74 20 22 39 30 65 66 30 62 30 37 38 | /move-text"...:commit."90ef0b078 |
| 04e0 | 64 62 63 62 32 64 65 65 34 37 61 31 35 62 30 63 36 63 36 66 34 31 37 31 30 31 65 30 63 34 33 22 | dbcb2dee47a15b0c6c6f417101e0c43" |
| 0500 | 0a 20 20 3a 72 65 76 64 65 73 63 20 22 39 30 65 66 30 62 30 37 38 64 62 63 22 0a 20 20 3a 6b 65 | ...:revdesc."90ef0b078dbc"...:ke |
| 0520 | 79 77 6f 72 64 73 20 27 28 22 65 64 69 74 22 29 0a 20 20 3a 61 75 74 68 6f 72 73 20 27 28 28 22 | ywords.'("edit")...:authors.'((" |
| 0540 | 4a 61 73 6f 6e 20 4d 69 6c 6b 69 6e 73 22 20 2e 20 22 6a 61 73 6f 6e 6d 32 33 40 67 6d 61 69 6c | Jason.Milkins"..."jasonm23@gmail |
| 0560 | 2e 63 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 20 27 28 28 22 4a 61 73 6f 6e | .com"))...:maintainers.'(("Jason |
| 0580 | 20 4d 69 6c 6b 69 6e 73 22 20 2e 20 22 6a 61 73 6f 6e 6d 32 33 40 67 6d 61 69 6c 2e 63 6f 6d 22 | .Milkins"..."jasonm23@gmail.com" |
| 05a0 | 29 29 29 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 | )))............................. |
| 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 | 6d 6f 76 65 2d 74 65 78 74 2d 32 30 32 33 31 32 30 34 2e 31 35 31 34 2f 6d 6f 76 65 2d 74 65 78 | move-text-20231204.1514/move-tex |
| 0620 | 74 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | t.el............................ |
| 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 31 34 31 32 35 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 35 32 30 36 00 20 30 00 00 00 | 0014125.00000000000.015206..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 6d 6f 76 65 2d 74 65 78 74 2e 65 6c 20 2d 2d 2d 20 4d 6f 76 65 20 63 75 72 72 65 6e | ;;;.move-text.el.---.Move.curren |
| 0820 | 74 20 6c 69 6e 65 20 6f 72 20 72 65 67 69 6f 6e 20 77 69 74 68 20 4d 2d 75 70 20 6f 72 20 4d 2d | t.line.or.region.with.M-up.or.M- |
| 0840 | 64 6f 77 6e 2e 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 3b 20 2d 2a | down..-*-.lexical-binding:.t;.-* |
| 0860 | 2d 0a 0a 3b 3b 20 66 69 6c 65 6e 61 6d 65 3a 20 6d 6f 76 65 2d 74 65 78 74 2e 65 6c 0a 3b 3b 20 | -..;;.filename:.move-text.el.;;. |
| 0880 | 44 65 73 63 72 69 70 74 69 6f 6e 3a 20 4d 6f 76 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 6f | Description:.Move.current.line.o |
| 08a0 | 72 20 72 65 67 69 6f 6e 20 77 69 74 68 20 4d 2d 75 70 20 6f 72 20 4d 2d 64 6f 77 6e 2e 0a 3b 3b | r.region.with.M-up.or.M-down..;; |
| 08c0 | 20 41 75 74 68 6f 72 3a 20 4a 61 73 6f 6e 20 4d 69 6c 6b 69 6e 73 20 3c 6a 61 73 6f 6e 6d 32 33 | .Author:.Jason.Milkins.<jasonm23 |
| 08e0 | 40 67 6d 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 65 64 69 74 0a 3b 3b | @gmail.com>.;;.Keywords:.edit.;; |
| 0900 | 20 55 72 6c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 65 6d 61 63 73 66 6f | .Url:.https://github.com/emacsfo |
| 0920 | 64 64 65 72 2f 6d 6f 76 65 2d 74 65 78 74 0a 3b 3b 20 43 6f 6d 70 61 74 69 62 69 6c 69 74 79 3a | dder/move-text.;;.Compatibility: |
| 0940 | 20 47 4e 55 20 45 6d 61 63 73 20 32 35 2e 31 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 56 65 72 73 69 | .GNU.Emacs.25.1.;;.Package-Versi |
| 0960 | 6f 6e 3a 20 32 30 32 33 31 32 30 34 2e 31 35 31 34 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 76 | on:.20231204.1514.;;.Package-Rev |
| 0980 | 69 73 69 6f 6e 3a 20 39 30 65 66 30 62 30 37 38 64 62 63 0a 3b 3b 0a 3b 3b 3b 20 54 68 69 73 20 | ision:.90ef0b078dbc.;;.;;;.This. |
| 09a0 | 66 69 6c 65 20 69 73 20 4e 4f 54 20 70 61 72 74 20 6f 66 20 47 4e 55 20 45 6d 61 63 73 0a 0a 3b | file.is.NOT.part.of.GNU.Emacs..; |
| 09c0 | 3b 3b 20 4c 69 63 65 6e 73 65 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 | ;;.License.;;.;;.This.program.is |
| 09e0 | 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 | .free.software;.you.can.redistri |
| 0a00 | 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 | bute.it.and/or.modify.;;.it.unde |
| 0a20 | 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 | r.the.terms.of.the.GNU.General.P |
| 0a40 | 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b | ublic.License.as.published.by.;; |
| 0a60 | 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 3b 20 65 | .the.Free.Software.Foundation;.e |
| 0a80 | 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 2c 20 6f 72 20 28 61 74 20 79 6f 75 72 20 6f 70 74 | ither.version.3,.or.(at.your.opt |
| 0aa0 | 69 6f 6e 29 0a 3b 3b 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 | ion).;;.any.later.version...;;.T |
| 0ac0 | 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 | his.program.is.distributed.in.th |
| 0ae0 | 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b | e.hope.that.it.will.be.useful,.; |
| 0b00 | 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 | ;.but.WITHOUT.ANY.WARRANTY;.with |
| 0b20 | 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 | out.even.the.implied.warranty.of |
| 0b40 | 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 | .;;.MERCHANTABILITY.or.FITNESS.F |
| 0b60 | 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 | OR.A.PARTICULAR.PURPOSE...See.th |
| 0b80 | 65 0a 3b 3b 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 20 | e.;;.GNU.General.Public.License. |
| 0ba0 | 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 | for.more.details...;;.You.should |
| 0bc0 | 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 | .have.received.a.copy.of.the.GNU |
| 0be0 | 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 20 61 6c 6f 6e 67 | .General.Public.License.;;.along |
| 0c00 | 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 3b 20 73 65 65 20 74 68 65 20 66 69 6c 65 | .with.this.program;.see.the.file |
| 0c20 | 20 43 4f 50 59 49 4e 47 2e 20 20 49 66 20 6e 6f 74 2c 20 77 72 69 74 65 20 74 6f 0a 3b 3b 20 74 | .COPYING...If.not,.write.to.;;.t |
| 0c40 | 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e 63 | he.Free.Software.Foundation,.Inc |
| 0c60 | 2e 2c 20 35 31 20 46 72 61 6e 6b 6c 69 6e 20 53 74 72 65 65 74 2c 20 46 69 66 74 68 0a 3b 3b 20 | .,.51.Franklin.Street,.Fifth.;;. |
| 0c80 | 46 6c 6f 6f 72 2c 20 42 6f 73 74 6f 6e 2c 20 4d 41 20 30 32 31 31 30 2d 31 33 30 31 2c 20 55 53 | Floor,.Boston,.MA.02110-1301,.US |
| 0ca0 | 41 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 3b 3b 0a 3b 3b 20 4d 6f 76 65 54 65 | A...;;;.Commentary:.;;.;;.MoveTe |
| 0cc0 | 78 74 20 32 2e 30 2e 30 20 69 73 20 61 20 72 65 2d 77 72 69 74 65 20 6f 66 20 74 68 65 20 6f 6c | xt.2.0.0.is.a.re-write.of.the.ol |
| 0ce0 | 64 20 6d 6f 76 65 2d 74 65 78 74 20 61 6e 64 20 63 6f 6d 70 61 74 69 62 6c 65 20 77 69 74 68 20 | d.move-text.and.compatible.with. |
| 0d00 | 3e 3d 20 45 6d 61 63 73 20 32 35 2e 31 0a 3b 3b 0a 3b 3b 20 49 74 20 61 6c 6c 6f 77 73 20 79 6f | >=.Emacs.25.1.;;.;;.It.allows.yo |
| 0d20 | 75 20 74 6f 20 6d 6f 76 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 75 73 69 6e 67 | u.to.move.the.current.line.using |
| 0d40 | 20 4d 2d 75 70 20 2f 20 4d 2d 64 6f 77 6e 20 69 66 20 61 0a 3b 3b 20 72 65 67 69 6f 6e 20 69 73 | .M-up./.M-down.if.a.;;.region.is |
| 0d60 | 20 6d 61 72 6b 65 64 2c 20 69 74 20 77 69 6c 6c 20 6d 6f 76 65 20 74 68 65 20 72 65 67 69 6f 6e | .marked,.it.will.move.the.region |
| 0d80 | 20 69 6e 73 74 65 61 64 2e 0a 3b 3b 0a 3b 3b 20 55 73 69 6e 67 20 74 68 65 20 70 72 65 66 69 78 | .instead..;;.;;.Using.the.prefix |
| 0da0 | 20 28 43 2d 75 20 2a 6e 75 6d 62 65 72 2a 20 6f 72 20 4d 45 54 41 20 2a 6e 75 6d 62 65 72 2a 29 | .(C-u.*number*.or.META.*number*) |
| 0dc0 | 20 79 6f 75 20 63 61 6e 20 70 72 65 64 65 66 69 6e 65 20 68 6f 77 0a 3b 3b 20 6d 61 6e 79 20 6c | .you.can.predefine.how.;;.many.l |
| 0de0 | 69 6e 65 73 20 6d 6f 76 65 2d 74 65 78 74 20 77 69 6c 6c 20 74 72 61 76 65 6c 2e 0a 3b 3b 0a 0a | ines.move-text.will.travel..;;.. |
| 0e00 | 3b 3b 3b 20 49 6e 73 74 61 6c 6c 61 74 69 6f 6e 3a 0a 3b 3b 0a 3b 3b 20 50 75 74 20 6d 6f 76 65 | ;;;.Installation:.;;.;;.Put.move |
| 0e20 | 2d 74 65 78 74 2e 65 6c 20 74 6f 20 79 6f 75 72 20 6c 6f 61 64 2d 70 61 74 68 2e 0a 3b 3b 20 54 | -text.el.to.your.load-path..;;.T |
| 0e40 | 68 65 20 6c 6f 61 64 2d 70 61 74 68 20 69 73 20 75 73 75 61 6c 6c 79 20 7e 2f 65 6c 69 73 70 2f | he.load-path.is.usually.~/elisp/ |
| 0e60 | 2e 0a 3b 3b 20 49 74 27 73 20 73 65 74 20 69 6e 20 79 6f 75 72 20 7e 2f 2e 65 6d 61 63 73 20 6c | ..;;.It's.set.in.your.~/.emacs.l |
| 0e80 | 69 6b 65 20 74 68 69 73 3a 0a 3b 3b 20 28 61 64 64 2d 74 6f 2d 6c 69 73 74 20 27 6c 6f 61 64 2d | ike.this:.;;.(add-to-list.'load- |
| 0ea0 | 70 61 74 68 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 7e 2f 65 6c 69 73 70 22 | path.(expand-file-name."~/elisp" |
| 0ec0 | 29 29 0a 3b 3b 0a 3b 3b 20 41 6e 64 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 6f 20 79 6f | )).;;.;;.And.the.following.to.yo |
| 0ee0 | 75 72 20 7e 2f 2e 65 6d 61 63 73 20 73 74 61 72 74 75 70 20 66 69 6c 65 2e 0a 3b 3b 0a 3b 3b 20 | ur.~/.emacs.startup.file..;;.;;. |
| 0f00 | 28 72 65 71 75 69 72 65 20 27 6d 6f 76 65 2d 74 65 78 74 29 0a 3b 3b 20 28 6d 6f 76 65 2d 74 65 | (require.'move-text).;;.(move-te |
| 0f20 | 78 74 2d 64 65 66 61 75 6c 74 2d 62 69 6e 64 69 6e 67 73 29 0a 0a 3b 3b 3b 20 41 63 6b 6e 6f 77 | xt-default-bindings)..;;;.Acknow |
| 0f40 | 6c 65 64 67 65 6d 65 6e 74 73 3a 0a 3b 3b 0a 3b 3b 20 20 4f 72 69 67 69 6e 61 6c 20 76 31 2e 78 | ledgements:.;;.;;..Original.v1.x |
| 0f60 | 20 77 61 73 20 61 20 46 65 61 74 75 72 65 20 65 78 74 72 61 63 74 65 64 20 66 72 6f 6d 20 62 61 | .was.a.Feature.extracted.from.ba |
| 0f80 | 73 69 63 2d 65 64 69 74 2d 74 6f 6f 6c 6b 69 74 2e 65 6c 20 2d 20 62 79 20 41 6e 64 79 20 53 74 | sic-edit-toolkit.el.-.by.Andy.St |
| 0fa0 | 65 77 61 72 74 20 28 4c 61 7a 79 43 61 74 29 0a 3b 3b 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 28 72 | ewart.(LazyCat).;;..;;;.Code:.(r |
| 0fc0 | 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 0a 28 64 65 66 75 6e 20 6d 6f 76 65 2d 74 65 78 | equire.'cl-lib)..(defun.move-tex |
| 0fe0 | 74 2d 67 65 74 2d 72 65 67 69 6f 6e 2d 61 6e 64 2d 70 72 65 66 69 78 20 28 29 0a 20 20 20 20 22 | t-get-region-and-prefix.()....." |
| 1000 | 47 65 74 20 74 68 65 20 72 65 67 69 6f 6e 20 61 6e 64 20 70 72 65 66 69 78 20 66 6f 72 20 74 68 | Get.the.region.and.prefix.for.th |
| 1020 | 65 20 60 69 6e 74 65 72 61 63 74 69 76 65 27 20 6d 61 63 72 6f 2c 20 77 69 74 68 6f 75 74 20 61 | e.`interactive'.macro,.without.a |
| 1040 | 62 6f 72 74 69 6e 67 2e 0a 0a 4e 6f 74 65 3a 20 60 72 65 67 69 6f 6e 2d 62 65 67 69 6e 6e 69 6e | borting...Note:.`region-beginnin |
| 1060 | 67 27 20 61 6e 64 20 60 72 65 67 69 6f 6e 2d 65 6e 64 27 20 61 72 65 20 74 68 65 20 72 65 61 73 | g'.and.`region-end'.are.the.reas |
| 1080 | 6f 6e 20 77 68 79 20 61 6e 0a 60 69 6e 74 65 72 61 63 74 69 76 65 27 20 6d 61 63 72 6f 20 77 69 | on.why.an.`interactive'.macro.wi |
| 10a0 | 74 68 20 5c 22 72 5c 22 20 77 69 6c 6c 20 62 6c 6f 77 20 75 70 20 77 69 74 68 20 74 68 65 20 65 | th.\"r\".will.blow.up.with.the.e |
| 10c0 | 72 72 6f 72 3a 0a 0a 5c 22 54 68 65 20 6d 61 72 6b 20 69 73 20 6e 6f 74 20 73 65 74 20 6e 6f 77 | rror:..\"The.mark.is.not.set.now |
| 10e0 | 2c 20 73 6f 20 74 68 65 72 65 20 69 73 20 6e 6f 20 72 65 67 69 6f 6e 5c 22 0a 0a 57 65 20 63 68 | ,.so.there.is.no.region\"..We.ch |
| 1100 | 65 63 6b 20 77 69 74 68 20 60 75 73 65 2d 72 65 67 69 6f 6e 2d 70 27 20 74 6f 20 61 76 6f 69 64 | eck.with.`use-region-p'.to.avoid |
| 1120 | 20 63 61 6c 6c 69 6e 67 0a 74 68 65 6d 20 77 68 65 6e 20 74 68 65 72 65 27 73 20 6e 6f 20 72 65 | .calling.them.when.there's.no.re |
| 1140 | 67 69 6f 6e 20 6f 72 20 69 74 20 69 73 20 6e 6f 74 20 61 70 70 72 6f 70 72 69 61 74 65 0a 74 6f | gion.or.it.is.not.appropriate.to |
| 1160 | 20 61 63 74 20 6f 6e 20 69 74 2e 0a 0a 57 65 20 75 73 65 20 60 70 72 65 66 69 78 2d 6e 75 6d 65 | .act.on.it...We.use.`prefix-nume |
| 1180 | 72 69 63 2d 76 61 6c 75 65 27 20 74 6f 20 72 65 74 75 72 6e 20 61 20 6e 75 6d 62 65 72 2e 0a 22 | ric-value'.to.return.a.number.." |
| 11a0 | 0a 20 20 20 20 28 6c 69 73 74 0a 20 20 20 20 20 28 77 68 65 6e 20 28 75 73 65 2d 72 65 67 69 6f | .....(list......(when.(use-regio |
| 11c0 | 6e 2d 70 29 20 28 72 65 67 69 6f 6e 2d 62 65 67 69 6e 6e 69 6e 67 29 29 20 3b 3b 20 6f 74 68 65 | n-p).(region-beginning)).;;.othe |
| 11e0 | 72 77 69 73 65 20 6e 69 6c 0a 20 20 20 20 20 28 77 68 65 6e 20 28 75 73 65 2d 72 65 67 69 6f 6e | rwise.nil......(when.(use-region |
| 1200 | 2d 70 29 20 28 72 65 67 69 6f 6e 2d 65 6e 64 29 29 0a 20 20 20 20 20 28 70 72 65 66 69 78 2d 6e | -p).(region-end))......(prefix-n |
| 1220 | 75 6d 65 72 69 63 2d 76 61 6c 75 65 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 29 | umeric-value.current-prefix-arg) |
| 1240 | 29 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 6d 6f 76 65 2d 74 | ))..;;;###autoload.(defun.move-t |
| 1260 | 65 78 74 2d 2d 74 6f 74 61 6c 2d 6c 69 6e 65 73 20 28 29 0a 20 20 22 43 6f 6e 76 65 6e 69 65 6e | ext--total-lines.()..."Convenien |
| 1280 | 63 65 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 67 65 74 20 74 68 65 20 74 6f 74 61 6c 20 6c 69 6e | ce.function.to.get.the.total.lin |
| 12a0 | 65 73 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 20 2f 20 6f 72 20 6e 61 72 72 6f 77 65 64 20 62 | es.in.the.buffer./.or.narrowed.b |
| 12c0 | 75 66 66 65 72 2e 22 0a 20 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 20 28 70 | uffer."...(line-number-at-pos.(p |
| 12e0 | 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 | oint-max)))..;;;###autoload.(def |
| 1300 | 75 6e 20 6d 6f 76 65 2d 74 65 78 74 2d 2d 61 74 2d 66 69 72 73 74 2d 6c 69 6e 65 2d 70 20 28 29 | un.move-text--at-first-line-p.() |
| 1320 | 0a 20 20 22 50 72 65 64 69 63 61 74 65 2c 20 69 73 20 74 68 65 20 70 6f 69 6e 74 20 61 74 20 74 | ..."Predicate,.is.the.point.at.t |
| 1340 | 68 65 20 66 69 72 73 74 20 6c 69 6e 65 3f 22 0a 20 20 28 3d 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 | he.first.line?"...(=.(line-numbe |
| 1360 | 72 2d 61 74 2d 70 6f 73 29 20 31 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 | r-at-pos).1))..;;;###autoload.(d |
| 1380 | 65 66 75 6e 20 6d 6f 76 65 2d 74 65 78 74 2d 2d 61 74 2d 70 65 6e 75 6c 74 69 6d 61 74 65 2d 6c | efun.move-text--at-penultimate-l |
| 13a0 | 69 6e 65 2d 70 20 28 29 0a 20 20 22 50 72 65 64 69 63 61 74 65 2c 20 69 73 20 74 68 65 20 70 6f | ine-p.()..."Predicate,.is.the.po |
| 13c0 | 69 6e 74 20 61 74 20 74 68 65 20 70 65 6e 75 6c 74 69 6d 61 74 65 20 6c 69 6e 65 3f 22 0a 20 20 | int.at.the.penultimate.line?"... |
| 13e0 | 28 3d 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 29 20 28 31 2d 20 28 6d 6f 76 | (=.(line-number-at-pos).(1-.(mov |
| 1400 | 65 2d 74 65 78 74 2d 2d 74 6f 74 61 6c 2d 6c 69 6e 65 73 29 29 29 29 0a 0a 3b 3b 20 73 61 76 65 | e-text--total-lines))))..;;.save |
| 1420 | 2d 6d 61 72 6b 2d 61 6e 64 2d 65 78 63 75 72 73 69 6f 6e 20 69 6e 20 45 6d 61 63 73 20 32 35 20 | -mark-and-excursion.in.Emacs.25. |
| 1440 | 77 6f 72 6b 73 20 6c 69 6b 65 20 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 20 64 69 64 20 62 65 | works.like.save-excursion.did.be |
| 1460 | 66 6f 72 65 0a 28 65 76 61 6c 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65 0a 20 20 28 77 68 65 6e 20 | fore.(eval-when-compile...(when. |
| 1480 | 28 3c 20 65 6d 61 63 73 2d 6d 61 6a 6f 72 2d 76 65 72 73 69 6f 6e 20 32 35 29 0a 20 20 20 20 28 | (<.emacs-major-version.25).....( |
| 14a0 | 64 65 66 6d 61 63 72 6f 20 73 61 76 65 2d 6d 61 72 6b 2d 61 6e 64 2d 65 78 63 75 72 73 69 6f 6e | defmacro.save-mark-and-excursion |
| 14c0 | 20 28 26 72 65 73 74 20 62 6f 64 79 29 0a 20 20 20 20 20 20 60 28 73 61 76 65 2d 65 78 63 75 72 | .(&rest.body).......`(save-excur |
| 14e0 | 73 69 6f 6e 20 2c 40 62 6f 64 79 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a | sion.,@body))))..;;;###autoload. |
| 1500 | 28 64 65 66 75 6e 20 6d 6f 76 65 2d 74 65 78 74 2d 2d 6c 61 73 74 2d 6c 69 6e 65 2d 69 73 2d 6a | (defun.move-text--last-line-is-j |
| 1520 | 75 73 74 2d 6e 65 77 6c 69 6e 65 20 28 29 0a 20 20 22 50 72 65 64 69 63 61 74 65 2c 20 69 73 20 | ust-newline.()..."Predicate,.is. |
| 1540 | 6c 61 73 74 20 6c 69 6e 65 20 6a 75 73 74 20 61 20 6e 65 77 6c 69 6e 65 3f 22 0a 20 20 28 73 61 | last.line.just.a.newline?"...(sa |
| 1560 | 76 65 2d 6d 61 72 6b 2d 61 6e 64 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 28 67 6f 74 6f 2d 63 | ve-mark-and-excursion....(goto-c |
| 1580 | 68 61 72 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d 6f | har.(point-max))....(beginning-o |
| 15a0 | 66 2d 6c 69 6e 65 29 0a 20 20 20 28 3d 20 28 70 6f 69 6e 74 2d 6d 61 78 29 20 28 70 6f 69 6e 74 | f-line)....(=.(point-max).(point |
| 15c0 | 29 29 29 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 6d 6f 76 65 | ))))..;;;###autoload.(defun.move |
| 15e0 | 2d 74 65 78 74 2d 2d 61 74 2d 6c 61 73 74 2d 6c 69 6e 65 2d 70 20 28 29 0a 20 20 22 50 72 65 64 | -text--at-last-line-p.()..."Pred |
| 1600 | 69 63 61 74 65 2c 20 69 73 20 74 68 65 20 70 6f 69 6e 74 20 61 74 20 74 68 65 20 6c 61 73 74 20 | icate,.is.the.point.at.the.last. |
| 1620 | 6c 69 6e 65 3f 22 0a 20 20 28 3d 20 28 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f 73 29 | line?"...(=.(line-number-at-pos) |
| 1640 | 20 28 6d 6f 76 65 2d 74 65 78 74 2d 2d 74 6f 74 61 6c 2d 6c 69 6e 65 73 29 29 29 0a 0a 3b 3b 3b | .(move-text--total-lines)))..;;; |
| 1660 | 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 6d 6f 76 65 2d 74 65 78 74 2d 6c 69 6e | ###autoload.(defun.move-text-lin |
| 1680 | 65 2d 75 70 20 28 29 0a 20 20 22 4d 6f 76 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 | e-up.()..."Move.the.current.line |
| 16a0 | 20 75 70 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 20 20 28 69 66 20 28 6d | .up."...(interactive).....(if.(m |
| 16c0 | 6f 76 65 2d 74 65 78 74 2d 2d 61 74 2d 6c 61 73 74 2d 6c 69 6e 65 2d 70 29 0a 20 20 20 20 20 20 | ove-text--at-last-line-p)....... |
| 16e0 | 20 20 28 6c 65 74 20 28 28 74 61 72 67 65 74 2d 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 | ..(let.((target-point))......... |
| 1700 | 20 20 28 6b 69 6c 6c 2d 77 68 6f 6c 65 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 66 | ..(kill-whole-line)...........(f |
| 1720 | 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 29 0a 20 20 20 20 20 20 20 20 20 20 28 62 65 67 69 6e | orward-line.-1)...........(begin |
| 1740 | 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 74 61 | ning-of-line)...........(setq.ta |
| 1760 | 72 67 65 74 2d 70 6f 69 6e 74 20 28 70 6f 69 6e 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 79 | rget-point.(point))...........(y |
| 1780 | 61 6e 6b 29 0a 20 20 20 20 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 6c 6f 6f 6b 69 6e 67 2d | ank)...........(unless.(looking- |
| 17a0 | 61 74 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 77 6c 69 6e 65 29 29 0a | at."\n").............(newline)). |
| 17c0 | 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 74 61 72 67 65 74 2d 70 6f 69 6e | ..........(goto-char.target-poin |
| 17e0 | 74 29 29 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 63 6f 6c 20 28 63 75 72 72 65 6e 74 2d 63 6f | t)).......(let.((col.(current-co |
| 1800 | 6c 75 6d 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 20 28 74 72 61 6e 73 70 6f 73 | lumn))).........(progn.(transpos |
| 1820 | 65 2d 6c 69 6e 65 73 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 77 61 | e-lines.1)................(forwa |
| 1840 | 72 64 2d 6c 69 6e 65 20 2d 32 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 6f 76 65 | rd-line.-2)................(move |
| 1860 | 2d 74 6f 2d 63 6f 6c 75 6d 6e 20 63 6f 6c 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c | -to-column.col)))))..;;;###autol |
| 1880 | 6f 61 64 0a 28 64 65 66 75 6e 20 6d 6f 76 65 2d 74 65 78 74 2d 6c 69 6e 65 2d 64 6f 77 6e 20 28 | oad.(defun.move-text-line-down.( |
| 18a0 | 29 0a 20 20 22 4d 6f 76 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 64 6f 77 6e 2e | )..."Move.the.current.line.down. |
| 18c0 | 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 73 20 28 6f 72 0a | "...(interactive)...(unless.(or. |
| 18e0 | 20 20 20 20 20 20 20 20 20 20 20 28 6d 6f 76 65 2d 74 65 78 74 2d 2d 61 74 2d 6c 61 73 74 2d 6c | ...........(move-text--at-last-l |
| 1900 | 69 6e 65 2d 70 29 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 | ine-p)............(and.......... |
| 1920 | 20 20 20 28 6d 6f 76 65 2d 74 65 78 74 2d 2d 6c 61 73 74 2d 6c 69 6e 65 2d 69 73 2d 6a 75 73 74 | ...(move-text--last-line-is-just |
| 1940 | 2d 6e 65 77 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 6f 76 65 2d 74 65 78 74 | -newline).............(move-text |
| 1960 | 2d 2d 61 74 2d 70 65 6e 75 6c 74 69 6d 61 74 65 2d 6c 69 6e 65 2d 70 29 29 29 0a 20 20 20 20 28 | --at-penultimate-line-p))).....( |
| 1980 | 6c 65 74 20 28 28 63 6f 6c 20 28 63 75 72 72 65 6e 74 2d 63 6f 6c 75 6d 6e 29 29 29 0a 20 20 20 | let.((col.(current-column))).... |
| 19a0 | 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 29 0a 20 20 20 20 20 20 28 74 72 61 6e 73 | ...(forward-line.1).......(trans |
| 19c0 | 70 6f 73 65 2d 6c 69 6e 65 73 20 31 29 0a 20 20 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e | pose-lines.1).......(forward-lin |
| 19e0 | 65 20 2d 31 29 0a 20 20 20 20 20 20 28 6d 6f 76 65 2d 74 6f 2d 63 6f 6c 75 6d 6e 20 63 6f 6c 29 | e.-1).......(move-to-column.col) |
| 1a00 | 29 29 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 6d 6f 76 65 2d | )))..;;;###autoload.(defun.move- |
| 1a20 | 74 65 78 74 2d 72 65 67 69 6f 6e 20 28 73 74 61 72 74 20 65 6e 64 20 6e 29 0a 20 20 22 4d 6f 76 | text-region.(start.end.n)..."Mov |
| 1a40 | 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 67 69 6f 6e 20 28 53 54 41 52 54 20 45 4e 44 29 | e.the.current.region.(START.END) |
| 1a60 | 20 75 70 20 6f 72 20 64 6f 77 6e 20 62 79 20 4e 20 6c 69 6e 65 73 2e 22 0a 20 20 28 69 6e 74 65 | .up.or.down.by.N.lines."...(inte |
| 1a80 | 72 61 63 74 69 76 65 20 28 6d 6f 76 65 2d 74 65 78 74 2d 67 65 74 2d 72 65 67 69 6f 6e 2d 61 6e | ractive.(move-text-get-region-an |
| 1aa0 | 64 2d 70 72 65 66 69 78 29 29 0a 20 20 28 6c 65 74 20 28 28 6c 69 6e 65 2d 74 65 78 74 20 28 64 | d-prefix))...(let.((line-text.(d |
| 1ac0 | 65 6c 65 74 65 2d 61 6e 64 2d 65 78 74 72 61 63 74 2d 72 65 67 69 6f 6e 20 73 74 61 72 74 20 65 | elete-and-extract-region.start.e |
| 1ae0 | 6e 64 29 29 29 0a 20 20 20 20 28 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 6e 29 0a 20 20 20 20 28 | nd))).....(forward-line.n).....( |
| 1b00 | 6c 65 74 20 28 28 73 74 61 72 74 20 28 70 6f 69 6e 74 29 29 29 0a 20 20 20 20 20 20 28 69 6e 73 | let.((start.(point))).......(ins |
| 1b20 | 65 72 74 20 6c 69 6e 65 2d 74 65 78 74 29 0a 20 20 20 20 20 20 28 73 65 74 71 20 64 65 61 63 74 | ert.line-text).......(setq.deact |
| 1b40 | 69 76 61 74 65 2d 6d 61 72 6b 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 73 65 74 2d 6d 61 72 6b 20 | ivate-mark.nil).......(set-mark. |
| 1b60 | 73 74 61 72 74 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e | start))))..;;;###autoload.(defun |
| 1b80 | 20 6d 6f 76 65 2d 74 65 78 74 2d 72 65 67 69 6f 6e 2d 75 70 20 28 73 74 61 72 74 20 65 6e 64 20 | .move-text-region-up.(start.end. |
| 1ba0 | 6e 29 0a 20 20 22 4d 6f 76 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 67 69 6f 6e 20 28 53 | n)..."Move.the.current.region.(S |
| 1bc0 | 54 41 52 54 20 45 4e 44 29 20 75 70 20 62 79 20 4e 20 6c 69 6e 65 73 2e 22 0a 20 20 28 69 6e 74 | TART.END).up.by.N.lines."...(int |
| 1be0 | 65 72 61 63 74 69 76 65 20 28 6d 6f 76 65 2d 74 65 78 74 2d 67 65 74 2d 72 65 67 69 6f 6e 2d 61 | eractive.(move-text-get-region-a |
| 1c00 | 6e 64 2d 70 72 65 66 69 78 29 29 0a 20 20 28 6d 6f 76 65 2d 74 65 78 74 2d 72 65 67 69 6f 6e 20 | nd-prefix))...(move-text-region. |
| 1c20 | 73 74 61 72 74 20 65 6e 64 20 28 2d 20 6e 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 | start.end.(-.n)))..;;;###autoloa |
| 1c40 | 64 0a 28 64 65 66 75 6e 20 6d 6f 76 65 2d 74 65 78 74 2d 72 65 67 69 6f 6e 2d 64 6f 77 6e 20 28 | d.(defun.move-text-region-down.( |
| 1c60 | 73 74 61 72 74 20 65 6e 64 20 6e 29 0a 20 20 22 4d 6f 76 65 20 74 68 65 20 63 75 72 72 65 6e 74 | start.end.n)..."Move.the.current |
| 1c80 | 20 72 65 67 69 6f 6e 20 28 53 54 41 52 54 20 45 4e 44 29 20 64 6f 77 6e 20 62 79 20 4e 20 6c 69 | .region.(START.END).down.by.N.li |
| 1ca0 | 6e 65 73 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6d 6f 76 65 2d 74 65 78 74 2d | nes."...(interactive.(move-text- |
| 1cc0 | 67 65 74 2d 72 65 67 69 6f 6e 2d 61 6e 64 2d 70 72 65 66 69 78 29 29 0a 20 20 28 6d 6f 76 65 2d | get-region-and-prefix))...(move- |
| 1ce0 | 74 65 78 74 2d 72 65 67 69 6f 6e 20 73 74 61 72 74 20 65 6e 64 20 6e 29 29 0a 0a 3b 3b 3b 23 23 | text-region.start.end.n))..;;;## |
| 1d00 | 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 6d 6f 76 65 2d 74 65 78 74 2d 75 70 20 28 73 | #autoload.(defun.move-text-up.(s |
| 1d20 | 74 61 72 74 20 65 6e 64 20 6e 29 0a 20 20 22 4d 6f 76 65 20 74 68 65 20 6c 69 6e 65 20 6f 72 20 | tart.end.n)..."Move.the.line.or. |
| 1d40 | 72 65 67 69 6f 6e 20 28 53 54 41 52 54 20 45 4e 44 29 20 75 70 20 62 79 20 4e 20 6c 69 6e 65 73 | region.(START.END).up.by.N.lines |
| 1d60 | 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6d 6f 76 65 2d 74 65 78 74 2d 67 65 74 | ."...(interactive.(move-text-get |
| 1d80 | 2d 72 65 67 69 6f 6e 2d 61 6e 64 2d 70 72 65 66 69 78 29 29 0a 20 20 28 69 66 20 28 6e 6f 74 20 | -region-and-prefix))...(if.(not. |
| 1da0 | 28 6d 6f 76 65 2d 74 65 78 74 2d 2d 61 74 2d 66 69 72 73 74 2d 6c 69 6e 65 2d 70 29 29 0a 20 20 | (move-text--at-first-line-p))... |
| 1dc0 | 20 20 28 69 66 20 28 72 65 67 69 6f 6e 2d 61 63 74 69 76 65 2d 70 29 0a 20 20 20 20 20 20 20 20 | ..(if.(region-active-p)......... |
| 1de0 | 28 6d 6f 76 65 2d 74 65 78 74 2d 72 65 67 69 6f 6e 2d 75 70 20 73 74 61 72 74 20 65 6e 64 20 6e | (move-text-region-up.start.end.n |
| 1e00 | 29 0a 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 72 65 70 65 61 74 20 6e 20 64 6f 20 28 6d 6f | ).......(cl-loop.repeat.n.do.(mo |
| 1e20 | 76 65 2d 74 65 78 74 2d 6c 69 6e 65 2d 75 70 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f | ve-text-line-up)))))..;;;###auto |
| 1e40 | 6c 6f 61 64 0a 28 64 65 66 75 6e 20 6d 6f 76 65 2d 74 65 78 74 2d 64 6f 77 6e 20 28 73 74 61 72 | load.(defun.move-text-down.(star |
| 1e60 | 74 20 65 6e 64 20 6e 29 0a 20 20 22 4d 6f 76 65 20 74 68 65 20 6c 69 6e 65 20 6f 72 20 72 65 67 | t.end.n)..."Move.the.line.or.reg |
| 1e80 | 69 6f 6e 20 28 53 54 41 52 54 20 45 4e 44 29 20 64 6f 77 6e 20 62 79 20 4e 20 6c 69 6e 65 73 2e | ion.(START.END).down.by.N.lines. |
| 1ea0 | 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6d 6f 76 65 2d 74 65 78 74 2d 67 65 74 2d | "...(interactive.(move-text-get- |
| 1ec0 | 72 65 67 69 6f 6e 2d 61 6e 64 2d 70 72 65 66 69 78 29 29 0a 20 20 28 69 66 20 28 72 65 67 69 6f | region-and-prefix))...(if.(regio |
| 1ee0 | 6e 2d 61 63 74 69 76 65 2d 70 29 0a 20 20 20 20 20 20 28 6d 6f 76 65 2d 74 65 78 74 2d 72 65 67 | n-active-p).......(move-text-reg |
| 1f00 | 69 6f 6e 2d 64 6f 77 6e 20 73 74 61 72 74 20 65 6e 64 20 6e 29 0a 20 20 20 20 28 63 6c 2d 6c 6f | ion-down.start.end.n).....(cl-lo |
| 1f20 | 6f 70 20 72 65 70 65 61 74 20 6e 20 64 6f 20 28 6d 6f 76 65 2d 74 65 78 74 2d 6c 69 6e 65 2d 64 | op.repeat.n.do.(move-text-line-d |
| 1f40 | 6f 77 6e 29 29 29 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 6d | own))))..;;;###autoload.(defun.m |
| 1f60 | 6f 76 65 2d 74 65 78 74 2d 64 65 66 61 75 6c 74 2d 62 69 6e 64 69 6e 67 73 20 28 29 0a 20 20 22 | ove-text-default-bindings.()..." |
| 1f80 | 42 69 6e 64 20 60 6d 6f 76 65 2d 74 65 78 74 2d 75 70 27 20 61 6e 64 20 60 6d 6f 76 65 2d 74 65 | Bind.`move-text-up'.and.`move-te |
| 1fa0 | 78 74 2d 64 6f 77 6e 27 20 74 6f 20 4d 2d 75 70 20 26 20 4d 2d 64 6f 77 6e 2e 22 0a 20 20 28 69 | xt-down'.to.M-up.&.M-down."...(i |
| 1fc0 | 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 67 6c 6f 62 61 6c 2d 73 65 74 2d 6b 65 79 20 5b 4d | nteractive)...(global-set-key.[M |
| 1fe0 | 2d 64 6f 77 6e 5d 20 27 6d 6f 76 65 2d 74 65 78 74 2d 64 6f 77 6e 29 0a 20 20 28 67 6c 6f 62 61 | -down].'move-text-down)...(globa |
| 2000 | 6c 2d 73 65 74 2d 6b 65 79 20 5b 4d 2d 75 70 5d 20 20 20 27 6d 6f 76 65 2d 74 65 78 74 2d 75 70 | l-set-key.[M-up]...'move-text-up |
| 2020 | 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 6d 6f 76 65 2d 74 65 78 74 29 0a 0a 3b 3b 3b 20 6d 6f | ))..(provide.'move-text)..;;;.mo |
| 2040 | 76 65 2d 74 65 78 74 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 | ve-text.el.ends.here............ |
| 2060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 20a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 20c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 20e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 21a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 21c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 21e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2260 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2280 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 22a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 22c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 22e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 23e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2400 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 24e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 25a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 25c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 25e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 26e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 2780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 27e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |