DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: ┃ s

⟦912b0d78f⟧

    Length: 3643 (0xe3b)
    Names: »startup.elc«

Derivation

└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
    └─ ⟦this⟧ »EUUGD11/gnu-31mar87/emacs/lisp/startup.elc« 

Hex Dump

0x000…020 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-┆
0x020…040 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┆
0x040…060 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┆
0x060…080 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┆
0x080…0a0 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 ┆
0x0a0…0c0 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┆
0x0c0…0e0 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┆
0x0e0…100 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┆
0x100…120 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┆
0x120…140 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┆
0x140…160 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-┆
0x160…180 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┆
0x180…1a0 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.")  ┆
0x1a0…1c0 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┆
0x1c0…1e0 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┆
0x1e0…200 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┆
0x200…220 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┆
0x220…240 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┆
0x240…260 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┆
0x260…280 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 ┆
0x280…2a0 60 61 72 67 73 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 74 65 72 6d 2d 73 65 74 75 70 2d 68 6f   ┆`args'.")  (defvar term-setup-ho┆
0x2a0…2c0 6f 6b 20 6e 69 6c 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 69 6e 69 74 69 61 6c 2d 6d 61 6a 6f 72   ┆ok nil)  (defconst initial-major┆
0x2c0…2e0 2d 6d 6f 64 65 20 28 71 75 6f 74 65 20 6c 69 73 70 2d 69 6e 74 65 72 61 63 74 69 6f 6e 2d 6d 6f   ┆-mode (quote lisp-interaction-mo┆
0x2e0…300 64 65 29 20 22 5c 0a 4d 61 6a 6f 72 20 6d 6f 64 65 20 63 6f 6d 6d 61 6e 64 20 73 79 6d 62 6f 6c   ┆de) "\ Major mode command symbol┆
0x300…320 20 74 6f 20 75 73 65 20 66 6f 72 20 74 68 65 20 69 6e 69 74 69 61 6c 20 2a 73 63 72 61 74 63 68   ┆ to use for the initial *scratch┆
0x320…340 2a 20 62 75 66 66 65 72 2e 22 29 0a 0a 28 64 65 66 75 6e 20 6e 6f 72 6d 61 6c 2d 74 6f 70 2d 6c   ┆* buffer.")  (defun normal-top-l┆
0x340…360 65 76 65 6c 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 83 0a 00 c3 c4 21 82 13 00 c1   ┆evel nil (byte-code "      !    ┆
0x360…380 89 10 88 c5 8e c6 20 29 87 22 20 5b 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2d 70 72 6f 63 65 73 73   ┆       ) " [command-line-process┆
0x380…3a0 65 64 20 74 20 74 65 72 6d 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 6d 65 73 73 61 67 65 20 22 42 61   ┆ed t term-setup-hook message "Ba┆
0x3a0…3c0 63 6b 20 74 6f 20 74 6f 70 20 6c 65 76 65 6c 2e 22 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 08   ┆ck to top level." ((byte-code " ┆
0x3c0…3e0 85 07 00 c1 08 21 87 22 20 5b 74 65 72 6d 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 66 75 6e 63 61 6c   ┆     ! " [term-setup-hook funcal┆
0x3e0…400 6c 5d 20 32 29 29 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e   ┆l] 2)) command-line] 3))  (defun┆
0x400…420 20 63 6f 6d 6d 61 6e 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   ┆ command-line nil (byte-code " A┆
0x420…440 0b 83 0a 00 c4 82 13 00 cb cc 21 86 13 00 cb cd 21 c4 1d 1a 18 0d 3f 85 1d 00 08 85 62 00 08 40   ┆          !     !     ?     b  @┆
0x440…460 1e 06 ce 0e 06 cf 5c 22 86 31 00 ce 0e 06 d0 5c 22 83 3d 00 c4 12 08 41 89 10 82 5d 00 ce 0e 06   ┆      \" 1     \" =    A   ]    ┆
0x460…480 d1 5c 22 86 4a 00 ce 0e 06 d2 5c 22 83 5a 00 08 41 10 08 40 12 08 41 89 10 82 5d 00 c7 89 15 29   ┆ \" J     \" Z  A  @  A   ]    )┆
0x480…4a0 88 82 17 00 88 d3 d4 d5 8f 88 d6 d7 21 85 77 00 8a d7 71 88 d8 0e 08 21 29 88 0e 09 85 a4 00 0b   ┆            ! w   q    !)       ┆
0x4a0…4c0 3f 85 a4 00 d9 0e 0a 83 93 00 0e 09 da 0e 0a 21 db 51 82 a1 00 0e 09 cb dc 21 dd de df cb dc 21   ┆?              ! Q       !     !┆
0x4c0…4e0 5c 22 4f 50 c7 c7 23 88 e0 08 21 88 0b 85 b0 00 e1 c7 21 2b 87 22 20 5b 61 72 67 73 20 63 6f 6d   ┆\"OP  #   !       !+ " [args com┆
0x4e0…500 6d 61 6e 64 2d 6c 69 6e 65 2d 61 72 67 73 20 75 73 65 72 20 6e 6f 6e 69 6e 74 65 72 61 63 74 69   ┆mand-line-args user noninteracti┆
0x500…520 76 65 20 6e 69 6c 20 64 6f 6e 65 20 61 72 67 69 20 74 20 69 6e 69 74 69 61 6c 2d 6d 61 6a 6f 72   ┆ve nil done argi t initial-major┆
0x520…540 2d 6d 6f 64 65 20 74 65 72 6d 2d 66 69 6c 65 2d 70 72 65 66 69 78 20 77 69 6e 64 6f 77 2d 73 79   ┆-mode term-file-prefix window-sy┆
0x540…560 73 74 65 6d 20 67 65 74 65 6e 76 20 22 55 53 45 52 22 20 22 4c 4f 47 4e 41 4d 45 22 20 73 74 72   ┆stem getenv "USER" "LOGNAME" str┆
0x560…580 69 6e 67 2d 65 71 75 61 6c 20 22 2d 71 22 20 22 2d 6e 6f 2d 69 6e 69 74 2d 66 69 6c 65 22 20 22   ┆ing-equal "-q" "-no-init-file" "┆
0x580…5a0 2d 75 22 20 22 2d 75 73 65 72 22 20 65 72 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 85   ┆-u" "-user" error (byte-code "  ┆
0x5a0…5c0 24 00 c5 09 c6 3d 83 0f 00 c7 82 13 00 c8 08 c9 51 c2 c2 c2 24 88 0b 86 24 00 ca 1c c5 cb c2 c2   ┆$    =          Q   $   $       ┆
0x5c0…5e0 23 29 87 22 20 5b 75 73 65 72 20 73 79 73 74 65 6d 2d 74 79 70 65 20 74 20 69 6e 68 69 62 69 74   ┆#) " [user system-type t inhibit┆
0x5e0…600 2d 64 65 66 61 75 6c 74 2d 69 6e 69 74 20 69 6e 68 69 62 69 74 2d 73 74 61 72 74 75 70 2d 6d 65   ┆-default-init inhibit-startup-me┆
0x600…620 73 73 61 67 65 20 6c 6f 61 64 20 76 61 78 2d 76 6d 73 20 22 73 79 73 24 6c 6f 67 69 6e 3a 2e 65   ┆ssage load vax-vms "sys$login:.e┆
0x620…640 6d 61 63 73 22 20 22 7e 22 20 22 2f 2e 65 6d 61 63 73 22 20 6e 69 6c 20 22 64 65 66 61 75 6c 74   ┆macs" "~" "/.emacs" nil "default┆
0x640…660 22 5d 20 35 29 20 28 28 65 72 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 c1 21 87 22 20   ┆"] 5) ((error (byte-code "  ! " ┆
0x660…680 5b 6d 65 73 73 61 67 65 20 22 45 72 72 6f 72 20 69 6e 20 69 6e 69 74 20 66 69 6c 65 22 5d 20 32   ┆[message "Error in init file"] 2┆
0x680…6a0 29 29 29 20 67 65 74 2d 62 75 66 66 65 72 20 22 2a 73 63 72 61 74 63 68 2a 22 20 66 75 6e 63 61   ┆))) get-buffer "*scratch*" funca┆
0x6a0…6c0 6c 6c 20 6c 6f 61 64 20 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 22 2d 77 69 6e 22 20 22 54 45 52 4d   ┆ll load symbol-name "-win" "TERM┆
0x6c0…6e0 22 20 30 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 2d 22 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e   ┆" 0 string-match "-" command-lin┆
0x6e0…700 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 6e 20 63 6f 6d   ┆e-1 kill-emacs] 18))  (defun com┆
0x700…720 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 72 67 73 2d 6c   ┆mand-line-1 (command-line-args-l┆
0x720…740 65 66 74 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 3f 83 6e 00 09 3f 85 12 00 0a 3f 85 12 00   ┆eft) (byte-code " ? n  ?    ?   ┆
0x740…760 cd 20 3f 85 6b 00 0b 85 1c 00 ce 0b 21 88 c4 89 13 88 cf 8e d0 d1 20 d2 5c 22 88 d3 d4 21 d5 3d   ┆  ? k       !           \"   ! =┆
0x760…780 85 56 00 d3 d6 21 d7 3d 85 56 00 d3 d8 21 d9 3d 85 56 00 d3 da 21 db 3d 85 56 00 d3 dc 21 dd 3d   ┆ V   ! = V   ! = V   ! = V   ! =┆
0x780…7a0 85 56 00 d3 de 21 df 3d 83 5e 00 e0 63 82 62 00 e1 e2 21 63 88 e3 c4 21 88 e4 e5 21 29 82 3f 01   ┆ V   ! = ^  c b   !c   !   !) ? ┆
0x7a0…7c0 0e 06 e6 1e 07 1d 08 85 3e 01 08 40 c4 1e 09 1e 08 08 41 89 10 88 e7 0e 08 0e 0a 5c 22 89 16 09   ┆        >  @      A        \"   ┆
0x7c0…7e0 83 9a 00 ce 0e 09 41 0e 08 5c 22 82 39 01 e8 0e 08 e9 5c 22 86 af 00 e8 0e 08 ea 5c 22 86 af 00   ┆      A  \" 9     \"       \"   ┆
0x7e0…800 e8 0e 08 eb 5c 22 83 c6 00 ec 08 40 21 89 16 09 88 08 41 89 10 88 ce 0e 09 21 82 39 01 e8 0e 08   ┆    \"     @!     A      ! 9    ┆
0x800…820 ed 5c 22 86 d3 00 e8 0e 08 ee 5c 22 83 ec 00 0e 06 0e 0b 42 1e 0b ef 08 40 c4 cc 23 29 88 08 41   ┆ \"       \"       B    @  #)  A┆
0x820…840 89 10 82 39 01 e8 0e 08 f0 5c 22 86 f9 00 e8 0e 08 f1 5c 22 83 08 01 f2 08 40 21 88 08 41 89 10   ┆   9     \"       \"     @!  A  ┆
0x840…860 82 39 01 e8 0e 08 f3 5c 22 83 16 01 f4 cc 21 82 39 01 f5 f6 0e 08 5c 22 83 28 01 f7 0e 08 21 89   ┆ 9     \"     ! 9     \" (    ! ┆
0x860…880 16 07 82 39 01 f8 f9 0e 08 0d 5c 22 21 88 fa 0e 07 21 88 e6 89 16 07 2a 88 82 74 00 2a 87 22 20   ┆   9      \"!    !     *  t * " ┆
0x880…8a0 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 62 69 74 2d   ┆[command-line-args-left inhibit-┆
0x8a0…8c0 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 76 65 20 74   ┆startup-message noninteractive t┆
0x8c0…8e0 65 72 6d 2d 73 65 74 75 70 2d 68 6f 6f 6b 20 6e 69 6c 20 64 69 72 20 64 65 66 61 75 6c 74 2d 64   ┆erm-setup-hook nil dir default-d┆
0x8e0…900 69 72 65 63 74 6f 72 79 20 6c 69 6e 65 20 61 72 67 69 20 74 65 6d 20 63 6f 6d 6d 61 6e 64 2d 73   ┆irectory line argi tem command-s┆
0x900…920 77 69 74 63 68 2d 61 6c 69 73 74 20 6c 6f 61 64 2d 70 61 74 68 20 74 20 69 6e 70 75 74 2d 70 65   ┆witch-alist load-path t input-pe┆
0x920…940 6e 64 69 6e 67 2d 70 20 66 75 6e 63 61 6c 6c 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 20 88   ┆nding-p funcall ((byte-code "   ┆
0x940…960 c2 c0 21 87 22 20 5b 6e 69 6c 20 65 72 61 73 65 2d 62 75 66 66 65 72 20 73 65 74 2d 62 75 66 66   ┆  ! " [nil erase-buffer set-buff┆
0x960…980 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 5d 20 33 29 29 20 69 6e 73 65 72 74 20 65 6d 61 63 73 2d   ┆er-modified-p] 3)) insert emacs-┆
0x980…9a0 76 65 72 73 69 6f 6e 20 22 0a 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 31 39 38 37 20 46 72 65   ┆version " Copyright (C) 1987 Fre┆
0x9a0…9c0 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 2e 0a 22 20 6b 65   ┆e Software Foundation, Inc. " ke┆
0x9c0…9e0 79 2d 62 69 6e 64 69 6e 67 20 22 08 22 20 68 65 6c 70 2d 63 6f 6d 6d 61 6e 64 20 22 18 75 22 20   ┆y-binding " " help-command " u" ┆
0x9e0…a00 61 64 76 65 72 74 69 73 65 64 2d 75 6e 64 6f 20 22 08 03 22 20 64 65 73 63 72 69 62 65 2d 63 6f   ┆advertised-undo "  " describe-co┆
0xa00…a20 70 79 69 6e 67 20 22 08 04 22 20 64 65 73 63 72 69 62 65 2d 64 69 73 74 72 69 62 75 74 69 6f 6e   ┆pying "  " describe-distribution┆
0xa20…a40 20 22 08 17 22 20 64 65 73 63 72 69 62 65 2d 6e 6f 2d 77 61 72 72 61 6e 74 79 20 22 08 74 22 20   ┆ "  " describe-no-warranty " t" ┆
0xa40…a60 68 65 6c 70 2d 77 69 74 68 2d 74 75 74 6f 72 69 61 6c 20 22 54 79 70 65 20 43 2d 68 20 66 6f 72   ┆help-with-tutorial "Type C-h for┆
0xa60…a80 20 68 65 6c 70 3b 20 43 2d 78 20 75 20 74 6f 20 75 6e 64 6f 20 63 68 61 6e 67 65 73 2e 20 20 28   ┆ help; C-x u to undo changes.  (┆
0xa80…aa0 60 43 2d 27 20 6d 65 61 6e 73 20 75 73 65 20 43 54 52 4c 20 6b 65 79 2e 29 0a 0a 47 4e 55 20 45   ┆`C-' means use CTRL key.)  GNU E┆
0xaa0…ac0 6d 61 63 73 20 63 6f 6d 65 73 20 77 69 74 68 20 41 42 53 4f 4c 55 54 45 4c 59 20 4e 4f 20 57 41   ┆macs comes with ABSOLUTELY NO WA┆
0xac0…ae0 52 52 41 4e 54 59 3b 20 74 79 70 65 20 43 2d 68 20 43 2d 77 20 66 6f 72 20 66 75 6c 6c 20 64 65   ┆RRANTY; type C-h C-w for full de┆
0xae0…b00 74 61 69 6c 73 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   ┆tails. You may give out copies o┆
0xb00…b20 66 20 45 6d 61 63 73 3b 20 74 79 70 65 20 43 2d 68 20 43 2d 63 20 74 6f 20 73 65 65 20 74 68 65   ┆f Emacs; type C-h C-c to see the┆
0xb20…b40 20 63 6f 6e 64 69 74 69 6f 6e 73 2e 0a 54 79 70 65 20 43 2d 68 20 43 2d 64 20 66 6f 72 20 69 6e   ┆ conditions. Type C-h C-d for in┆
0xb40…b60 66 6f 72 6d 61 74 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   ┆formation on getting the latest ┆
0xb60…b80 76 65 72 73 69 6f 6e 2e 0a 54 79 70 65 20 43 2d 68 20 74 20 66 6f 72 20 61 20 74 75 74 6f 72 69   ┆version. Type C-h t for a tutori┆
0xb80…ba0 61 6c 20 6f 6e 20 75 73 69 6e 67 20 45 6d 61 63 73 2e 22 20 73 75 62 73 74 69 74 75 74 65 2d 63   ┆al on using Emacs." substitute-c┆
0xba0…bc0 6f 6d 6d 61 6e 64 2d 6b 65 79 73 20 22 54 79 70 65 20 5c 5c 5b 68 65 6c 70 2d 63 6f 6d 6d 61 6e   ┆ommand-keys "Type \\[help-comman┆
0xbc0…be0 64 5d 20 66 6f 72 20 68 65 6c 70 3b 20 5c 5c 5b 61 64 76 65 72 74 69 73 65 64 2d 75 6e 64 6f 5d   ┆d] for help; \\[advertised-undo]┆
0xbe0…c00 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 20 75   ┆ to undo changes.  (`C-' means u┆
0xc00…c20 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 20 77   ┆se CTRL key.)  GNU Emacs comes w┆
0xc20…c40 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 70 65   ┆ith ABSOLUTELY NO WARRANTY; type┆
0xc40…c60 20 5c 5c 5b 64 65 73 63 72 69 62 65 2d 6e 6f 2d 77 61 72 72 61 6e 74 79 5d 20 66 6f 72 20 66 75   ┆ \\[describe-no-warranty] for fu┆
0xc60…c80 6c 6c 20 64 65 74 61 69 6c 73 2e 0a 59 6f 75 20 6d 61 79 20 67 69 76 65 20 6f 75 74 20 63 6f 70   ┆ll details. You may give out cop┆
0xc80…ca0 69 65 73 20 6f 66 20 45 6d 61 63 73 3b 20 74 79 70 65 20 5c 5c 5b 64 65 73 63 72 69 62 65 2d 63   ┆ies of Emacs; type \\[describe-c┆
0xca0…cc0 6f 70 79 69 6e 67 5d 20 74 6f 20 73 65 65 20 74 68 65 20 63 6f 6e 64 69 74 69 6f 6e 73 2e 0a 54   ┆opying] to see the conditions. T┆
0xcc0…ce0 79 70 65 20 5c 5c 5b 64 65 73 63 72 69 62 65 2d 64 69 73 74 72 69 62 75 74 69 6f 6e 5d 20 66 6f   ┆ype \\[describe-distribution] fo┆
0xce0…d00 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 6f 6e 20 67 65 74 74 69 6e 67 20 74 68 65 20 6c 61 74   ┆r information on getting the lat┆
0xd00…d20 65 73 74 20 76 65 72 73 69 6f 6e 2e 0a 54 79 70 65 20 5c 5c 5b 68 65 6c 70 2d 77 69 74 68 2d 74   ┆est version. Type \\[help-with-t┆
0xd20…d40 75 74 6f 72 69 61 6c 5d 20 66 6f 72 20 61 20 74 75 74 6f 72 69 61 6c 20 6f 6e 20 75 73 69 6e 67   ┆utorial] for a tutorial on using┆
0xd40…d60 20 45 6d 61 63 73 2e 22 20 73 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 73   ┆ Emacs." set-buffer-modified-p s┆
0xd60…d80 69 74 2d 66 6f 72 20 31 32 30 20 30 20 61 73 73 6f 63 20 73 74 72 69 6e 67 2d 65 71 75 61 6c 20   ┆it-for 120 0 assoc string-equal ┆
0xd80…da0 22 2d 66 22 20 22 2d 66 75 6e 63 61 6c 6c 22 20 22 2d 65 22 20 69 6e 74 65 72 6e 20 22 2d 6c 22   ┆"-f" "-funcall" "-e" intern "-l"┆
0xda0…dc0 20 22 2d 6c 6f 61 64 22 20 6c 6f 61 64 20 22 2d 69 22 20 22 2d 69 6e 73 65 72 74 22 20 69 6e 73   ┆ "-load" load "-i" "-insert" ins┆
0xdc0…de0 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 22 2d 6b 69 6c 6c 22 20 6b 69 6c 6c 2d 65   ┆ert-file-contents "-kill" kill-e┆
0xde0…e00 6d 61 63 73 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5e 5c 5c 2b 5b 30 2d 39 5d 2b 5c 5c 27   ┆macs string-match "^\\+[0-9]+\\'┆
0xe00…e20 22 20 73 74 72 69 6e 67 2d 74 6f 2d 69 6e 74 20 66 69 6e 64 2d 66 69 6c 65 20 65 78 70 61 6e 64   ┆" string-to-int find-file expand┆
0xe20…e3b 2d 66 69 6c 65 2d 6e 61 6d 65 20 67 6f 74 6f 2d 6c 69 6e 65 5d 20 33 36 29 29 0a   ┆-file-name goto-line] 36)) ┆