|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: s
Length: 4183 (0x1057)
Names: »startup.elc«
└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89
└─⟦46d41b2d0⟧ »./emacs-18.55.tar.Z«
└─⟦fa971747f⟧
└─⟦this⟧ »dist-18.55/lisp/startup.elc«
0x0000…0020 0a 28 73 65 74 71 20 74 6f 70 2d 6c 65 76 65 6c 20 28 71 75 6f 74 65 20 28 6e 6f 72 6d 61 6c 2d ┆ (setq top-level (quote (normal-┆ 0x0020…0040 74 6f 70 2d 6c 65 76 65 6c 29 29 29 0a 0a 28 64 65 66 76 61 72 20 63 6f 6d 6d 61 6e 64 2d 6c 69 ┆top-level))) (defvar command-li┆ 0x0040…0060 6e 65 2d 70 72 6f 63 65 73 73 65 64 20 6e 69 6c 20 22 5c 0a 74 20 6f 6e 63 65 20 63 6f 6d 6d 61 ┆ne-processed nil "\ t once comma┆ 0x0060…0080 6e 64 20 6c 69 6e 65 20 68 61 73 20 62 65 65 6e 20 70 72 6f 63 65 73 73 65 64 22 29 0a 0a 28 64 ┆nd line has been processed") (d┆ 0x0080…00a0 65 66 63 6f 6e 73 74 20 69 6e 68 69 62 69 74 2d 73 74 61 72 74 75 70 2d 6d 65 73 73 61 67 65 20 ┆efconst inhibit-startup-message ┆ 0x00a0…00c0 6e 69 6c 20 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 69 6e 68 69 62 69 74 73 20 74 68 65 20 69 6e 69 ┆nil "\ *Non-nil inhibits the ini┆ 0x00c0…00e0 74 69 61 6c 20 73 74 61 72 74 75 70 20 6d 65 73 73 61 67 65 73 2e 0a 54 68 69 73 20 69 73 20 66 ┆tial startup messages. This is f┆ 0x00e0…0100 6f 72 20 75 73 65 20 69 6e 20 79 6f 75 72 20 70 65 72 73 6f 6e 61 6c 20 69 6e 69 74 20 66 69 6c ┆or use in your personal init fil┆ 0x0100…0120 65 2c 20 6f 6e 63 65 20 79 6f 75 20 61 72 65 20 66 61 6d 69 6c 69 61 72 0a 77 69 74 68 20 74 68 ┆e, once you are familiar with th┆ 0x0120…0140 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 74 68 65 20 73 74 61 72 74 75 70 20 6d 65 73 73 61 67 ┆e contents of the startup messag┆ 0x0140…0160 65 2e 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 69 6e 68 69 62 69 74 2d 64 65 66 61 75 6c 74 2d ┆e.") (defconst inhibit-default-┆ 0x0160…0180 69 6e 69 74 20 6e 69 6c 20 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 69 6e 68 69 62 69 74 73 20 6c 6f ┆init nil "\ *Non-nil inhibits lo┆ 0x0180…01a0 61 64 69 6e 67 20 74 68 65 20 60 64 65 66 61 75 6c 74 27 20 6c 69 62 72 61 72 79 2e 22 29 0a 0a ┆ading the `default' library.") ┆ 0x01a0…01c0 28 64 65 66 63 6f 6e 73 74 20 63 6f 6d 6d 61 6e 64 2d 73 77 69 74 63 68 2d 61 6c 69 73 74 20 6e ┆(defconst command-switch-alist n┆ 0x01c0…01e0 69 6c 20 22 5c 0a 41 6c 69 73 74 20 6f 66 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 20 73 77 69 74 ┆il "\ Alist of command-line swit┆ 0x01e0…0200 63 68 65 73 2e 0a 45 6c 65 6d 65 6e 74 73 20 6c 6f 6f 6b 20 6c 69 6b 65 20 28 53 57 49 54 43 48 ┆ches. Elements look like (SWITCH┆ 0x0200…0220 2d 53 54 52 49 4e 47 20 2e 20 48 41 4e 44 4c 45 52 2d 46 55 4e 43 54 49 4f 4e 29 2e 0a 48 41 4e ┆-STRING . HANDLER-FUNCTION). HAN┆ 0x0220…0240 44 4c 45 52 2d 46 55 4e 43 54 49 4f 4e 20 72 65 63 65 69 76 65 73 20 73 77 69 74 63 68 20 6e 61 ┆DLER-FUNCTION receives switch na┆ 0x0240…0260 6d 65 20 61 73 20 73 6f 6c 65 20 61 72 67 3b 0a 72 65 6d 61 69 6e 69 6e 67 20 63 6f 6d 6d 61 6e ┆me as sole arg; remaining comman┆ 0x0260…0280 64 2d 6c 69 6e 65 20 61 72 67 73 20 61 72 65 20 69 6e 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 ┆d-line args are in the variable ┆ 0x0280…02a0 60 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d 61 72 67 73 2d 6c 65 66 74 27 2e 22 29 0a 0a 28 64 65 ┆`command-line-args-left'.") (de┆ 0x02a0…02c0 66 76 61 72 20 74 65 72 6d 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 6e 69 6c 20 22 5c 0a 46 75 6e 63 ┆fvar term-setup-hook nil "\ Func┆ 0x02c0…02e0 74 69 6f 6e 20 74 6f 20 62 65 20 63 61 6c 6c 65 64 20 61 66 74 65 72 20 6c 6f 61 64 69 6e 67 20 ┆tion to be called after loading ┆ 0x02e0…0300 74 65 72 6d 69 6e 61 6c 2d 73 70 65 63 69 66 69 63 20 6c 69 73 70 20 63 6f 64 65 2e 0a 49 74 20 ┆terminal-specific lisp code. It ┆ 0x0300…0320 69 73 20 63 61 6c 6c 65 64 20 77 69 74 68 20 6e 6f 20 61 72 67 75 6d 65 6e 74 73 2e 20 20 59 6f ┆is called with no arguments. Yo┆ 0x0320…0340 75 20 63 61 6e 20 75 73 65 20 74 68 69 73 20 74 6f 20 6f 76 65 72 72 69 64 65 20 74 68 65 0a 64 ┆u can use this to override the d┆ 0x0340…0360 65 66 69 6e 69 74 69 6f 6e 73 20 6d 61 64 65 20 62 79 20 74 68 65 20 74 65 72 6d 69 6e 61 6c 2d ┆efinitions made by the terminal-┆ 0x0360…0380 73 70 65 63 69 66 69 63 20 66 69 6c 65 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 77 69 6e 64 6f 77 ┆specific file.") (defvar window┆ 0x0380…03a0 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 6e 69 6c 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 69 6e 69 74 ┆-setup-hook nil) (defconst init┆ 0x03a0…03c0 69 61 6c 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 20 28 71 75 6f 74 65 20 6c 69 73 70 2d 69 6e 74 65 72 ┆ial-major-mode (quote lisp-inter┆ 0x03c0…03e0 61 63 74 69 6f 6e 2d 6d 6f 64 65 29 20 22 5c 0a 4d 61 6a 6f 72 20 6d 6f 64 65 20 63 6f 6d 6d 61 ┆action-mode) "\ Major mode comma┆ 0x03e0…0400 6e 64 20 73 79 6d 62 6f 6c 20 74 6f 20 75 73 65 20 66 6f 72 20 74 68 65 20 69 6e 69 74 69 61 6c ┆nd symbol to use for the initial┆ 0x0400…0420 20 2a 73 63 72 61 74 63 68 2a 20 62 75 66 66 65 72 2e 22 29 0a 0a 28 64 65 66 75 6e 20 6e 6f 72 ┆ *scratch* buffer.") (defun nor┆ 0x0420…0440 6d 61 6c 2d 74 6f 70 2d 6c 65 76 65 6c 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 83 ┆mal-top-level nil (byte-code " ┆ 0x0440…0460 0a 00 c5 c6 21 82 21 00 c1 89 10 88 c7 c8 21 85 1b 00 c9 c7 c8 21 21 89 12 88 ca 8e cb 20 29 87 ┆ ! ! ! !! ) ┆ 0x0460…0480 22 20 5b 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d 70 72 6f 63 65 73 73 65 64 20 74 20 64 65 66 61 ┆" [command-line-processed t defa┆ 0x0480…04a0 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 74 65 72 6d 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 77 69 ┆ult-directory term-setup-hook wi┆ 0x04a0…04c0 6e 64 6f 77 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 6d 65 73 73 61 67 65 20 22 42 61 63 6b 20 74 6f ┆ndow-setup-hook message "Back to┆ 0x04c0…04e0 20 74 6f 70 20 6c 65 76 65 6c 2e 22 20 67 65 74 65 6e 76 20 22 50 57 44 22 20 66 69 6c 65 2d 6e ┆ top level." getenv "PWD" file-n┆ 0x04e0…0500 61 6d 65 2d 61 73 2d 64 69 72 65 63 74 6f 72 79 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 08 85 ┆ame-as-directory ((byte-code " ┆ 0x0500…0520 07 00 c2 08 21 88 09 85 0f 00 c2 09 21 87 22 20 5b 74 65 72 6d 2d 73 65 74 75 70 2d 68 6f 6f 6b ┆ ! ! " [term-setup-hook┆ 0x0520…0540 20 77 69 6e 64 6f 77 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 66 75 6e 63 61 6c 6c 5d 20 33 29 29 20 ┆ window-setup-hook funcall] 3)) ┆ 0x0540…0560 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 63 6f 6d 6d 61 6e ┆command-line] 6)) (defun comman┆ 0x0560…0580 64 2d 6c 69 6e 65 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 09 41 0b 83 0a 00 c4 82 0c ┆d-line nil (byte-code " A ┆ 0x0580…05a0 00 cd 20 c4 1d 1a 18 0a 85 1f 00 ce 0a cf 20 5c 22 85 1f 00 d0 89 12 88 0d 3f 85 26 00 08 85 6b ┆ \" ? & k┆ 0x05a0…05c0 00 08 40 1e 06 d1 0e 06 d2 5c 22 86 3a 00 d1 0e 06 d3 5c 22 83 46 00 c4 12 08 41 89 10 82 66 00 ┆ @ \" : \" F A f ┆ 0x05c0…05e0 d1 0e 06 d4 5c 22 86 53 00 d1 0e 06 d5 5c 22 83 63 00 08 41 10 08 40 12 08 41 89 10 82 66 00 c7 ┆ \" S \" c A @ A f ┆ 0x05e0…0600 89 15 29 88 82 20 00 88 d6 d7 d8 8f 88 d9 da 21 85 80 00 8a da 71 88 db 0e 08 21 29 88 0e 09 85 ┆ ) ! q !) ┆ 0x0600…0620 d9 00 0b 3f 85 d9 00 0e 0a 83 9f 00 dc 0e 09 dd 0e 0a 21 de 51 c7 c7 23 82 d9 00 df e0 21 c4 1e ┆ ? ! Q # ! ┆ 0x0620…0640 0c 1e 0b 0e 0b 85 b6 00 dc 0e 09 0e 0b 50 c7 c7 23 3f 85 d8 00 e1 e2 0e 0b 5c 22 89 16 0c 83 d0 ┆ P #? \" ┆ 0x0640…0660 00 0e 0b e3 0e 0c 4f 89 16 0b 82 d4 00 c4 89 16 0b 88 82 a7 00 2a 88 e4 08 21 88 0b 85 e5 00 e5 ┆ O * ! ┆ 0x0660…0680 c7 21 2b 87 22 20 5b 61 72 67 73 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d 61 72 67 73 20 69 6e ┆ !+ " [args command-line-args in┆ 0x0680…06a0 69 74 20 6e 6f 6e 69 6e 74 65 72 61 63 74 69 76 65 20 6e 69 6c 20 64 6f 6e 65 20 61 72 67 69 20 ┆it noninteractive nil done argi ┆ 0x06a0…06c0 74 20 69 6e 69 74 69 61 6c 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 20 74 65 72 6d 2d 66 69 6c 65 2d 70 ┆t initial-major-mode term-file-p┆ 0x06c0…06e0 72 65 66 69 78 20 77 69 6e 64 6f 77 2d 73 79 73 74 65 6d 20 74 65 72 6d 20 68 79 70 68 65 6e 64 ┆refix window-system term hyphend┆ 0x06e0…0700 20 75 73 65 72 2d 6c 6f 67 69 6e 2d 6e 61 6d 65 20 73 74 72 69 6e 67 3d 20 75 73 65 72 2d 72 65 ┆ user-login-name string= user-re┆ 0x0700…0720 61 6c 2d 6c 6f 67 69 6e 2d 6e 61 6d 65 20 22 22 20 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 22 2d ┆al-login-name "" string-equal "-┆ 0x0720…0740 71 22 20 22 2d 6e 6f 2d 69 6e 69 74 2d 66 69 6c 65 22 20 22 2d 75 22 20 22 2d 75 73 65 72 22 20 ┆q" "-no-init-file" "-u" "-user" ┆ 0x0740…0760 65 72 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 85 24 00 c6 09 c7 3d 83 0f 00 c8 82 13 ┆error (byte-code " $ = ┆ 0x0760…0780 00 c9 08 ca 51 c2 c2 c2 24 88 0b 86 24 00 c5 1c c6 cb c2 c2 23 29 87 22 20 5b 69 6e 69 74 20 73 ┆ Q $ $ #) " [init s┆ 0x0780…07a0 79 73 74 65 6d 2d 74 79 70 65 20 74 20 69 6e 68 69 62 69 74 2d 64 65 66 61 75 6c 74 2d 69 6e 69 ┆ystem-type t inhibit-default-ini┆ 0x07a0…07c0 74 20 69 6e 68 69 62 69 74 2d 73 74 61 72 74 75 70 2d 6d 65 73 73 61 67 65 20 6e 69 6c 20 6c 6f ┆t inhibit-startup-message nil lo┆ 0x07c0…07e0 61 64 20 76 61 78 2d 76 6d 73 20 22 73 79 73 24 6c 6f 67 69 6e 3a 2e 65 6d 61 63 73 22 20 22 7e ┆ad vax-vms "sys$login:.emacs" "~┆ 0x07e0…0800 22 20 22 2f 2e 65 6d 61 63 73 22 20 22 64 65 66 61 75 6c 74 22 5d 20 35 29 20 28 28 65 72 72 6f ┆" "/.emacs" "default"] 5) ((erro┆ 0x0800…0820 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 c1 21 87 22 20 5b 6d 65 73 73 61 67 65 20 22 45 72 ┆r (byte-code " ! " [message "Er┆ 0x0820…0840 72 6f 72 20 69 6e 20 69 6e 69 74 20 66 69 6c 65 22 5d 20 32 29 29 29 20 67 65 74 2d 62 75 66 66 ┆ror in init file"] 2))) get-buff┆ 0x0840…0860 65 72 20 22 2a 73 63 72 61 74 63 68 2a 22 20 66 75 6e 63 61 6c 6c 20 6c 6f 61 64 20 73 79 6d 62 ┆er "*scratch*" funcall load symb┆ 0x0860…0880 6f 6c 2d 6e 61 6d 65 20 22 2d 77 69 6e 22 20 67 65 74 65 6e 76 20 22 54 45 52 4d 22 20 73 74 72 ┆ol-name "-win" getenv "TERM" str┆ 0x0880…08a0 69 6e 67 2d 6d 61 74 63 68 20 22 5b 2d 5f 5d 5b 5e 2d 5f 5d 2b 24 22 20 30 20 63 6f 6d 6d 61 6e ┆ing-match "[-_][^-_]+$" 0 comman┆ 0x08a0…08c0 64 2d 6c 69 6e 65 2d 31 20 6b 69 6c 6c 2d 65 6d 61 63 73 5d 20 31 38 29 29 0a 0a 28 64 65 66 75 ┆d-line-1 kill-emacs] 18)) (defu┆ 0x08c0…08e0 6e 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d 31 20 28 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d 61 ┆n command-line-1 (command-line-a┆ 0x08e0…0900 72 67 73 2d 6c 65 66 74 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 3f 83 82 00 09 3f 85 1a 00 ┆rgs-left) (byte-code " ? ? ┆ 0x0900…0920 0a 3f 85 1a 00 ce cf 20 d0 5c 22 85 1a 00 d1 20 3f 85 7f 00 0b 85 24 00 d2 0b 21 88 c4 89 13 88 ┆ ? \" ? $ ! ┆ 0x0920…0940 0d 85 30 00 d2 0d 21 88 c4 89 15 88 d3 8e d4 d5 20 d6 5c 22 88 d7 d8 21 d9 3d 85 6a 00 d7 da 21 ┆ 0 ! \" ! = j !┆ 0x0940…0960 db 3d 85 6a 00 d7 dc 21 dd 3d 85 6a 00 d7 de 21 df 3d 85 6a 00 d7 e0 21 e1 3d 85 6a 00 d7 e2 21 ┆ = j ! = j ! = j ! = j !┆ 0x0960…0980 e3 3d 83 72 00 e4 63 82 76 00 e5 e6 21 63 88 e7 c4 21 88 e8 e9 21 29 82 5c 5c 01 0e 07 ea 1e 08 ┆ = r c v !c ! !) \\ ┆ 0x0980…09a0 1e 06 08 85 5b 01 08 40 c4 1e 0a 1e 09 08 41 89 10 88 eb 0e 09 0e 0b 5c 22 89 16 0a 83 af 00 d2 ┆ [ @ A \" ┆ 0x09a0…09c0 0e 0a 41 0e 09 5c 22 82 56 01 ec 0e 09 ed 5c 22 86 c4 00 ec 0e 09 ee 5c 22 86 c4 00 ec 0e 09 ef ┆ A \" V \" \" ┆ 0x09c0…09e0 5c 22 83 db 00 f0 08 40 21 89 16 0a 88 08 41 89 10 88 d2 0e 0a 21 82 56 01 ec 0e 09 f1 5c 22 86 ┆\" @! A ! V \" ┆ 0x09e0…0a00 e8 00 ec 0e 09 f2 5c 22 83 01 01 0e 07 0e 0c 42 1e 0c f3 08 40 c4 cd 23 29 88 08 41 89 10 82 56 ┆ \" B @ #) A V┆ 0x0a00…0a20 01 ec 0e 09 f4 5c 22 86 0e 01 ec 0e 09 f5 5c 22 83 1d 01 f6 08 40 21 88 08 41 89 10 82 56 01 ec ┆ \" \" @! A V ┆ 0x0a20…0a40 0e 09 f7 5c 22 83 2b 01 f8 cd 21 82 56 01 f9 fa 0e 09 5c 22 83 3d 01 fb 0e 09 21 89 16 08 82 56 ┆ \" + ! V \" = ! V┆ 0x0a40…0a60 01 fc fd 0e 09 0e 06 5c 22 21 88 fe 0e 08 21 86 51 01 ff 0e 08 21 88 ea 89 16 08 2a 88 82 89 00 ┆ \"! ! Q ! * ┆ 0x0a60…0a80 2a 87 22 20 5b 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d 61 72 67 73 2d 6c 65 66 74 20 69 6e 68 69 ┆* " [command-line-args-left inhi┆ 0x0a80…0aa0 62 69 74 2d 73 74 61 72 74 75 70 2d 6d 65 73 73 61 67 65 20 6e 6f 6e 69 6e 74 65 72 61 63 74 69 ┆bit-startup-message noninteracti┆ 0x0aa0…0ac0 76 65 20 74 65 72 6d 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 6e 69 6c 20 77 69 6e 64 6f 77 2d 73 65 ┆ve term-setup-hook nil window-se┆ 0x0ac0…0ae0 74 75 70 2d 68 6f 6f 6b 20 64 69 72 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 6c ┆tup-hook dir default-directory l┆ 0x0ae0…0b00 69 6e 65 20 61 72 67 69 20 74 65 6d 20 63 6f 6d 6d 61 6e 64 2d 73 77 69 74 63 68 2d 61 6c 69 73 ┆ine argi tem command-switch-alis┆ 0x0b00…0b20 74 20 6c 6f 61 64 2d 70 61 74 68 20 74 20 73 74 72 69 6e 67 3d 20 62 75 66 66 65 72 2d 6e 61 6d ┆t load-path t string= buffer-nam┆ 0x0b20…0b40 65 20 22 2a 73 63 72 61 74 63 68 2a 22 20 69 6e 70 75 74 2d 70 65 6e 64 69 6e 67 2d 70 20 66 75 ┆e "*scratch*" input-pending-p fu┆ 0x0b40…0b60 6e 63 61 6c 6c 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 20 88 c2 c0 21 87 22 20 5b 6e 69 6c ┆ncall ((byte-code " ! " [nil┆ 0x0b60…0b80 20 65 72 61 73 65 2d 62 75 66 66 65 72 20 73 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 ┆ erase-buffer set-buffer-modifie┆ 0x0b80…0ba0 64 2d 70 5d 20 33 29 29 20 69 6e 73 65 72 74 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 22 0a ┆d-p] 3)) insert emacs-version " ┆ 0x0ba0…0bc0 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 31 39 38 38 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 ┆Copyright (C) 1988 Free Software┆ 0x0bc0…0be0 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 49 6e 63 2e 0a 22 20 6b 65 79 2d 62 69 6e 64 69 6e 67 20 ┆ Foundation, Inc. " key-binding ┆ 0x0be0…0c00 22 08 22 20 68 65 6c 70 2d 63 6f 6d 6d 61 6e 64 20 22 18 75 22 20 61 64 76 65 72 74 69 73 65 64 ┆" " help-command " u" advertised┆ 0x0c00…0c20 2d 75 6e 64 6f 20 22 08 03 22 20 64 65 73 63 72 69 62 65 2d 63 6f 70 79 69 6e 67 20 22 08 04 22 ┆-undo " " describe-copying " "┆ 0x0c20…0c40 20 64 65 73 63 72 69 62 65 2d 64 69 73 74 72 69 62 75 74 69 6f 6e 20 22 08 17 22 20 64 65 73 63 ┆ describe-distribution " " desc┆ 0x0c40…0c60 72 69 62 65 2d 6e 6f 2d 77 61 72 72 61 6e 74 79 20 22 08 74 22 20 68 65 6c 70 2d 77 69 74 68 2d ┆ribe-no-warranty " t" help-with-┆ 0x0c60…0c80 74 75 74 6f 72 69 61 6c 20 22 54 79 70 65 20 43 2d 68 20 66 6f 72 20 68 65 6c 70 3b 20 43 2d 78 ┆tutorial "Type C-h for help; C-x┆ 0x0c80…0ca0 20 75 20 74 6f 20 75 6e 64 6f 20 63 68 61 6e 67 65 73 2e 20 20 28 60 43 2d 27 20 6d 65 61 6e 73 ┆ u to undo changes. (`C-' means┆ 0x0ca0…0cc0 20 75 73 65 20 43 54 52 4c 20 6b 65 79 2e 29 0a 0a 47 4e 55 20 45 6d 61 63 73 20 63 6f 6d 65 73 ┆ use CTRL key.) GNU Emacs comes┆ 0x0cc0…0ce0 20 77 69 74 68 20 41 42 53 4f 4c 55 54 45 4c 59 20 4e 4f 20 57 41 52 52 41 4e 54 59 3b 20 74 79 ┆ with ABSOLUTELY NO WARRANTY; ty┆ 0x0ce0…0d00 70 65 20 43 2d 68 20 43 2d 77 20 66 6f 72 20 66 75 6c 6c 20 64 65 74 61 69 6c 73 2e 0a 59 6f 75 ┆pe C-h C-w for full details. You┆ 0x0d00…0d20 20 6d 61 79 20 67 69 76 65 20 6f 75 74 20 63 6f 70 69 65 73 20 6f 66 20 45 6d 61 63 73 3b 20 74 ┆ may give out copies of Emacs; t┆ 0x0d20…0d40 79 70 65 20 43 2d 68 20 43 2d 63 20 74 6f 20 73 65 65 20 74 68 65 20 63 6f 6e 64 69 74 69 6f 6e ┆ype C-h C-c to see the condition┆ 0x0d40…0d60 73 2e 0a 54 79 70 65 20 43 2d 68 20 43 2d 64 20 66 6f 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 ┆s. Type C-h C-d for information ┆ 0x0d60…0d80 6f 6e 20 67 65 74 74 69 6e 67 20 74 68 65 20 6c 61 74 65 73 74 20 76 65 72 73 69 6f 6e 2e 0a 54 ┆on getting the latest version. T┆ 0x0d80…0da0 79 70 65 20 43 2d 68 20 74 20 66 6f 72 20 61 20 74 75 74 6f 72 69 61 6c 20 6f 6e 20 75 73 69 6e ┆ype C-h t for a tutorial on usin┆ 0x0da0…0dc0 67 20 45 6d 61 63 73 2e 22 20 73 75 62 73 74 69 74 75 74 65 2d 63 6f 6d 6d 61 6e 64 2d 6b 65 79 ┆g Emacs." substitute-command-key┆ 0x0dc0…0de0 73 20 22 54 79 70 65 20 5c 5c 5b 68 65 6c 70 2d 63 6f 6d 6d 61 6e 64 5d 20 66 6f 72 20 68 65 6c ┆s "Type \\[help-command] for hel┆ 0x0de0…0e00 70 3b 20 5c 5c 5b 61 64 76 65 72 74 69 73 65 64 2d 75 6e 64 6f 5d 20 74 6f 20 75 6e 64 6f 20 63 ┆p; \\[advertised-undo] to undo c┆ 0x0e00…0e20 68 61 6e 67 65 73 2e 20 20 28 60 43 2d 27 20 6d 65 61 6e 73 20 75 73 65 20 43 54 52 4c 20 6b 65 ┆hanges. (`C-' means use CTRL ke┆ 0x0e20…0e40 79 2e 29 0a 0a 47 4e 55 20 45 6d 61 63 73 20 63 6f 6d 65 73 20 77 69 74 68 20 41 42 53 4f 4c 55 ┆y.) GNU Emacs comes with ABSOLU┆ 0x0e40…0e60 54 45 4c 59 20 4e 4f 20 57 41 52 52 41 4e 54 59 3b 20 74 79 70 65 20 5c 5c 5b 64 65 73 63 72 69 ┆TELY NO WARRANTY; type \\[descri┆ 0x0e60…0e80 62 65 2d 6e 6f 2d 77 61 72 72 61 6e 74 79 5d 20 66 6f 72 20 66 75 6c 6c 20 64 65 74 61 69 6c 73 ┆be-no-warranty] for full details┆ 0x0e80…0ea0 2e 0a 59 6f 75 20 6d 61 79 20 67 69 76 65 20 6f 75 74 20 63 6f 70 69 65 73 20 6f 66 20 45 6d 61 ┆. You may give out copies of Ema┆ 0x0ea0…0ec0 63 73 3b 20 74 79 70 65 20 5c 5c 5b 64 65 73 63 72 69 62 65 2d 63 6f 70 79 69 6e 67 5d 20 74 6f ┆cs; type \\[describe-copying] to┆ 0x0ec0…0ee0 20 73 65 65 20 74 68 65 20 63 6f 6e 64 69 74 69 6f 6e 73 2e 0a 54 79 70 65 20 5c 5c 5b 64 65 73 ┆ see the conditions. Type \\[des┆ 0x0ee0…0f00 63 72 69 62 65 2d 64 69 73 74 72 69 62 75 74 69 6f 6e 5d 20 66 6f 72 20 69 6e 66 6f 72 6d 61 74 ┆cribe-distribution] for informat┆ 0x0f00…0f20 69 6f 6e 20 6f 6e 20 67 65 74 74 69 6e 67 20 74 68 65 20 6c 61 74 65 73 74 20 76 65 72 73 69 6f ┆ion on getting the latest versio┆ 0x0f20…0f40 6e 2e 0a 54 79 70 65 20 5c 5c 5b 68 65 6c 70 2d 77 69 74 68 2d 74 75 74 6f 72 69 61 6c 5d 20 66 ┆n. Type \\[help-with-tutorial] f┆ 0x0f40…0f60 6f 72 20 61 20 74 75 74 6f 72 69 61 6c 20 6f 6e 20 75 73 69 6e 67 20 45 6d 61 63 73 2e 22 20 73 ┆or a tutorial on using Emacs." s┆ 0x0f60…0f80 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 73 69 74 2d 66 6f 72 20 31 32 30 ┆et-buffer-modified-p sit-for 120┆ 0x0f80…0fa0 20 30 20 61 73 73 6f 63 20 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 22 2d 66 22 20 22 2d 66 75 6e ┆ 0 assoc string-equal "-f" "-fun┆ 0x0fa0…0fc0 63 61 6c 6c 22 20 22 2d 65 22 20 69 6e 74 65 72 6e 20 22 2d 6c 22 20 22 2d 6c 6f 61 64 22 20 6c ┆call" "-e" intern "-l" "-load" l┆ 0x0fc0…0fe0 6f 61 64 20 22 2d 69 22 20 22 2d 69 6e 73 65 72 74 22 20 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 ┆oad "-i" "-insert" insert-file-c┆ 0x0fe0…1000 6f 6e 74 65 6e 74 73 20 22 2d 6b 69 6c 6c 22 20 6b 69 6c 6c 2d 65 6d 61 63 73 20 73 74 72 69 6e ┆ontents "-kill" kill-emacs strin┆ 0x1000…1020 67 2d 6d 61 74 63 68 20 22 5e 5c 5c 2b 5b 30 2d 39 5d 2b 5c 5c 27 22 20 73 74 72 69 6e 67 2d 74 ┆g-match "^\\+[0-9]+\\'" string-t┆ 0x1020…1040 6f 2d 69 6e 74 20 66 69 6e 64 2d 66 69 6c 65 20 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 ┆o-int find-file expand-file-name┆ 0x1040…1057 20 7a 65 72 6f 70 20 67 6f 74 6f 2d 6c 69 6e 65 5d 20 34 30 29 29 0a ┆ zerop goto-line] 40)) ┆