/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / modes / view.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 34 3a 31 30 3a 35 | 31 20 31 39 39 35 0a 3b | 14:10:5|1 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 78 65 |;; from |file /xe|
|00000060| 6d 61 63 73 2f 78 65 6d | 61 63 73 2d 31 39 2e 31 |macs/xem|acs-19.1|
|00000070| 33 2d 72 65 6c 65 61 73 | 65 2f 65 64 69 74 6f 72 |3-releas|e/editor|
|00000080| 2f 6c 69 73 70 2f 6d 6f | 64 65 73 2f 76 69 65 77 |/lisp/mo|des/view|
|00000090| 2e 65 6c 0a 3b 3b 3b 20 | 65 6d 61 63 73 20 76 65 |.el.;;; |emacs ve|
|000000a0| 72 73 69 6f 6e 20 31 39 | 2e 31 33 20 58 45 6d 61 |rsion 19|.13 XEma|
|000000b0| 63 73 20 4c 75 63 69 64 | 2e 0a 3b 3b 3b 20 62 79 |cs Lucid|..;;; by|
|000000c0| 74 65 63 6f 6d 70 20 76 | 65 72 73 69 6f 6e 20 32 |tecomp v|ersion 2|
|000000d0| 2e 32 35 3b 20 31 2d 53 | 65 70 2d 39 34 2e 0a 3b |.25; 1-S|ep-94..;|
|000000e0| 3b 3b 20 6f 70 74 69 6d | 69 7a 61 74 69 6f 6e 20 |;; optim|ization |
|000000f0| 69 73 20 6f 6e 2e 0a 3b | 3b 3b 20 74 68 69 73 20 |is on..;|;; this |
|00000100| 66 69 6c 65 20 75 73 65 | 73 20 6f 70 63 6f 64 65 |file use|s opcode|
|00000110| 73 20 77 68 69 63 68 20 | 64 6f 20 6e 6f 74 20 65 |s which |do not e|
|00000120| 78 69 73 74 20 69 6e 20 | 45 6d 61 63 73 20 31 38 |xist in |Emacs 18|
|00000130| 2e 0a 0a 28 69 66 20 28 | 61 6e 64 20 28 62 6f 75 |...(if (|and (bou|
|00000140| 6e 64 70 20 27 65 6d 61 | 63 73 2d 76 65 72 73 69 |ndp 'ema|cs-versi|
|00000150| 6f 6e 29 0a 09 20 28 6f | 72 20 28 61 6e 64 20 28 |on).. (o|r (and (|
|00000160| 62 6f 75 6e 64 70 20 27 | 65 70 6f 63 68 3a 3a 76 |boundp '|epoch::v|
|00000170| 65 72 73 69 6f 6e 29 20 | 65 70 6f 63 68 3a 3a 76 |ersion) |epoch::v|
|00000180| 65 72 73 69 6f 6e 29 0a | 09 20 20 20 20 20 28 73 |ersion).|.     (s|
|00000190| 74 72 69 6e 67 2d 6c 65 | 73 73 70 20 65 6d 61 63 |tring-le|ssp emac|
|000001a0| 73 2d 76 65 72 73 69 6f | 6e 20 22 31 39 22 29 29 |s-versio|n "19"))|
|000001b0| 29 0a 20 20 20 20 28 65 | 72 72 6f 72 20 22 54 68 |).    (e|rror "Th|
|000001c0| 69 73 20 66 69 6c 65 20 | 77 61 73 20 63 6f 6d 70 |is file |was comp|
|000001d0| 69 6c 65 64 20 66 6f 72 | 20 45 6d 61 63 73 20 31 |iled for| Emacs 1|
|000001e0| 39 2e 22 29 29 0a 0a 28 | 62 79 74 65 2d 63 6f 64 |9."))..(|byte-cod|
|000001f0| 65 20 22 c0 c1 21 88 c2 | c3 21 ac 82 c4 13 0b 84 |e "..!..|.!......|
|00000200| cf 00 c5 20 13 c6 0b c3 | 5c 22 88 c7 0b 21 88 c8 |... ....|\"...!..|
|00000210| 0b c9 ca 23 88 c8 0b cb | cc 23 88 c8 0b cd ca 23 |...#....|.#.....#|
|00000220| 88 c8 0b ce cf 23 88 c8 | 0b d0 d1 23 88 c8 0b d2 |.....#..|...#....|
|00000230| d3 23 88 c8 0b d4 d5 23 | 88 c8 0b d6 d5 23 88 c8 |.#.....#|.....#..|
|00000240| 0b d7 d3 23 88 c8 0b d8 | d3 23 88 c8 0b d9 da 23 |...#....|.#.....#|
|00000250| 88 c8 0b db da 23 88 c8 | 0b dc dd 23 88 c8 0b de |.....#..|...#....|
|00000260| df 23 88 c8 0b e0 e1 23 | 88 c8 0b e2 e3 23 88 c8 |.#.....#|.....#..|
|00000270| 0b e4 e5 23 88 c8 0b e6 | e5 23 88 c8 0b e7 e8 23 |...#....|.#.....#|
|00000280| 88 c8 0b e9 ea 23 88 c8 | 0b eb ea 23 88 c8 0b ec |.....#..|...#....|
|00000290| ed 23 88 c8 0b ee ef 23 | 88 c8 0b f0 f1 23 88 c8 |.#.....#|.....#..|
|000002a0| 0b f2 f3 23 88 c8 0b f4 | f5 23 88 c8 0b f6 f3 23 |...#....|.#.....#|
|000002b0| 88 c8 0b f7 f5 23 88 c8 | 0b f8 f9 23 88 c8 0b fa |.....#..|...#....|
|000002c0| fb 23 88 c4 87 22 20 5b | 72 65 71 75 69 72 65 20 |.#..." [|require |
|000002d0| 68 65 6c 70 65 72 20 62 | 6f 75 6e 64 70 20 76 69 |helper b|oundp vi|
|000002e0| 65 77 2d 6d 6f 64 65 2d | 6d 61 70 20 6e 69 6c 20 |ew-mode-|map nil |
|000002f0| 6d 61 6b 65 2d 6b 65 79 | 6d 61 70 20 73 65 74 2d |make-key|map set-|
|00000300| 6b 65 79 6d 61 70 2d 6e | 61 6d 65 20 73 75 70 70 |keymap-n|ame supp|
|00000310| 72 65 73 73 2d 6b 65 79 | 6d 61 70 20 64 65 66 69 |ress-key|map defi|
|00000320| 6e 65 2d 6b 65 79 20 22 | 03 22 20 76 69 65 77 2d |ne-key "|." view-|
|00000330| 65 78 69 74 20 22 1a 22 | 20 73 75 73 70 65 6e 64 |exit "."| suspend|
|00000340| 2d 65 6d 61 63 73 20 22 | 71 22 20 22 3c 22 20 62 |-emacs "|q" "<" b|
|00000350| 65 67 69 6e 6e 69 6e 67 | 2d 6f 66 2d 62 75 66 66 |eginning|-of-buff|
|00000360| 65 72 20 22 3e 22 20 65 | 6e 64 2d 6f 66 2d 62 75 |er ">" e|nd-of-bu|
|00000370| 66 66 65 72 20 22 f6 22 | 20 56 69 65 77 2d 73 63 |ffer "."| View-sc|
|00000380| 72 6f 6c 6c 2d 6c 69 6e | 65 73 2d 62 61 63 6b 77 |roll-lin|es-backw|
|00000390| 61 72 64 20 22 16 22 20 | 56 69 65 77 2d 73 63 72 |ard "." |View-scr|
|000003a0| 6f 6c 6c 2d 6c 69 6e 65 | 73 2d 66 6f 72 77 61 72 |oll-line|s-forwar|
|000003b0| 64 20 22 20 22 20 22 7f | 22 20 62 61 63 6b 73 70 |d " " ".|" backsp|
|000003c0| 61 63 65 20 22 5c 6e 22 | 20 56 69 65 77 2d 73 63 |ace "\n"| View-sc|
|000003d0| 72 6f 6c 6c 2d 6f 6e 65 | 2d 6d 6f 72 65 2d 6c 69 |roll-one|-more-li|
|000003e0| 6e 65 20 22 0d 22 20 22 | 7a 22 20 56 69 65 77 2d |ne "." "|z" View-|
|000003f0| 73 63 72 6f 6c 6c 2d 6c | 69 6e 65 73 2d 66 6f 72 |scroll-l|ines-for|
|00000400| 77 61 72 64 2d 73 65 74 | 2d 73 63 72 6f 6c 6c 2d |ward-set|-scroll-|
|00000410| 73 69 7a 65 20 22 67 22 | 20 56 69 65 77 2d 67 6f |size "g"| View-go|
|00000420| 74 6f 2d 6c 69 6e 65 20 | 22 3d 22 20 77 68 61 74 |to-line |"=" what|
|00000430| 2d 6c 69 6e 65 20 22 2e | 22 20 73 65 74 2d 6d 61 |-line ".|" set-ma|
|00000440| 72 6b 2d 63 6f 6d 6d 61 | 6e 64 20 22 27 22 20 56 |rk-comma|nd "'" V|
|00000450| 69 65 77 2d 62 61 63 6b | 2d 74 6f 2d 6d 61 72 6b |iew-back|-to-mark|
|00000460| 20 22 40 22 20 22 78 22 | 20 65 78 63 68 61 6e 67 | "@" "x"| exchang|
|00000470| 65 2d 70 6f 69 6e 74 2d | 61 6e 64 2d 6d 61 72 6b |e-point-|and-mark|
|00000480| 20 22 68 22 20 48 65 6c | 70 65 72 2d 64 65 73 63 | "h" Hel|per-desc|
|00000490| 72 69 62 65 2d 62 69 6e | 64 69 6e 67 73 20 22 3f |ribe-bin|dings "?|
|000004a0| 22 20 28 63 6f 6e 74 72 | 6f 6c 20 68 29 20 48 65 |" (contr|ol h) He|
|000004b0| 6c 70 65 72 2d 68 65 6c | 70 20 22 73 22 20 69 73 |lper-hel|p "s" is|
|000004c0| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 22 72 |earch-fo|rward "r|
|000004d0| 22 20 69 73 65 61 72 63 | 68 2d 62 61 63 6b 77 61 |" isearc|h-backwa|
|000004e0| 72 64 20 22 2f 22 20 56 | 69 65 77 2d 73 65 61 72 |rd "/" V|iew-sear|
|000004f0| 63 68 2d 72 65 67 65 78 | 70 2d 66 6f 72 77 61 72 |ch-regex|p-forwar|
|00000500| 64 20 22 5c 5c 22 20 56 | 69 65 77 2d 73 65 61 72 |d "\\" V|iew-sear|
|00000510| 63 68 2d 72 65 67 65 78 | 70 2d 62 61 63 6b 77 61 |ch-regex|p-backwa|
|00000520| 72 64 20 22 93 22 20 22 | 92 22 20 22 6e 22 20 56 |rd "." "|." "n" V|
|00000530| 69 65 77 2d 73 65 61 72 | 63 68 2d 6c 61 73 74 2d |iew-sear|ch-last-|
|00000540| 72 65 67 65 78 70 2d 66 | 6f 72 77 61 72 64 20 22 |regexp-f|orward "|
|00000550| 70 22 20 56 69 65 77 2d | 73 65 61 72 63 68 2d 6c |p" View-|search-l|
|00000560| 61 73 74 2d 72 65 67 65 | 78 70 2d 62 61 63 6b 77 |ast-rege|xp-backw|
|00000570| 61 72 64 5d 20 34 29 0a | 28 66 73 65 74 20 27 76 |ard] 4).|(fset 'v|
|00000580| 69 65 77 2d 66 69 6c 65 | 20 23 5b 28 66 69 6c 65 |iew-file| #[(file|
|00000590| 2d 6e 61 6d 65 20 26 6f | 70 74 69 6f 6e 61 6c 20 |-name &o|ptional |
|000005a0| 6f 74 68 65 72 2d 77 69 | 6e 64 6f 77 29 20 22 70 |other-wi|ndow) "p|
|000005b0| c0 09 21 c2 09 21 1b 1c | 1d 0e 06 ab 86 c7 0b 21 |..!..!..|.......!|
|000005c0| 88 aa 85 c8 0b c9 5c 22 | 88 ca 0d 0c 3f ad 87 cb |......\"|....?...|
|000005d0| 0b 21 3f ad 81 cc 5c 22 | 2b 87 22 20 5b 67 65 74 |.!?...\"|+." [get|
|000005e0| 2d 66 69 6c 65 2d 62 75 | 66 66 65 72 20 66 69 6c |-file-bu|ffer fil|
|000005f0| 65 2d 6e 61 6d 65 20 66 | 69 6e 64 2d 66 69 6c 65 |e-name f|ind-file|
|00000600| 2d 6e 6f 73 65 6c 65 63 | 74 20 62 75 66 2d 74 6f |-noselec|t buf-to|
|00000610| 2d 76 69 65 77 20 68 61 | 64 2d 61 2d 62 75 66 20 |-view ha|d-a-buf |
|00000620| 6f 6c 64 2d 62 75 66 20 | 6f 74 68 65 72 2d 77 69 |old-buf |other-wi|
|00000630| 6e 64 6f 77 20 70 6f 70 | 2d 74 6f 2d 62 75 66 66 |ndow pop|-to-buff|
|00000640| 65 72 20 73 77 69 74 63 | 68 2d 74 6f 2d 62 75 66 |er switc|h-to-buf|
|00000650| 66 65 72 20 74 20 76 69 | 65 77 2d 6d 6f 64 65 20 |fer t vi|ew-mode |
|00000660| 62 75 66 66 65 72 2d 6d | 6f 64 69 66 69 65 64 2d |buffer-m|odified-|
|00000670| 70 20 6b 69 6c 6c 2d 62 | 75 66 66 65 72 5d 20 34 |p kill-b|uffer] 4|
|00000680| 20 22 5c 0a 56 69 65 77 | 20 46 49 4c 45 20 69 6e | "\.View| FILE in|
|00000690| 20 56 69 65 77 20 6d 6f | 64 65 2c 20 72 65 74 75 | View mo|de, retu|
|000006a0| 72 6e 69 6e 67 20 74 6f | 20 70 72 65 76 69 6f 75 |rning to| previou|
|000006b0| 73 20 62 75 66 66 65 72 | 20 77 68 65 6e 20 64 6f |s buffer| when do|
|000006c0| 6e 65 2e 0a 57 69 74 68 | 20 61 20 70 72 65 66 69 |ne..With| a prefi|
|000006d0| 78 20 61 72 67 75 6d 65 | 6e 74 2c 20 76 69 65 77 |x argume|nt, view|
|000006e0| 20 69 74 20 69 6e 20 61 | 6e 6f 74 68 65 72 20 77 | it in a|nother w|
|000006f0| 69 6e 64 6f 77 2e 0a 54 | 68 65 20 75 73 75 61 6c |indow..T|he usual|
|00000700| 20 45 6d 61 63 73 20 63 | 6f 6d 6d 61 6e 64 73 20 | Emacs c|ommands |
|00000710| 61 72 65 20 6e 6f 74 20 | 61 76 61 69 6c 61 62 6c |are not |availabl|
|00000720| 65 3b 20 69 6e 73 74 65 | 61 64 2c 0a 61 20 73 70 |e; inste|ad,.a sp|
|00000730| 65 63 69 61 6c 20 73 65 | 74 20 6f 66 20 63 6f 6d |ecial se|t of com|
|00000740| 6d 61 6e 64 73 20 28 6d | 6f 73 74 6c 79 20 6c 65 |mands (m|ostly le|
|00000750| 74 74 65 72 73 20 61 6e | 64 20 70 75 6e 63 74 75 |tters an|d punctu|
|00000760| 61 74 69 6f 6e 29 0a 61 | 72 65 20 64 65 66 69 6e |ation).a|re defin|
|00000770| 65 64 20 66 6f 72 20 6d | 6f 76 69 6e 67 20 61 72 |ed for m|oving ar|
|00000780| 6f 75 6e 64 20 69 6e 20 | 74 68 65 20 62 75 66 66 |ound in |the buff|
|00000790| 65 72 2e 0a 53 70 61 63 | 65 20 73 63 72 6f 6c 6c |er..Spac|e scroll|
|000007a0| 73 20 66 6f 72 77 61 72 | 64 2c 20 44 65 6c 65 74 |s forwar|d, Delet|
|000007b0| 65 20 73 63 72 6f 6c 6c | 73 20 62 61 63 6b 77 61 |e scroll|s backwa|
|000007c0| 72 64 2e 0a 46 6f 72 20 | 6c 69 73 74 20 6f 66 20 |rd..For |list of |
|000007d0| 61 6c 6c 20 56 69 65 77 | 20 63 6f 6d 6d 61 6e 64 |all View| command|
|000007e0| 73 2c 20 74 79 70 65 20 | 3f 20 6f 72 20 68 20 77 |s, type |? or h w|
|000007f0| 68 69 6c 65 20 76 69 65 | 77 69 6e 67 2e 0a 0a 43 |hile vie|wing...C|
|00000800| 61 6c 6c 73 20 74 68 65 | 20 76 61 6c 75 65 20 6f |alls the| value o|
|00000810| 66 20 20 76 69 65 77 2d | 68 6f 6f 6b 20 20 69 66 |f  view-|hook  if|
|00000820| 20 74 68 61 74 20 69 73 | 20 6e 6f 6e 2d 6e 69 6c | that is| non-nil|
|00000830| 2e 22 20 22 66 56 69 65 | 77 20 66 69 6c 65 3a 20 |." "fVie|w file: |
|00000840| 5c 6e 50 22 5d 29 0a 28 | 66 73 65 74 20 27 76 69 |\nP"]).(|fset 'vi|
|00000850| 65 77 2d 62 75 66 66 65 | 72 20 23 5b 28 62 75 66 |ew-buffe|r #[(buf|
|00000860| 66 65 72 2d 6e 61 6d 65 | 20 26 6f 70 74 69 6f 6e |fer-name| &option|
|00000870| 61 6c 20 6f 74 68 65 72 | 2d 77 69 6e 64 6f 77 29 |al other|-window)|
|00000880| 20 22 70 18 09 ab 86 c2 | 0b 21 88 aa 85 c4 0b c5 | "p.....|.!......|
|00000890| 5c 22 88 c6 08 c7 5c 22 | 29 87 22 20 5b 6f 6c 64 |\"....\"|)." [old|
|000008a0| 2d 62 75 66 20 6f 74 68 | 65 72 2d 77 69 6e 64 6f |-buf oth|er-windo|
|000008b0| 77 20 70 6f 70 2d 74 6f | 2d 62 75 66 66 65 72 20 |w pop-to|-buffer |
|000008c0| 62 75 66 66 65 72 2d 6e | 61 6d 65 20 73 77 69 74 |buffer-n|ame swit|
|000008d0| 63 68 2d 74 6f 2d 62 75 | 66 66 65 72 20 74 20 76 |ch-to-bu|ffer t v|
|000008e0| 69 65 77 2d 6d 6f 64 65 | 20 6e 69 6c 5d 20 33 20 |iew-mode| nil] 3 |
|000008f0| 22 5c 0a 56 69 65 77 20 | 42 55 46 46 45 52 20 69 |"\.View |BUFFER i|
|00000900| 6e 20 56 69 65 77 20 6d | 6f 64 65 2c 20 72 65 74 |n View m|ode, ret|
|00000910| 75 72 6e 69 6e 67 20 74 | 6f 20 70 72 65 76 69 6f |urning t|o previo|
|00000920| 75 73 20 62 75 66 66 65 | 72 20 77 68 65 6e 20 64 |us buffe|r when d|
|00000930| 6f 6e 65 2e 0a 57 69 74 | 68 20 61 20 70 72 65 66 |one..Wit|h a pref|
|00000940| 69 78 20 61 72 67 75 6d | 65 6e 74 2c 20 76 69 65 |ix argum|ent, vie|
|00000950| 77 20 69 74 20 69 6e 20 | 61 6e 6f 74 68 65 72 20 |w it in |another |
|00000960| 77 69 6e 64 6f 77 2e 0a | 54 68 65 20 75 73 75 61 |window..|The usua|
|00000970| 6c 20 45 6d 61 63 73 20 | 63 6f 6d 6d 61 6e 64 73 |l Emacs |commands|
|00000980| 20 61 72 65 20 6e 6f 74 | 20 61 76 61 69 6c 61 62 | are not| availab|
|00000990| 6c 65 3b 20 69 6e 73 74 | 65 61 64 2c 0a 61 20 73 |le; inst|ead,.a s|
|000009a0| 70 65 63 69 61 6c 20 73 | 65 74 20 6f 66 20 63 6f |pecial s|et of co|
|000009b0| 6d 6d 61 6e 64 73 20 28 | 6d 6f 73 74 6c 79 20 6c |mmands (|mostly l|
|000009c0| 65 74 74 65 72 73 20 61 | 6e 64 20 70 75 6e 63 74 |etters a|nd punct|
|000009d0| 75 61 74 69 6f 6e 29 0a | 61 72 65 20 64 65 66 69 |uation).|are defi|
|000009e0| 6e 65 64 20 66 6f 72 20 | 6d 6f 76 69 6e 67 20 61 |ned for |moving a|
|000009f0| 72 6f 75 6e 64 20 69 6e | 20 74 68 65 20 62 75 66 |round in| the buf|
|00000a00| 66 65 72 2e 0a 53 70 61 | 63 65 20 73 63 72 6f 6c |fer..Spa|ce scrol|
|00000a10| 6c 73 20 66 6f 72 77 61 | 72 64 2c 20 44 65 6c 65 |ls forwa|rd, Dele|
|00000a20| 74 65 20 73 63 72 6f 6c | 6c 73 20 62 61 63 6b 77 |te scrol|ls backw|
|00000a30| 61 72 64 2e 0a 46 6f 72 | 20 6c 69 73 74 20 6f 66 |ard..For| list of|
|00000a40| 20 61 6c 6c 20 56 69 65 | 77 20 63 6f 6d 6d 61 6e | all Vie|w comman|
|00000a50| 64 73 2c 20 74 79 70 65 | 20 3f 20 6f 72 20 68 20 |ds, type| ? or h |
|00000a60| 77 68 69 6c 65 20 76 69 | 65 77 69 6e 67 2e 0a 0a |while vi|ewing...|
|00000a70| 43 61 6c 6c 73 20 74 68 | 65 20 76 61 6c 75 65 20 |Calls th|e value |
|00000a80| 6f 66 20 20 76 69 65 77 | 2d 68 6f 6f 6b 20 20 69 |of  view|-hook  i|
|00000a90| 66 20 74 68 61 74 20 69 | 73 20 6e 6f 6e 2d 6e 69 |f that i|s non-ni|
|00000aa0| 6c 2e 22 20 22 62 56 69 | 65 77 20 62 75 66 66 65 |l." "bVi|ew buffe|
|00000ab0| 72 3a 20 5c 6e 50 22 5d | 29 0a 28 66 73 65 74 20 |r: \nP"]|).(fset |
|00000ac0| 27 76 69 65 77 2d 66 69 | 6c 65 2d 6f 74 68 65 72 |'view-fi|le-other|
|00000ad0| 2d 77 69 6e 64 6f 77 20 | 23 5b 28 66 69 6c 65 29 |-window |#[(file)|
|00000ae0| 20 22 c0 09 c2 5c 22 87 | 22 20 5b 76 69 65 77 2d | "...\".|" [view-|
|00000af0| 66 69 6c 65 20 66 69 6c | 65 20 74 5d 20 33 20 22 |file fil|e t] 3 "|
|00000b00| 5c 0a 46 69 6e 64 20 46 | 49 4c 45 20 69 6e 20 6f |\.Find F|ILE in o|
|00000b10| 74 68 65 72 20 77 69 6e | 64 6f 77 2c 20 61 6e 64 |ther win|dow, and|
|00000b20| 20 65 6e 74 65 72 20 76 | 69 65 77 20 6d 6f 64 65 | enter v|iew mode|
|00000b30| 2e 22 5d 29 0a 28 66 73 | 65 74 20 27 76 69 65 77 |."]).(fs|et 'view|
|00000b40| 2d 62 75 66 66 65 72 2d | 6f 74 68 65 72 2d 77 69 |-buffer-|other-wi|
|00000b50| 6e 64 6f 77 20 23 5b 28 | 62 75 66 66 65 72 29 20 |ndow #[(|buffer) |
|00000b60| 22 c0 09 c2 5c 22 87 22 | 20 5b 76 69 65 77 2d 62 |"...\"."| [view-b|
|00000b70| 75 66 66 65 72 20 62 75 | 66 66 65 72 20 74 5d 20 |uffer bu|ffer t] |
|00000b80| 33 20 22 5c 0a 53 77 69 | 74 63 68 20 74 6f 20 42 |3 "\.Swi|tch to B|
|00000b90| 55 46 46 45 52 20 69 6e | 20 61 6e 6f 74 68 65 72 |UFFER in| another|
|00000ba0| 20 77 69 6e 64 6f 77 2c | 20 61 6e 64 20 65 6e 74 | window,| and ent|
|00000bb0| 65 72 20 76 69 65 77 20 | 6d 6f 64 65 2e 22 5d 29 |er view |mode."])|
|00000bc0| 0a 28 66 73 65 74 20 27 | 76 69 65 77 2d 6d 6f 64 |.(fset '|view-mod|
|00000bd0| 65 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 70 |e #[(&op|tional p|
|00000be0| 72 65 76 2d 62 75 66 66 | 65 72 20 61 63 74 69 6f |rev-buff|er actio|
|00000bf0| 6e 29 20 22 08 ac 82 70 | 10 c1 c2 21 0b 4c 88 c1 |n) "...p|...!.L..|
|00000c00| c4 21 0d 4c 88 c1 c6 21 | 0e 07 4c 88 c1 c8 21 0e |.!.L...!|..L...!.|
|00000c10| 09 4c 88 c1 ca 21 cb 20 | 4c 88 c1 cc 21 cd ce 21 |.L...!. |L...!..!|
|00000c20| ad 82 0e 0e 4c 88 cf 15 | d0 16 07 d1 16 09 d2 20 |....L...|....... |
|00000c30| ab 83 d3 aa 81 d4 43 13 | d5 d6 d2 20 ab 86 d7 d2 |......C.|... ....|
|00000c40| 20 21 aa 82 d8 20 5c 22 | 16 0e c1 d9 21 0e 1a 4c | !... \"|....!..L|
|00000c50| 88 c1 db 21 08 4c 88 c1 | dc 21 dd 20 4c 88 c1 de |...!.L..|.!. L...|
|00000c60| 21 df 4c 88 c1 e0 21 df | 4c 88 e1 79 88 df 16 5c |!.L...!.|L..y...\|
|00000c70| 22 e3 0e 24 21 88 e5 e6 | 21 88 e7 20 87 22 20 5b |"..$!...|!.. ." [|
|00000c80| 70 72 65 76 2d 62 75 66 | 66 65 72 20 6d 61 6b 65 |prev-buf|fer make|
|00000c90| 2d 6c 6f 63 61 6c 2d 76 | 61 72 69 61 62 6c 65 20 |-local-v|ariable |
|00000ca0| 76 69 65 77 2d 6f 6c 64 | 2d 6d 6f 64 65 2d 6c 69 |view-old|-mode-li|
|00000cb0| 6e 65 2d 62 75 66 66 65 | 72 2d 69 64 65 6e 74 69 |ne-buffe|r-identi|
|00000cc0| 66 69 63 61 74 69 6f 6e | 20 6d 6f 64 65 2d 6c 69 |fication| mode-li|
|00000cd0| 6e 65 2d 62 75 66 66 65 | 72 2d 69 64 65 6e 74 69 |ne-buffe|r-identi|
|00000ce0| 66 69 63 61 74 69 6f 6e | 20 76 69 65 77 2d 6f 6c |fication| view-ol|
|00000cf0| 64 2d 62 75 66 66 65 72 | 2d 72 65 61 64 2d 6f 6e |d-buffer|-read-on|
|00000d00| 6c 79 20 62 75 66 66 65 | 72 2d 72 65 61 64 2d 6f |ly buffe|r-read-o|
|00000d10| 6e 6c 79 20 76 69 65 77 | 2d 6f 6c 64 2d 6d 6f 64 |nly view|-old-mod|
|00000d20| 65 2d 6e 61 6d 65 20 6d | 6f 64 65 2d 6e 61 6d 65 |e-name m|ode-name|
|00000d30| 20 76 69 65 77 2d 6f 6c | 64 2d 6d 61 6a 6f 72 2d | view-ol|d-major-|
|00000d40| 6d 6f 64 65 20 6d 61 6a | 6f 72 2d 6d 6f 64 65 20 |mode maj|or-mode |
|00000d50| 76 69 65 77 2d 6f 6c 64 | 2d 6c 6f 63 61 6c 2d 6d |view-old|-local-m|
|00000d60| 61 70 20 63 75 72 72 65 | 6e 74 2d 6c 6f 63 61 6c |ap curre|nt-local|
|00000d70| 2d 6d 61 70 20 76 69 65 | 77 2d 6f 6c 64 2d 48 65 |-map vie|w-old-He|
|00000d80| 6c 70 65 72 2d 72 65 74 | 75 72 6e 2d 62 6c 75 72 |lper-ret|urn-blur|
|00000d90| 62 20 62 6f 75 6e 64 70 | 20 48 65 6c 70 65 72 2d |b boundp| Helper-|
|00000da0| 72 65 74 75 72 6e 2d 62 | 6c 75 72 62 20 74 20 22 |return-b|lurb t "|
|00000db0| 56 69 65 77 22 20 76 69 | 65 77 2d 6d 6f 64 65 20 |View" vi|ew-mode |
|00000dc0| 62 75 66 66 65 72 2d 66 | 69 6c 65 2d 6e 61 6d 65 |buffer-f|ile-name|
|00000dd0| 20 22 56 69 65 77 69 6e | 67 20 25 66 22 20 22 56 | "Viewin|g %f" "V|
|00000de0| 69 65 77 69 6e 67 20 25 | 62 22 20 66 6f 72 6d 61 |iewing %|b" forma|
|00000df0| 74 20 22 63 6f 6e 74 69 | 6e 75 65 20 76 69 65 77 |t "conti|nue view|
|00000e00| 69 6e 67 20 25 73 22 20 | 66 69 6c 65 2d 6e 61 6d |ing %s" |file-nam|
|00000e10| 65 2d 6e 6f 6e 64 69 72 | 65 63 74 6f 72 79 20 62 |e-nondir|ectory b|
|00000e20| 75 66 66 65 72 2d 6e 61 | 6d 65 20 76 69 65 77 2d |uffer-na|me view-|
|00000e30| 65 78 69 74 2d 61 63 74 | 69 6f 6e 20 61 63 74 69 |exit-act|ion acti|
|00000e40| 6f 6e 20 76 69 65 77 2d | 70 72 65 76 2d 62 75 66 |on view-|prev-buf|
|00000e50| 66 65 72 20 76 69 65 77 | 2d 65 78 69 74 2d 70 6f |fer view|-exit-po|
|00000e60| 73 69 74 69 6f 6e 20 70 | 6f 69 6e 74 2d 6d 61 72 |sition p|oint-mar|
|00000e70| 6b 65 72 20 76 69 65 77 | 2d 73 63 72 6f 6c 6c 2d |ker view|-scroll-|
|00000e80| 73 69 7a 65 20 6e 69 6c | 20 76 69 65 77 2d 6c 61 |size nil| view-la|
|00000e90| 73 74 2d 72 65 67 65 78 | 70 20 30 20 67 6f 61 6c |st-regex|p 0 goal|
|00000ea0| 2d 63 6f 6c 75 6d 6e 20 | 75 73 65 2d 6c 6f 63 61 |-column |use-loca|
|00000eb0| 6c 2d 6d 61 70 20 76 69 | 65 77 2d 6d 6f 64 65 2d |l-map vi|ew-mode-|
|00000ec0| 6d 61 70 20 72 75 6e 2d | 68 6f 6f 6b 73 20 76 69 |map run-|hooks vi|
|00000ed0| 65 77 2d 68 6f 6f 6b 20 | 76 69 65 77 2d 68 65 6c |ew-hook |view-hel|
|00000ee0| 70 66 75 6c 2d 6d 65 73 | 73 61 67 65 5d 20 34 20 |pful-mes|sage] 4 |
|00000ef0| 22 5c 0a 4d 61 6a 6f 72 | 20 6d 6f 64 65 20 66 6f |"\.Major| mode fo|
|00000f00| 72 20 76 69 65 77 69 6e | 67 20 74 65 78 74 20 62 |r viewin|g text b|
|00000f10| 75 74 20 6e 6f 74 20 65 | 64 69 74 69 6e 67 20 69 |ut not e|diting i|
|00000f20| 74 2e 0a 4c 65 74 74 65 | 72 73 20 64 6f 20 6e 6f |t..Lette|rs do no|
|00000f30| 74 20 69 6e 73 65 72 74 | 20 74 68 65 6d 73 65 6c |t insert| themsel|
|00000f40| 76 65 73 2e 20 20 49 6e | 73 74 65 61 64 20 74 68 |ves.  In|stead th|
|00000f50| 65 73 65 20 63 6f 6d 6d | 61 6e 64 73 20 61 72 65 |ese comm|ands are|
|00000f60| 20 70 72 6f 76 69 64 65 | 64 2e 0a 4d 6f 73 74 20 | provide|d..Most |
|00000f70| 63 6f 6d 6d 61 6e 64 73 | 20 74 61 6b 65 20 70 72 |commands| take pr|
|00000f80| 65 66 69 78 20 61 72 67 | 75 6d 65 6e 74 73 2e 20 |efix arg|uments. |
|00000f90| 20 43 6f 6d 6d 61 6e 64 | 73 20 64 65 61 6c 69 6e | Command|s dealin|
|00000fa0| 67 20 77 69 74 68 20 6c | 69 6e 65 73 0a 64 65 66 |g with l|ines.def|
|00000fb0| 61 75 6c 74 20 74 6f 20 | 5c 22 73 63 72 6f 6c 6c |ault to |\"scroll|
|00000fc0| 20 73 69 7a 65 5c 22 20 | 6c 69 6e 65 73 20 28 69 | size\" |lines (i|
|00000fd0| 6e 69 74 69 61 6c 6c 79 | 20 73 69 7a 65 20 6f 66 |nitially| size of|
|00000fe0| 20 77 69 6e 64 6f 77 29 | 2e 0a 53 65 61 72 63 68 | window)|..Search|
|00000ff0| 20 63 6f 6d 6d 61 6e 64 | 73 20 64 65 66 61 75 6c | command|s defaul|
|00001000| 74 20 74 6f 20 61 20 72 | 65 70 65 61 74 20 63 6f |t to a r|epeat co|
|00001010| 75 6e 74 20 6f 66 20 6f | 6e 65 2e 0a 4d 2d 3c 20 |unt of o|ne..M-< |
|00001020| 6f 72 20 3c 09 6d 6f 76 | 65 20 74 6f 20 62 65 67 |or <.mov|e to beg|
|00001030| 69 6e 6e 69 6e 67 20 6f | 66 20 62 75 66 66 65 72 |inning o|f buffer|
|00001040| 2e 0a 4d 2d 3e 20 6f 72 | 20 3e 09 6d 6f 76 65 20 |..M-> or| >.move |
|00001050| 74 6f 20 65 6e 64 20 6f | 66 20 62 75 66 66 65 72 |to end o|f buffer|
|00001060| 2e 0a 43 2d 76 20 6f 72 | 20 53 70 61 63 65 09 73 |..C-v or| Space.s|
|00001070| 63 72 6f 6c 6c 20 66 6f | 72 77 61 72 64 20 6c 69 |croll fo|rward li|
|00001080| 6e 65 73 2e 0a 4d 2d 76 | 20 6f 72 20 44 45 4c 09 |nes..M-v| or DEL.|
|00001090| 73 63 72 6f 6c 6c 20 62 | 61 63 6b 77 61 72 64 20 |scroll b|ackward |
|000010a0| 6c 69 6e 65 73 2e 0a 43 | 52 20 6f 72 20 4c 46 09 |lines..C|R or LF.|
|000010b0| 73 63 72 6f 6c 6c 20 66 | 6f 72 77 61 72 64 20 6f |scroll f|orward o|
|000010c0| 6e 65 20 6c 69 6e 65 20 | 28 62 61 63 6b 77 61 72 |ne line |(backwar|
|000010d0| 64 20 77 69 74 68 20 70 | 72 65 66 69 78 20 61 72 |d with p|refix ar|
|000010e0| 67 75 6d 65 6e 74 29 2e | 0a 7a 09 09 6c 69 6b 65 |gument).|.z..like|
|000010f0| 20 53 70 61 63 65 20 65 | 78 63 65 70 74 20 73 65 | Space e|xcept se|
|00001100| 74 20 6e 75 6d 62 65 72 | 20 6f 66 20 6c 69 6e 65 |t number| of line|
|00001110| 73 20 66 6f 72 20 66 75 | 72 74 68 65 72 0a 09 09 |s for fu|rther...|
|00001120| 20 20 20 73 63 72 6f 6c | 6c 69 6e 67 20 63 6f 6d |   scrol|ling com|
|00001130| 6d 61 6e 64 73 20 74 6f | 20 73 63 72 6f 6c 6c 20 |mands to| scroll |
|00001140| 62 79 2e 0a 43 2d 75 20 | 61 6e 64 20 44 69 67 69 |by..C-u |and Digi|
|00001150| 74 73 09 70 72 6f 76 69 | 64 65 20 70 72 65 66 69 |ts.provi|de prefi|
|00001160| 78 20 61 72 67 75 6d 65 | 6e 74 73 2e 20 20 60 2d |x argume|nts.  `-|
|00001170| 27 20 64 65 6e 6f 74 65 | 73 20 6e 65 67 61 74 69 |' denote|s negati|
|00001180| 76 65 20 61 72 67 75 6d | 65 6e 74 2e 0a 3d 09 09 |ve argum|ent..=..|
|00001190| 70 72 69 6e 74 73 20 74 | 68 65 20 63 75 72 72 65 |prints t|he curre|
|000011a0| 6e 74 20 6c 69 6e 65 20 | 6e 75 6d 62 65 72 2e 0a |nt line |number..|
|000011b0| 67 09 09 67 6f 65 73 20 | 74 6f 20 6c 69 6e 65 20 |g..goes |to line |
|000011c0| 67 69 76 65 6e 20 62 79 | 20 70 72 65 66 69 78 20 |given by| prefix |
|000011d0| 61 72 67 75 6d 65 6e 74 | 2e 0a 2f 20 6f 72 20 4d |argument|../ or M|
|000011e0| 2d 43 2d 73 09 73 65 61 | 72 63 68 65 73 20 66 6f |-C-s.sea|rches fo|
|000011f0| 72 77 61 72 64 20 66 6f | 72 20 72 65 67 75 6c 61 |rward fo|r regula|
|00001200| 72 20 65 78 70 72 65 73 | 73 69 6f 6e 0a 5c 5c 20 |r expres|sion.\\ |
|00001210| 6f 72 20 4d 2d 43 2d 72 | 09 73 65 61 72 63 68 65 |or M-C-r|.searche|
|00001220| 73 20 62 61 63 6b 77 61 | 72 64 20 66 6f 72 20 72 |s backwa|rd for r|
|00001230| 65 67 75 6c 61 72 20 65 | 78 70 72 65 73 73 69 6f |egular e|xpressio|
|00001240| 6e 2e 0a 6e 09 09 73 65 | 61 72 63 68 65 73 20 66 |n..n..se|arches f|
|00001250| 6f 72 77 61 72 64 20 66 | 6f 72 20 6c 61 73 74 20 |orward f|or last |
|00001260| 72 65 67 75 6c 61 72 20 | 65 78 70 72 65 73 73 69 |regular |expressi|
|00001270| 6f 6e 2e 0a 70 09 09 73 | 65 61 72 63 68 65 73 20 |on..p..s|earches |
|00001280| 62 61 63 6b 77 61 72 64 | 20 66 6f 72 20 6c 61 73 |backward| for las|
|00001290| 74 20 72 65 67 75 6c 61 | 72 20 65 78 70 72 65 73 |t regula|r expres|
|000012a0| 73 69 6f 6e 2e 0a 43 2d | 40 20 6f 72 20 2e 09 73 |sion..C-|@ or ..s|
|000012b0| 65 74 20 74 68 65 20 6d | 61 72 6b 2e 0a 78 09 09 |et the m|ark..x..|
|000012c0| 65 78 63 68 61 6e 67 65 | 73 20 70 6f 69 6e 74 20 |exchange|s point |
|000012d0| 61 6e 64 20 6d 61 72 6b | 2e 0a 43 2d 73 20 6f 72 |and mark|..C-s or|
|000012e0| 20 73 09 64 6f 20 66 6f | 72 77 61 72 64 20 69 6e | s.do fo|rward in|
|000012f0| 63 72 65 6d 65 6e 74 61 | 6c 20 73 65 61 72 63 68 |crementa|l search|
|00001300| 2e 0a 43 2d 72 20 6f 72 | 20 72 09 64 6f 20 72 65 |..C-r or| r.do re|
|00001310| 76 65 72 73 65 20 69 6e | 63 72 65 6d 65 6e 74 61 |verse in|crementa|
|00001320| 6c 20 73 65 61 72 63 68 | 2e 0a 40 20 6f 72 20 27 |l search|..@ or '|
|00001330| 09 09 72 65 74 75 72 6e | 20 74 6f 20 6d 61 72 6b |..return| to mark|
|00001340| 20 61 6e 64 20 70 6f 70 | 73 20 6d 61 72 6b 20 72 | and pop|s mark r|
|00001350| 69 6e 67 2e 0a 09 09 20 | 20 4d 61 72 6b 20 72 69 |ing.... | Mark ri|
|00001360| 6e 67 20 69 73 20 70 75 | 73 68 65 64 20 61 74 20 |ng is pu|shed at |
|00001370| 73 74 61 72 74 20 6f 66 | 20 65 76 65 72 79 0a 09 |start of| every..|
|00001380| 09 20 20 73 75 63 63 65 | 73 73 66 75 6c 20 73 65 |.  succe|ssful se|
|00001390| 61 72 63 68 20 61 6e 64 | 20 77 68 65 6e 20 6a 75 |arch and| when ju|
|000013a0| 6d 70 20 74 6f 20 6c 69 | 6e 65 20 74 6f 20 6f 63 |mp to li|ne to oc|
|000013b0| 63 75 72 73 2e 0a 09 09 | 20 20 54 68 65 20 6d 61 |curs....|  The ma|
|000013c0| 72 6b 20 69 73 20 73 65 | 74 20 6f 6e 20 6a 75 6d |rk is se|t on jum|
|000013d0| 70 20 74 6f 20 62 75 66 | 66 65 72 20 73 74 61 72 |p to buf|fer star|
|000013e0| 74 20 6f 72 20 65 6e 64 | 2e 0a 3f 20 6f 72 20 68 |t or end|..? or h|
|000013f0| 09 09 70 72 6f 76 69 64 | 65 20 68 65 6c 70 20 6d |..provid|e help m|
|00001400| 65 73 73 61 67 65 20 28 | 6c 69 73 74 20 6f 66 20 |essage (|list of |
|00001410| 63 6f 6d 6d 61 6e 64 73 | 29 2e 0a 43 2d 68 09 09 |commands|)..C-h..|
|00001420| 70 72 6f 76 69 64 65 73 | 20 68 65 6c 70 20 28 6c |provides| help (l|
|00001430| 69 73 74 20 6f 66 20 63 | 6f 6d 6d 61 6e 64 73 20 |ist of c|ommands |
|00001440| 6f 72 20 64 65 73 63 72 | 69 70 74 69 6f 6e 20 6f |or descr|iption o|
|00001450| 66 20 61 20 63 6f 6d 6d | 61 6e 64 29 2e 0a 43 2d |f a comm|and)..C-|
|00001460| 6e 09 09 6d 6f 76 65 73 | 20 64 6f 77 6e 20 6c 69 |n..moves| down li|
|00001470| 6e 65 73 20 76 65 72 74 | 69 63 61 6c 6c 79 2e 0a |nes vert|ically..|
|00001480| 43 2d 70 09 09 6d 6f 76 | 65 73 20 75 70 77 61 72 |C-p..mov|es upwar|
|00001490| 64 20 6c 69 6e 65 73 20 | 76 65 72 74 69 63 61 6c |d lines |vertical|
|000014a0| 6c 79 2e 0a 43 2d 6c 09 | 09 72 65 63 65 6e 74 65 |ly..C-l.|.recente|
|000014b0| 72 73 20 74 68 65 20 73 | 63 72 65 65 6e 2e 0a 71 |rs the s|creen..q|
|000014c0| 20 6f 72 20 43 2d 63 09 | 65 78 69 74 20 76 69 65 | or C-c.|exit vie|
|000014d0| 77 2d 6d 6f 64 65 20 61 | 6e 64 20 72 65 74 75 72 |w-mode a|nd retur|
|000014e0| 6e 20 74 6f 20 70 72 65 | 76 69 6f 75 73 20 62 75 |n to pre|vious bu|
|000014f0| 66 66 65 72 2e 0a 0a 45 | 6e 74 72 79 20 74 6f 20 |ffer...E|ntry to |
|00001500| 74 68 69 73 20 6d 6f 64 | 65 20 63 61 6c 6c 73 20 |this mod|e calls |
|00001510| 74 68 65 20 76 61 6c 75 | 65 20 6f 66 20 20 76 69 |the valu|e of  vi|
|00001520| 65 77 2d 68 6f 6f 6b 20 | 20 69 66 20 6e 6f 6e 2d |ew-hook | if non-|
|00001530| 6e 69 6c 2e 0a 5c 5c 7b | 76 69 65 77 2d 6d 6f 64 |nil..\\{|view-mod|
|00001540| 65 2d 6d 61 70 7d 22 20 | 6e 69 6c 5d 29 0a 28 66 |e-map}" |nil]).(f|
|00001550| 73 65 74 20 27 76 69 65 | 77 2d 65 78 69 74 20 23 |set 'vie|w-exit #|
|00001560| 5b 6e 69 6c 20 22 08 11 | 5c 6e 13 0c 15 0e 06 16 |[nil "..|\n......|
|00001570| 07 c8 c9 20 21 88 0e 5c | 6e 62 88 0e 5c 6e cb 89 |... !..\|nb..\n..|
|00001580| 93 88 70 0e 0c 1e 0d 1e | 0e cf 0e 10 21 88 0e 0d |..p.....|....!...|
|00001590| ad 85 0e 0d 0e 0e 21 2a | 87 22 20 5b 76 69 65 77 |......!*|." [view|
|000015a0| 2d 6f 6c 64 2d 6d 6f 64 | 65 2d 6c 69 6e 65 2d 62 |-old-mod|e-line-b|
|000015b0| 75 66 66 65 72 2d 69 64 | 65 6e 74 69 66 69 63 61 |uffer-id|entifica|
|000015c0| 74 69 6f 6e 20 6d 6f 64 | 65 2d 6c 69 6e 65 2d 62 |tion mod|e-line-b|
|000015d0| 75 66 66 65 72 2d 69 64 | 65 6e 74 69 66 69 63 61 |uffer-id|entifica|
|000015e0| 74 69 6f 6e 20 76 69 65 | 77 2d 6f 6c 64 2d 6d 61 |tion vie|w-old-ma|
|000015f0| 6a 6f 72 2d 6d 6f 64 65 | 20 6d 61 6a 6f 72 2d 6d |jor-mode| major-m|
|00001600| 6f 64 65 20 76 69 65 77 | 2d 6f 6c 64 2d 6d 6f 64 |ode view|-old-mod|
|00001610| 65 2d 6e 61 6d 65 20 6d | 6f 64 65 2d 6e 61 6d 65 |e-name m|ode-name|
|00001620| 20 76 69 65 77 2d 6f 6c | 64 2d 62 75 66 66 65 72 | view-ol|d-buffer|
|00001630| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 62 75 66 66 65 |-read-on|ly buffe|
|00001640| 72 2d 72 65 61 64 2d 6f | 6e 6c 79 20 75 73 65 2d |r-read-o|nly use-|
|00001650| 6c 6f 63 61 6c 2d 6d 61 | 70 20 63 75 72 72 65 6e |local-ma|p curren|
|00001660| 74 2d 6c 6f 63 61 6c 2d | 6d 61 70 20 76 69 65 77 |t-local-|map view|
|00001670| 2d 65 78 69 74 2d 70 6f | 73 69 74 69 6f 6e 20 6e |-exit-po|sition n|
|00001680| 69 6c 20 76 69 65 77 2d | 65 78 69 74 2d 61 63 74 |il view-|exit-act|
|00001690| 69 6f 6e 20 61 63 74 69 | 6f 6e 20 76 69 65 77 65 |ion acti|on viewe|
|000016a0| 64 2d 62 75 66 66 65 72 | 20 73 77 69 74 63 68 2d |d-buffer| switch-|
|000016b0| 74 6f 2d 62 75 66 66 65 | 72 20 76 69 65 77 2d 70 |to-buffe|r view-p|
|000016c0| 72 65 76 2d 62 75 66 66 | 65 72 5d 20 33 20 22 5c |rev-buff|er] 3 "\|
|000016d0| 0a 45 78 69 74 20 66 72 | 6f 6d 20 76 69 65 77 2d |.Exit fr|om view-|
|000016e0| 6d 6f 64 65 2e 0a 49 66 | 20 79 6f 75 20 76 69 65 |mode..If| you vie|
|000016f0| 77 65 64 20 61 6e 20 65 | 78 69 73 74 69 6e 67 20 |wed an e|xisting |
|00001700| 62 75 66 66 65 72 2c 20 | 74 68 61 74 20 62 75 66 |buffer, |that buf|
|00001710| 66 65 72 20 72 65 74 75 | 72 6e 73 20 74 6f 20 69 |fer retu|rns to i|
|00001720| 74 73 20 70 72 65 76 69 | 6f 75 73 20 6d 6f 64 65 |ts previ|ous mode|
|00001730| 2e 0a 49 66 20 79 6f 75 | 20 76 69 65 77 65 64 20 |..If you| viewed |
|00001740| 61 20 66 69 6c 65 20 74 | 68 61 74 20 77 61 73 20 |a file t|hat was |
|00001750| 6e 6f 74 20 70 72 65 73 | 65 6e 74 20 69 6e 20 45 |not pres|ent in E|
|00001760| 6d 61 63 73 2c 20 69 74 | 73 20 62 75 66 66 65 72 |macs, it|s buffer|
|00001770| 20 69 73 20 6b 69 6c 6c | 65 64 2e 22 20 6e 69 6c | is kill|ed." nil|
|00001780| 5d 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |]).(byte|-code ".|
|00001790| c1 4d 88 c2 c3 4d 88 c4 | c5 4d 87 22 20 5b 76 69 |.M...M..|.M." [vi|
|000017a0| 65 77 2d 68 65 6c 70 66 | 75 6c 2d 6d 65 73 73 61 |ew-helpf|ul-messa|
|000017b0| 67 65 20 23 5b 6e 69 6c | 20 22 c0 c1 c2 21 c3 3d |ge #[nil| "...!.=|
|000017c0| ab 91 c1 c4 21 c5 3d ab | 8a c1 c6 21 c7 3d ab 83 |....!.=.|...!.=..|
|000017d0| c8 aa 83 c9 ca 21 21 87 | 22 20 5b 6d 65 73 73 61 |.....!!.|" [messa|
|000017e0| 67 65 20 6b 65 79 2d 62 | 69 6e 64 69 6e 67 20 22 |ge key-b|inding "|
|000017f0| 08 22 20 48 65 6c 70 65 | 72 2d 68 65 6c 70 20 22 |." Helpe|r-help "|
|00001800| 3f 22 20 48 65 6c 70 65 | 72 2d 64 65 73 63 72 69 |?" Helpe|r-descri|
|00001810| 62 65 2d 62 69 6e 64 69 | 6e 67 73 20 22 03 22 20 |be-bindi|ngs "." |
|00001820| 76 69 65 77 2d 65 78 69 | 74 20 22 54 79 70 65 20 |view-exi|t "Type |
|00001830| 43 2d 68 20 66 6f 72 20 | 68 65 6c 70 2c 20 3f 20 |C-h for |help, ? |
|00001840| 66 6f 72 20 63 6f 6d 6d | 61 6e 64 73 2c 20 43 2d |for comm|ands, C-|
|00001850| 63 20 74 6f 20 71 75 69 | 74 22 20 73 75 62 73 74 |c to qui|t" subst|
|00001860| 69 74 75 74 65 2d 63 6f | 6d 6d 61 6e 64 2d 6b 65 |itute-co|mmand-ke|
|00001870| 79 73 20 22 54 79 70 65 | 20 5c 5c 5b 48 65 6c 70 |ys "Type| \\[Help|
|00001880| 65 72 2d 68 65 6c 70 5d | 20 66 6f 72 20 68 65 6c |er-help]| for hel|
|00001890| 70 2c 20 5c 5c 5b 48 65 | 6c 70 65 72 2d 64 65 73 |p, \\[He|lper-des|
|000018a0| 63 72 69 62 65 2d 62 69 | 6e 64 69 6e 67 73 5d 20 |cribe-bi|ndings] |
|000018b0| 66 6f 72 20 63 6f 6d 6d | 61 6e 64 73 2c 20 5c 5c |for comm|ands, \\|
|000018c0| 5b 65 78 69 74 2d 72 65 | 63 75 72 73 69 76 65 2d |[exit-re|cursive-|
|000018d0| 65 64 69 74 5d 20 74 6f | 20 71 75 69 74 2e 22 5d |edit] to| quit."]|
|000018e0| 20 33 5d 20 76 69 65 77 | 2d 77 69 6e 64 6f 77 2d | 3] view|-window-|
|000018f0| 73 69 7a 65 20 23 5b 6e | 69 6c 20 22 c0 20 53 87 |size #[n|il ". S.|
|00001900| 22 20 5b 77 69 6e 64 6f | 77 2d 68 65 69 67 68 74 |" [windo|w-height|
|00001910| 5d 20 31 5d 20 76 69 65 | 77 2d 73 63 72 6f 6c 6c |] 1] vie|w-scroll|
|00001920| 2d 73 69 7a 65 20 23 5b | 6e 69 6c 20 22 c0 20 09 |-size #[|nil ". .|
|00001930| ae 82 c0 20 5e 87 22 20 | 5b 76 69 65 77 2d 77 69 |... ^." |[view-wi|
|00001940| 6e 64 6f 77 2d 73 69 7a | 65 20 76 69 65 77 2d 73 |ndow-siz|e view-s|
|00001950| 63 72 6f 6c 6c 2d 73 69 | 7a 65 5d 20 32 5d 5d 20 |croll-si|ze] 2]] |
|00001960| 32 29 0a 28 64 65 66 76 | 61 72 20 76 69 65 77 2d |2).(defv|ar view-|
|00001970| 68 6f 6f 6b 20 6e 69 6c | 20 22 5c 0a 49 66 20 6e |hook nil| "\.If n|
|00001980| 6f 6e 2d 6e 69 6c 2c 20 | 69 74 73 20 76 61 6c 75 |on-nil, |its valu|
|00001990| 65 20 69 73 20 63 61 6c | 6c 65 64 20 77 68 65 6e |e is cal|led when|
|000019a0| 20 76 69 65 77 69 6e 67 | 20 62 75 66 66 65 72 20 | viewing| buffer |
|000019b0| 6f 72 20 66 69 6c 65 2e | 22 29 0a 28 66 73 65 74 |or file.|").(fset|
|000019c0| 20 27 56 69 65 77 2d 67 | 6f 74 6f 2d 6c 69 6e 65 | 'View-g|oto-line|
|000019d0| 20 23 5b 28 26 6f 70 74 | 69 6f 6e 61 6c 20 6c 69 | #[(&opt|ional li|
|000019e0| 6e 65 29 20 22 c0 20 88 | c1 5c 6e ae 81 c3 21 88 |ne) ". .|.\n...!.|
|000019f0| c4 c5 20 c6 a5 21 87 22 | 20 5b 70 75 73 68 2d 6d |.. ..!."| [push-m|
|00001a00| 61 72 6b 20 67 6f 74 6f | 2d 6c 69 6e 65 20 6c 69 |ark goto|-line li|
|00001a10| 6e 65 20 31 20 72 65 63 | 65 6e 74 65 72 20 76 69 |ne 1 rec|enter vi|
|00001a20| 65 77 2d 77 69 6e 64 6f | 77 2d 73 69 7a 65 20 32 |ew-windo|w-size 2|
|00001a30| 5d 20 33 20 22 5c 0a 4d | 6f 76 65 20 74 6f 20 4c |] 3 "\.M|ove to L|
|00001a40| 49 4e 45 20 69 6e 20 56 | 69 65 77 20 6d 6f 64 65 |INE in V|iew mode|
|00001a50| 2e 0a 44 69 73 70 6c 61 | 79 20 69 73 20 63 65 6e |..Displa|y is cen|
|00001a60| 74 65 72 65 64 20 61 74 | 20 4c 49 4e 45 2e 20 20 |tered at| LINE.  |
|00001a70| 53 65 74 73 20 6d 61 72 | 6b 20 61 74 20 73 74 61 |Sets mar|k at sta|
|00001a80| 72 74 69 6e 67 20 70 6f | 73 69 74 69 6f 6e 20 61 |rting po|sition a|
|00001a90| 6e 64 20 70 75 73 68 65 | 73 0a 6d 61 72 6b 20 72 |nd pushe|s.mark r|
|00001aa0| 69 6e 67 2e 22 20 22 70 | 22 5d 29 0a 28 66 73 65 |ing." "p|"]).(fse|
|00001ab0| 74 20 27 56 69 65 77 2d | 73 63 72 6f 6c 6c 2d 6c |t 'View-|scroll-l|
|00001ac0| 69 6e 65 73 2d 66 6f 72 | 77 61 72 64 20 23 5b 28 |ines-for|ward #[(|
|00001ad0| 26 6f 70 74 69 6f 6e 61 | 6c 20 6c 69 6e 65 73 29 |&optiona|l lines)|
|00001ae0| 20 22 c0 64 21 ab 83 c1 | 20 88 5c 6e ab 85 c3 5c | ".d!...| .\n...\|
|00001af0| 6e 21 aa 82 c4 20 89 12 | c5 20 59 ab 86 c6 c7 21 |n!... ..|. Y....!|
|00001b00| 88 aa 91 5c 6e 5b c5 20 | 59 ab 86 c8 c7 21 88 aa |...\n[. |Y....!..|
|00001b10| 84 c6 5c 6e 21 88 c0 64 | 21 ab 8d 64 62 88 c9 ca |..\n!..d|!..db...|
|00001b20| 21 88 cb cc cd 21 21 88 | ce ca 21 88 cf 79 88 c7 |!....!!.|..!..y..|
|00001b30| 87 22 20 5b 70 6f 73 2d | 76 69 73 69 62 6c 65 2d |." [pos-|visible-|
|00001b40| 69 6e 2d 77 69 6e 64 6f | 77 2d 70 20 65 78 69 74 |in-windo|w-p exit|
|00001b50| 2d 72 65 63 75 72 73 69 | 76 65 2d 65 64 69 74 20 |-recursi|ve-edit |
|00001b60| 6c 69 6e 65 73 20 70 72 | 65 66 69 78 2d 6e 75 6d |lines pr|efix-num|
|00001b70| 65 72 69 63 2d 76 61 6c | 75 65 20 76 69 65 77 2d |eric-val|ue view-|
|00001b80| 73 63 72 6f 6c 6c 2d 73 | 69 7a 65 20 76 69 65 77 |scroll-s|ize view|
|00001b90| 2d 77 69 6e 64 6f 77 2d | 73 69 7a 65 20 73 63 72 |-window-|size scr|
|00001ba0| 6f 6c 6c 2d 75 70 20 6e | 69 6c 20 73 63 72 6f 6c |oll-up n|il scrol|
|00001bb0| 6c 2d 64 6f 77 6e 20 72 | 65 63 65 6e 74 65 72 20 |l-down r|ecenter |
|00001bc0| 2d 31 20 6d 65 73 73 61 | 67 65 20 73 75 62 73 74 |-1 messa|ge subst|
|00001bd0| 69 74 75 74 65 2d 63 6f | 6d 6d 61 6e 64 2d 6b 65 |itute-co|mmand-ke|
|00001be0| 79 73 20 22 45 6e 64 2e | 20 20 54 79 70 65 20 5c |ys "End.|  Type \|
|00001bf0| 5c 5b 65 78 69 74 2d 72 | 65 63 75 72 73 69 76 65 |\[exit-r|ecursive|
|00001c00| 2d 65 64 69 74 5d 20 74 | 6f 20 71 75 69 74 20 76 |-edit] t|o quit v|
|00001c10| 69 65 77 69 6e 67 2e 22 | 20 6d 6f 76 65 2d 74 6f |iewing."| move-to|
|00001c20| 2d 77 69 6e 64 6f 77 2d | 6c 69 6e 65 20 30 5d 20 |-window-|line 0] |
|00001c30| 34 20 22 5c 0a 53 63 72 | 6f 6c 6c 20 66 6f 72 77 |4 "\.Scr|oll forw|
|00001c40| 61 72 64 20 69 6e 20 56 | 69 65 77 20 6d 6f 64 65 |ard in V|iew mode|
|00001c50| 2c 20 6f 72 20 65 78 69 | 74 20 69 66 20 65 6e 64 |, or exi|t if end|
|00001c60| 20 6f 66 20 74 65 78 74 | 20 69 73 20 76 69 73 69 | of text| is visi|
|00001c70| 62 6c 65 2e 0a 4e 6f 20 | 61 72 67 20 6d 65 61 6e |ble..No |arg mean|
|00001c80| 73 20 77 68 6f 6c 65 20 | 77 69 6e 64 6f 77 20 66 |s whole |window f|
|00001c90| 75 6c 6c 2c 20 6f 72 20 | 6e 75 6d 62 65 72 20 6f |ull, or |number o|
|00001ca0| 66 20 6c 69 6e 65 73 20 | 73 65 74 20 62 79 20 5c |f lines |set by \|
|00001cb0| 5c 5b 56 69 65 77 2d 73 | 63 72 6f 6c 6c 2d 6c 69 |\[View-s|croll-li|
|00001cc0| 6e 65 73 2d 66 6f 72 77 | 61 72 64 2d 73 65 74 2d |nes-forw|ard-set-|
|00001cd0| 73 63 72 6f 6c 6c 2d 73 | 69 7a 65 5d 2e 0a 41 72 |scroll-s|ize]..Ar|
|00001ce0| 67 20 69 73 20 6e 75 6d | 62 65 72 20 6f 66 20 6c |g is num|ber of l|
|00001cf0| 69 6e 65 73 20 74 6f 20 | 73 63 72 6f 6c 6c 2e 22 |ines to |scroll."|
|00001d00| 20 22 50 22 5d 29 0a 28 | 66 73 65 74 20 27 56 69 | "P"]).(|fset 'Vi|
|00001d10| 65 77 2d 73 63 72 6f 6c | 6c 2d 6c 69 6e 65 73 2d |ew-scrol|l-lines-|
|00001d20| 66 6f 72 77 61 72 64 2d | 73 65 74 2d 73 63 72 6f |forward-|set-scro|
|00001d30| 6c 6c 2d 73 69 7a 65 20 | 23 5b 28 26 6f 70 74 69 |ll-size |#[(&opti|
|00001d40| 6f 6e 61 6c 20 6c 69 6e | 65 73 29 20 22 08 ac 85 |onal lin|es) "...|
|00001d50| c1 20 12 aa 92 c3 08 21 | 89 10 c4 56 ab 83 08 aa |. .....!|...V....|
|00001d60| 82 08 5b c1 20 5e 12 c5 | 08 21 87 22 20 5b 6c 69 |..[. ^..|.!." [li|
|00001d70| 6e 65 73 20 76 69 65 77 | 2d 77 69 6e 64 6f 77 2d |nes view|-window-|
|00001d80| 73 69 7a 65 20 76 69 65 | 77 2d 73 63 72 6f 6c 6c |size vie|w-scroll|
|00001d90| 2d 73 69 7a 65 20 70 72 | 65 66 69 78 2d 6e 75 6d |-size pr|efix-num|
|00001da0| 65 72 69 63 2d 76 61 6c | 75 65 20 30 20 56 69 65 |eric-val|ue 0 Vie|
|00001db0| 77 2d 73 63 72 6f 6c 6c | 2d 6c 69 6e 65 73 2d 66 |w-scroll|-lines-f|
|00001dc0| 6f 72 77 61 72 64 5d 20 | 33 20 22 5c 0a 53 63 72 |orward] |3 "\.Scr|
|00001dd0| 6f 6c 6c 20 66 6f 72 77 | 61 72 64 20 4c 49 4e 45 |oll forw|ard LINE|
|00001de0| 53 20 6c 69 6e 65 73 20 | 69 6e 20 56 69 65 77 20 |S lines |in View |
|00001df0| 6d 6f 64 65 2c 20 73 65 | 74 74 69 6e 67 20 74 68 |mode, se|tting th|
|00001e00| 65 20 5c 22 73 63 72 6f | 6c 6c 20 73 69 7a 65 5c |e \"scro|ll size\|
|00001e10| 22 2e 0a 54 68 69 73 20 | 69 73 20 74 68 65 20 6e |"..This |is the n|
|00001e20| 75 6d 62 65 72 20 6f 66 | 20 6c 69 6e 65 73 20 77 |umber of| lines w|
|00001e30| 68 69 63 68 20 5c 5c 5b | 56 69 65 77 2d 73 63 72 |hich \\[|View-scr|
|00001e40| 6f 6c 6c 2d 6c 69 6e 65 | 73 2d 66 6f 72 77 61 72 |oll-line|s-forwar|
|00001e50| 64 5d 20 61 6e 64 20 5c | 5c 5b 56 69 65 77 2d 73 |d] and \|\[View-s|
|00001e60| 63 72 6f 6c 6c 2d 6c 69 | 6e 65 73 2d 62 61 63 6b |croll-li|nes-back|
|00001e70| 77 61 72 64 5d 20 73 63 | 72 6f 6c 6c 20 62 79 20 |ward] sc|roll by |
|00001e80| 64 65 66 61 75 6c 74 2e | 0a 54 68 65 20 61 62 73 |default.|.The abs|
|00001e90| 6f 6c 75 74 65 20 76 61 | 6c 75 65 20 6f 66 20 4c |olute va|lue of L|
|00001ea0| 49 4e 45 53 20 69 73 20 | 75 73 65 64 2c 20 73 6f |INES is |used, so|
|00001eb0| 20 74 68 69 73 20 63 6f | 6d 6d 61 6e 64 20 63 61 | this co|mmand ca|
|00001ec0| 6e 20 62 65 20 75 73 65 | 64 20 74 6f 20 73 63 72 |n be use|d to scr|
|00001ed0| 6f 6c 6c 0a 62 61 63 6b | 77 61 72 64 73 20 28 62 |oll.back|wards (b|
|00001ee0| 75 74 20 5c 22 73 63 72 | 6f 6c 6c 20 73 69 7a 65 |ut \"scr|oll size|
|00001ef0| 5c 22 20 69 73 20 61 6c | 77 61 79 73 20 70 6f 73 |\" is al|ways pos|
|00001f00| 69 74 69 76 65 29 2e 20 | 20 49 66 20 4c 49 4e 45 |itive). | If LINE|
|00001f10| 53 20 69 73 20 67 72 65 | 61 74 65 72 20 74 68 61 |S is gre|ater tha|
|00001f20| 6e 0a 77 69 6e 64 6f 77 | 20 68 65 69 67 68 74 20 |n.window| height |
|00001f30| 6f 72 20 6f 6d 69 74 74 | 65 64 2c 20 74 68 65 6e |or omitt|ed, then|
|00001f40| 20 77 69 6e 64 6f 77 20 | 68 65 69 67 68 74 20 69 | window |height i|
|00001f50| 73 20 61 73 73 75 6d 65 | 64 2e 20 20 49 66 20 4c |s assume|d.  If L|
|00001f60| 49 4e 45 53 20 69 73 20 | 6c 65 73 73 0a 74 68 61 |INES is |less.tha|
|00001f70| 6e 20 77 69 6e 64 6f 77 | 20 68 65 69 67 68 74 20 |n window| height |
|00001f80| 74 68 65 6e 20 73 63 72 | 6f 6c 6c 69 6e 67 20 63 |then scr|olling c|
|00001f90| 6f 6e 74 65 78 74 20 69 | 73 20 70 72 6f 76 69 64 |ontext i|s provid|
|00001fa0| 65 64 20 66 72 6f 6d 20 | 70 72 65 76 69 6f 75 73 |ed from |previous|
|00001fb0| 20 73 63 72 65 65 6e 2e | 22 20 22 50 22 5d 29 0a | screen.|" "P"]).|
|00001fc0| 28 66 73 65 74 20 27 56 | 69 65 77 2d 73 63 72 6f |(fset 'V|iew-scro|
|00001fd0| 6c 6c 2d 6f 6e 65 2d 6d | 6f 72 65 2d 6c 69 6e 65 |ll-one-m|ore-line|
|00001fe0| 20 23 5b 28 26 6f 70 74 | 69 6f 6e 61 6c 20 61 72 | #[(&opt|ional ar|
|00001ff0| 67 29 20 22 c0 09 ac 83 | c2 aa 81 c3 21 87 22 20 |g) "....|....!." |
|00002000| 5b 56 69 65 77 2d 73 63 | 72 6f 6c 6c 2d 6c 69 6e |[View-sc|roll-lin|
|00002010| 65 73 2d 66 6f 72 77 61 | 72 64 20 61 72 67 20 31 |es-forwa|rd arg 1|
|00002020| 20 2d 31 5d 20 32 20 22 | 5c 0a 53 63 72 6f 6c 6c | -1] 2 "|\.Scroll|
|00002030| 20 6f 6e 65 20 6d 6f 72 | 65 20 6c 69 6e 65 20 75 | one mor|e line u|
|00002040| 70 20 69 6e 20 56 69 65 | 77 20 6d 6f 64 65 2e 0a |p in Vie|w mode..|
|00002050| 57 69 74 68 20 41 52 47 | 20 73 63 72 6f 6c 6c 20 |With ARG| scroll |
|00002060| 6f 6e 65 20 6c 69 6e 65 | 20 64 6f 77 6e 2e 22 20 |one line| down." |
|00002070| 22 50 22 5d 29 0a 28 66 | 73 65 74 20 27 56 69 65 |"P"]).(f|set 'Vie|
|00002080| 77 2d 73 63 72 6f 6c 6c | 2d 6c 69 6e 65 73 2d 62 |w-scroll|-lines-b|
|00002090| 61 63 6b 77 61 72 64 20 | 23 5b 28 26 6f 70 74 69 |ackward |#[(&opti|
|000020a0| 6f 6e 61 6c 20 6c 69 6e | 65 73 29 20 22 c0 09 ab |onal lin|es) "...|
|000020b0| 86 c2 09 21 5b aa 83 c3 | 20 5b 21 87 22 20 5b 56 |...![...| [!." [V|
|000020c0| 69 65 77 2d 73 63 72 6f | 6c 6c 2d 6c 69 6e 65 73 |iew-scro|ll-lines|
|000020d0| 2d 66 6f 72 77 61 72 64 | 20 6c 69 6e 65 73 20 70 |-forward| lines p|
|000020e0| 72 65 66 69 78 2d 6e 75 | 6d 65 72 69 63 2d 76 61 |refix-nu|meric-va|
|000020f0| 6c 75 65 20 76 69 65 77 | 2d 73 63 72 6f 6c 6c 2d |lue view|-scroll-|
|00002100| 73 69 7a 65 5d 20 33 20 | 22 5c 0a 53 63 72 6f 6c |size] 3 |"\.Scrol|
|00002110| 6c 20 62 61 63 6b 77 61 | 72 64 20 69 6e 20 56 69 |l backwa|rd in Vi|
|00002120| 65 77 20 6d 6f 64 65 2e | 0a 4e 6f 20 61 72 67 20 |ew mode.|.No arg |
|00002130| 6d 65 61 6e 73 20 77 68 | 6f 6c 65 20 77 69 6e 64 |means wh|ole wind|
|00002140| 6f 77 20 66 75 6c 6c 2c | 20 6f 72 20 6e 75 6d 62 |ow full,| or numb|
|00002150| 65 72 20 6f 66 20 6c 69 | 6e 65 73 20 73 65 74 20 |er of li|nes set |
|00002160| 62 79 20 5c 5c 5b 56 69 | 65 77 2d 73 63 72 6f 6c |by \\[Vi|ew-scrol|
|00002170| 6c 2d 6c 69 6e 65 73 2d | 66 6f 72 77 61 72 64 2d |l-lines-|forward-|
|00002180| 73 65 74 2d 73 63 72 6f | 6c 6c 2d 73 69 7a 65 5d |set-scro|ll-size]|
|00002190| 2e 0a 41 72 67 20 69 73 | 20 6e 75 6d 62 65 72 20 |..Arg is| number |
|000021a0| 6f 66 20 6c 69 6e 65 73 | 20 74 6f 20 73 63 72 6f |of lines| to scro|
|000021b0| 6c 6c 2e 22 20 22 50 22 | 5d 29 0a 28 66 73 65 74 |ll." "P"|]).(fset|
|000021c0| 20 27 56 69 65 77 2d 73 | 65 61 72 63 68 2d 72 65 | 'View-s|earch-re|
|000021d0| 67 65 78 70 2d 66 6f 72 | 77 61 72 64 20 23 5b 28 |gexp-for|ward #[(|
|000021e0| 74 69 6d 65 73 20 72 65 | 67 65 78 70 29 20 22 08 |times re|gexp) ".|
|000021f0| 47 c1 56 ad 84 c2 0b 08 | 5c 22 87 22 20 5b 72 65 |G.V.....|\"." [re|
|00002200| 67 65 78 70 20 30 20 76 | 69 65 77 2d 73 65 61 72 |gexp 0 v|iew-sear|
|00002210| 63 68 20 74 69 6d 65 73 | 5d 20 33 20 22 5c 0a 53 |ch times|] 3 "\.S|
|00002220| 65 61 72 63 68 20 66 6f | 72 77 61 72 64 20 66 6f |earch fo|rward fo|
|00002230| 72 20 4e 54 48 20 6f 63 | 63 75 72 72 65 6e 63 65 |r NTH oc|currence|
|00002240| 20 6f 66 20 52 45 47 45 | 58 50 20 69 6e 20 56 69 | of REGE|XP in Vi|
|00002250| 65 77 20 6d 6f 64 65 2e | 0a 44 69 73 70 6c 61 79 |ew mode.|.Display|
|00002260| 73 20 6c 69 6e 65 20 66 | 6f 75 6e 64 20 61 74 20 |s line f|ound at |
|00002270| 63 65 6e 74 65 72 20 6f | 66 20 77 69 6e 64 6f 77 |center o|f window|
|00002280| 2e 20 20 52 45 47 45 58 | 50 20 69 73 20 72 65 6d |.  REGEX|P is rem|
|00002290| 65 6d 62 65 72 65 64 20 | 66 6f 72 0a 73 65 61 72 |embered |for.sear|
|000022a0| 63 68 69 6e 67 20 77 69 | 74 68 20 5c 5c 5b 56 69 |ching wi|th \\[Vi|
|000022b0| 65 77 2d 73 65 61 72 63 | 68 2d 6c 61 73 74 2d 72 |ew-searc|h-last-r|
|000022c0| 65 67 65 78 70 2d 66 6f | 72 77 61 72 64 5d 20 61 |egexp-fo|rward] a|
|000022d0| 6e 64 20 5c 5c 5b 56 69 | 65 77 2d 73 65 61 72 63 |nd \\[Vi|ew-searc|
|000022e0| 68 2d 6c 61 73 74 2d 72 | 65 67 65 78 70 2d 62 61 |h-last-r|egexp-ba|
|000022f0| 63 6b 77 61 72 64 5d 2e | 20 20 53 65 74 73 20 6d |ckward].|  Sets m|
|00002300| 61 72 6b 20 61 74 20 73 | 74 61 72 74 69 6e 67 20 |ark at s|tarting |
|00002310| 70 6f 73 69 74 69 6f 6e | 20 61 6e 64 20 70 75 73 |position| and pus|
|00002320| 68 65 73 20 6d 61 72 6b | 20 72 69 6e 67 2e 22 20 |hes mark| ring." |
|00002330| 22 70 5c 6e 73 53 65 61 | 72 63 68 20 66 6f 72 77 |"p\nsSea|rch forw|
|00002340| 61 72 64 20 28 72 65 67 | 65 78 70 29 3a 20 22 5d |ard (reg|exp): "]|
|00002350| 29 0a 28 66 73 65 74 20 | 27 56 69 65 77 2d 73 65 |).(fset |'View-se|
|00002360| 61 72 63 68 2d 72 65 67 | 65 78 70 2d 62 61 63 6b |arch-reg|exp-back|
|00002370| 77 61 72 64 20 23 5b 28 | 74 69 6d 65 73 20 72 65 |ward #[(|times re|
|00002380| 67 65 78 70 29 20 22 c0 | 09 5b 5c 6e 5c 22 87 22 |gexp) ".|.[\n\"."|
|00002390| 20 5b 56 69 65 77 2d 73 | 65 61 72 63 68 2d 72 65 | [View-s|earch-re|
|000023a0| 67 65 78 70 2d 66 6f 72 | 77 61 72 64 20 74 69 6d |gexp-for|ward tim|
|000023b0| 65 73 20 72 65 67 65 78 | 70 5d 20 33 20 22 5c 0a |es regex|p] 3 "\.|
|000023c0| 53 65 61 72 63 68 20 62 | 61 63 6b 77 61 72 64 20 |Search b|ackward |
|000023d0| 66 72 6f 6d 20 77 69 6e | 64 6f 77 20 73 74 61 72 |from win|dow star|
|000023e0| 74 20 66 6f 72 20 4e 54 | 48 20 69 6e 73 74 61 6e |t for NT|H instan|
|000023f0| 63 65 20 6f 66 20 52 45 | 47 45 58 50 20 69 6e 20 |ce of RE|GEXP in |
|00002400| 56 69 65 77 20 6d 6f 64 | 65 2e 0a 44 69 73 70 6c |View mod|e..Displ|
|00002410| 61 79 73 20 6c 69 6e 65 | 20 66 6f 75 6e 64 20 61 |ays line| found a|
|00002420| 74 20 63 65 6e 74 65 72 | 20 6f 66 20 77 69 6e 64 |t center| of wind|
|00002430| 6f 77 2e 20 20 52 45 47 | 45 58 50 20 69 73 20 72 |ow.  REG|EXP is r|
|00002440| 65 6d 65 6d 62 65 72 65 | 64 20 66 6f 72 0a 73 65 |emembere|d for.se|
|00002450| 61 72 63 68 69 6e 67 20 | 77 69 74 68 20 5c 5c 5b |arching |with \\[|
|00002460| 56 69 65 77 2d 73 65 61 | 72 63 68 2d 6c 61 73 74 |View-sea|rch-last|
|00002470| 2d 72 65 67 65 78 70 2d | 66 6f 72 77 61 72 64 5d |-regexp-|forward]|
|00002480| 20 61 6e 64 20 5c 5c 5b | 56 69 65 77 2d 73 65 61 | and \\[|View-sea|
|00002490| 72 63 68 2d 6c 61 73 74 | 2d 72 65 67 65 78 70 2d |rch-last|-regexp-|
|000024a0| 62 61 63 6b 77 61 72 64 | 5d 2e 20 20 53 65 74 73 |backward|].  Sets|
|000024b0| 20 6d 61 72 6b 20 61 74 | 20 73 74 61 72 74 69 6e | mark at| startin|
|000024c0| 67 20 70 6f 73 69 74 69 | 6f 6e 20 61 6e 64 20 70 |g positi|on and p|
|000024d0| 75 73 68 65 73 20 6d 61 | 72 6b 20 72 69 6e 67 2e |ushes ma|rk ring.|
|000024e0| 22 20 22 70 5c 6e 73 53 | 65 61 72 63 68 20 62 61 |" "p\nsS|earch ba|
|000024f0| 63 6b 77 61 72 64 20 28 | 72 65 67 65 78 70 29 3a |ckward (|regexp):|
|00002500| 20 22 5d 29 0a 28 66 73 | 65 74 20 27 56 69 65 77 | "]).(fs|et 'View|
|00002510| 2d 73 65 61 72 63 68 2d | 6c 61 73 74 2d 72 65 67 |-search-|last-reg|
|00002520| 65 78 70 2d 66 6f 72 77 | 61 72 64 20 23 5b 28 74 |exp-forw|ard #[(t|
|00002530| 69 6d 65 73 29 20 22 c0 | 09 5c 6e 5c 22 87 22 20 |imes) ".|.\n\"." |
|00002540| 5b 56 69 65 77 2d 73 65 | 61 72 63 68 2d 72 65 67 |[View-se|arch-reg|
|00002550| 65 78 70 2d 66 6f 72 77 | 61 72 64 20 74 69 6d 65 |exp-forw|ard time|
|00002560| 73 20 76 69 65 77 2d 6c | 61 73 74 2d 72 65 67 65 |s view-l|ast-rege|
|00002570| 78 70 5d 20 33 20 22 5c | 0a 53 65 61 72 63 68 20 |xp] 3 "\|.Search |
|00002580| 66 6f 72 77 61 72 64 20 | 66 72 6f 6d 20 77 69 6e |forward |from win|
|00002590| 64 6f 77 20 65 6e 64 20 | 66 6f 72 20 4e 54 48 20 |dow end |for NTH |
|000025a0| 69 6e 73 74 61 6e 63 65 | 20 6f 66 20 6c 61 73 74 |instance| of last|
|000025b0| 20 72 65 67 65 78 70 20 | 69 6e 20 56 69 65 77 20 | regexp |in View |
|000025c0| 6d 6f 64 65 2e 0a 44 69 | 73 70 6c 61 79 73 20 6c |mode..Di|splays l|
|000025d0| 69 6e 65 20 66 6f 75 6e | 64 20 61 74 20 63 65 6e |ine foun|d at cen|
|000025e0| 74 65 72 20 6f 66 20 77 | 69 6e 64 6f 77 2e 20 20 |ter of w|indow.  |
|000025f0| 53 65 74 73 20 6d 61 72 | 6b 20 61 74 20 73 74 61 |Sets mar|k at sta|
|00002600| 72 74 69 6e 67 20 70 6f | 73 69 74 69 6f 6e 0a 61 |rting po|sition.a|
|00002610| 6e 64 20 70 75 73 68 65 | 73 20 6d 61 72 6b 20 72 |nd pushe|s mark r|
|00002620| 69 6e 67 2e 22 20 22 70 | 22 5d 29 0a 28 66 73 65 |ing." "p|"]).(fse|
|00002630| 74 20 27 56 69 65 77 2d | 73 65 61 72 63 68 2d 6c |t 'View-|search-l|
|00002640| 61 73 74 2d 72 65 67 65 | 78 70 2d 62 61 63 6b 77 |ast-rege|xp-backw|
|00002650| 61 72 64 20 23 5b 28 74 | 69 6d 65 73 29 20 22 c0 |ard #[(t|imes) ".|
|00002660| 09 5c 6e 5c 22 87 22 20 | 5b 56 69 65 77 2d 73 65 |.\n\"." |[View-se|
|00002670| 61 72 63 68 2d 72 65 67 | 65 78 70 2d 62 61 63 6b |arch-reg|exp-back|
|00002680| 77 61 72 64 20 74 69 6d | 65 73 20 76 69 65 77 2d |ward tim|es view-|
|00002690| 6c 61 73 74 2d 72 65 67 | 65 78 70 5d 20 33 20 22 |last-reg|exp] 3 "|
|000026a0| 5c 0a 53 65 61 72 63 68 | 20 62 61 63 6b 77 61 72 |\.Search| backwar|
|000026b0| 64 20 66 72 6f 6d 20 77 | 69 6e 64 6f 77 20 73 74 |d from w|indow st|
|000026c0| 61 72 74 20 66 6f 72 20 | 4e 54 48 20 69 6e 73 74 |art for |NTH inst|
|000026d0| 61 6e 63 65 20 6f 66 20 | 6c 61 73 74 20 72 65 67 |ance of |last reg|
|000026e0| 65 78 70 20 69 6e 20 56 | 69 65 77 20 6d 6f 64 65 |exp in V|iew mode|
|000026f0| 2e 0a 44 69 73 70 6c 61 | 79 73 20 6c 69 6e 65 20 |..Displa|ys line |
|00002700| 66 6f 75 6e 64 20 61 74 | 20 63 65 6e 74 65 72 20 |found at| center |
|00002710| 6f 66 20 77 69 6e 64 6f | 77 2e 20 20 53 65 74 73 |of windo|w.  Sets|
|00002720| 20 6d 61 72 6b 20 61 74 | 20 73 74 61 72 74 69 6e | mark at| startin|
|00002730| 67 20 70 6f 73 69 74 69 | 6f 6e 20 61 6e 64 0a 70 |g positi|on and.p|
|00002740| 75 73 68 65 73 20 6d 61 | 72 6b 20 72 69 6e 67 2e |ushes ma|rk ring.|
|00002750| 22 20 22 70 22 5d 29 0a | 28 66 73 65 74 20 27 56 |" "p"]).|(fset 'V|
|00002760| 69 65 77 2d 62 61 63 6b | 2d 74 6f 2d 6d 61 72 6b |iew-back|-to-mark|
|00002770| 20 23 5b 28 26 6f 70 74 | 69 6f 6e 61 6c 20 69 67 | #[(&opt|ional ig|
|00002780| 6e 6f 72 65 29 20 22 c0 | 20 ae 81 65 62 88 c1 20 |nore) ".| ..eb.. |
|00002790| 88 c2 c3 20 c4 a5 21 87 | 22 20 5b 6d 61 72 6b 20 |... ..!.|" [mark |
|000027a0| 70 6f 70 2d 6d 61 72 6b | 20 72 65 63 65 6e 74 65 |pop-mark| recente|
|000027b0| 72 20 76 69 65 77 2d 77 | 69 6e 64 6f 77 2d 73 69 |r view-w|indow-si|
|000027c0| 7a 65 20 32 5d 20 33 20 | 22 5c 0a 52 65 74 75 72 |ze 2] 3 |"\.Retur|
|000027d0| 6e 20 74 6f 20 6c 61 73 | 74 20 6d 61 72 6b 20 73 |n to las|t mark s|
|000027e0| 65 74 20 69 6e 20 56 69 | 65 77 20 6d 6f 64 65 2c |et in Vi|ew mode,|
|000027f0| 20 65 6c 73 65 20 62 65 | 67 69 6e 6e 69 6e 67 20 | else be|ginning |
|00002800| 6f 66 20 66 69 6c 65 2e | 0a 44 69 73 70 6c 61 79 |of file.|.Display|
|00002810| 73 20 6c 69 6e 65 20 61 | 74 20 63 65 6e 74 65 72 |s line a|t center|
|00002820| 20 6f 66 20 77 69 6e 64 | 6f 77 2e 20 20 50 6f 70 | of wind|ow.  Pop|
|00002830| 73 20 6d 61 72 6b 20 72 | 69 6e 67 20 73 6f 20 73 |s mark r|ing so s|
|00002840| 75 63 63 65 73 73 69 76 | 65 0a 69 6e 76 6f 63 61 |uccessiv|e.invoca|
|00002850| 74 69 6f 6e 73 20 72 65 | 74 75 72 6e 20 74 6f 20 |tions re|turn to |
|00002860| 65 61 72 6c 69 65 72 20 | 6d 61 72 6b 73 2e 22 20 |earlier |marks." |
|00002870| 6e 69 6c 5d 29 0a 28 62 | 79 74 65 2d 63 6f 64 65 |nil]).(b|yte-code|
|00002880| 20 22 c0 c1 4d 88 c2 c3 | 21 87 22 20 5b 76 69 65 | "..M...|!." [vie|
|00002890| 77 2d 73 65 61 72 63 68 | 20 23 5b 28 74 69 6d 65 |w-search| #[(time|
|000028a0| 73 20 72 65 67 65 78 70 | 29 20 22 08 11 c2 1b 8a |s regexp|) ".....|
|000028b0| c4 0d c6 57 ab 83 c6 aa | 81 c7 21 88 c8 08 c2 c9 |...W....|..!.....|
|000028c0| 0d 24 ab 82 60 13 29 0b | ab 91 ca 20 88 0b 62 88 |.$..`.).|... ..b.|
|000028d0| c6 79 88 cb cc 20 cd a5 | 21 aa 89 ce cf 0d 08 23 |.y... ..|!......#|
|000028e0| 88 d0 d1 21 29 87 22 20 | 5b 72 65 67 65 78 70 20 |...!)." |[regexp |
|000028f0| 76 69 65 77 2d 6c 61 73 | 74 2d 72 65 67 65 78 70 |view-las|t-regexp|
|00002900| 20 6e 69 6c 20 77 68 65 | 72 65 20 6d 6f 76 65 2d | nil whe|re move-|
|00002910| 74 6f 2d 77 69 6e 64 6f | 77 2d 6c 69 6e 65 20 74 |to-windo|w-line t|
|00002920| 69 6d 65 73 20 30 20 2d | 31 20 72 65 2d 73 65 61 |imes 0 -|1 re-sea|
|00002930| 72 63 68 2d 66 6f 72 77 | 61 72 64 20 74 20 70 75 |rch-forw|ard t pu|
|00002940| 73 68 2d 6d 61 72 6b 20 | 72 65 63 65 6e 74 65 72 |sh-mark |recenter|
|00002950| 20 76 69 65 77 2d 77 69 | 6e 64 6f 77 2d 73 69 7a | view-wi|ndow-siz|
|00002960| 65 20 32 20 6d 65 73 73 | 61 67 65 20 22 43 61 6e |e 2 mess|age "Can|
|00002970| 27 74 20 66 69 6e 64 20 | 6f 63 63 75 72 72 65 6e |'t find |occurren|
|00002980| 63 65 20 25 64 20 6f 66 | 20 25 73 22 20 73 69 74 |ce %d of| %s" sit|
|00002990| 2d 66 6f 72 20 34 5d 20 | 35 5d 20 70 72 6f 76 69 |-for 4] |5] provi|
|000029a0| 64 65 20 76 69 65 77 5d | 20 32 29 0a             |de view]| 2).    |
+--------+-------------------------+-------------------------+--------+--------+