|
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 - downloadIndex: ┃ u ┃
Length: 3314 (0xcf2)
Names: »userlock.elc«
└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
└─ ⟦this⟧ »EUUGD11/gnu-31mar87/emacs/lisp/userlock.elc«
0x000…020 0a 28 70 75 74 20 28 71 75 6f 74 65 20 66 69 6c 65 2d 6c 6f 63 6b 65 64 29 20 28 71 75 6f 74 65 ┆ (put (quote file-locked) (quote┆ 0x020…040 20 65 72 72 6f 72 2d 63 6f 6e 64 69 74 69 6f 6e 73 29 20 28 71 75 6f 74 65 20 28 66 69 6c 65 2d ┆ error-conditions) (quote (file-┆ 0x040…060 6c 6f 63 6b 65 64 20 66 69 6c 65 2d 65 72 72 6f 72 20 65 72 72 6f 72 29 29 29 0a 0a 28 64 65 66 ┆locked file-error error))) (def┆ 0x060…080 75 6e 20 61 73 6b 2d 75 73 65 72 2d 61 62 6f 75 74 2d 6c 6f 63 6b 20 28 66 6e 20 6f 70 70 6f 6e ┆un ask-user-about-lock (fn oppon┆ 0x080…0a0 65 6e 74 29 20 22 5c 0a 41 73 6b 20 75 73 65 72 20 77 68 61 74 20 74 6f 20 64 6f 20 77 68 65 6e ┆ent) "\ Ask user what to do when┆ 0x0a0…0c0 20 68 65 20 77 61 6e 74 73 20 74 6f 20 65 64 69 74 20 46 49 4c 45 20 62 75 74 20 69 74 20 69 73 ┆ he wants to edit FILE but it is┆ 0x0c0…0e0 20 6c 6f 63 6b 65 64 20 62 79 20 55 53 45 52 2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 68 ┆ locked by USER. This function h┆ 0x0e0…100 61 73 20 61 20 63 68 6f 69 63 65 20 6f 66 20 74 68 72 65 65 20 74 68 69 6e 67 73 20 74 6f 20 64 ┆as a choice of three things to d┆ 0x100…120 6f 3a 0a 20 20 64 6f 20 28 73 69 67 6e 61 6c 20 27 62 75 66 66 65 72 2d 66 69 6c 65 2d 6c 6f 63 ┆o: do (signal 'buffer-file-loc┆ 0x120…140 6b 65 64 20 28 6c 69 73 74 20 46 49 4c 45 20 55 53 45 52 29 29 0a 20 20 20 20 74 6f 20 72 65 66 ┆ked (list FILE USER)) to ref┆ 0x140…160 72 61 69 6e 20 66 72 6f 6d 20 65 64 69 74 69 6e 67 20 74 68 65 20 66 69 6c 65 0a 20 20 72 65 74 ┆rain from editing the file ret┆ 0x160…180 75 72 6e 20 74 20 28 67 72 61 62 20 74 68 65 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 66 69 6c 65 ┆urn t (grab the lock on the file┆ 0x180…1a0 29 0a 20 20 72 65 74 75 72 6e 20 6e 69 6c 20 28 65 64 69 74 20 74 68 65 20 66 69 6c 65 20 65 76 ┆) return nil (edit the file ev┆ 0x1a0…1c0 65 6e 20 74 68 6f 75 67 68 20 69 74 20 69 73 20 6c 6f 63 6b 65 64 29 2e 0a 59 6f 75 20 63 61 6e ┆en though it is locked). You can┆ 0x1c0…1e0 20 72 65 77 72 69 74 65 20 69 74 20 74 6f 20 75 73 65 20 61 6e 79 20 63 72 69 74 65 72 69 6f 6e ┆ rewrite it to use any criterion┆ 0x1e0…200 20 79 6f 75 20 6c 69 6b 65 20 74 6f 20 63 68 6f 6f 73 65 20 77 68 69 63 68 20 6f 6e 65 20 74 6f ┆ you like to choose which one to┆ 0x200…220 20 64 6f 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 ca 20 88 cb 8b 87 22 20 5b 61 6e 73 77 65 ┆ do." (byte-code " " [answe┆ 0x220…240 72 20 6f 70 70 6f 6e 65 6e 74 20 66 6e 20 74 65 6d 20 69 6e 68 69 62 69 74 2d 71 75 69 74 20 74 ┆r opponent fn tem inhibit-quit t┆ 0x240…260 20 63 75 72 73 6f 72 2d 69 6e 2d 65 63 68 6f 2d 61 72 65 61 20 71 75 69 74 2d 66 6c 61 67 20 6e ┆ cursor-in-echo-area quit-flag n┆ 0x260…280 69 6c 20 68 65 6c 70 2d 63 68 61 72 20 64 69 73 63 61 72 64 2d 69 6e 70 75 74 20 28 28 62 79 74 ┆il help-char discard-input ((byt┆ 0x280…2a0 65 2d 63 6f 64 65 20 22 c8 18 08 3f 85 64 00 ca cb 09 0a 23 88 c5 c5 1e 06 1c cc 72 21 c8 89 16 ┆e-code " ? d # r! ┆ 0x2a0…2c0 07 88 2a 1b 0b 0e 09 55 83 28 00 cd 20 82 5f 00 ce 0b cf 5c 22 89 10 88 08 3f 83 41 00 d0 20 88 ┆ * U ( _ \" ? A ┆ 0x2c0…2e0 ca d1 21 88 d2 d3 21 82 5f 00 08 41 d4 3d 83 51 00 cd 20 88 c8 89 10 82 5f 00 08 41 d5 3d 85 5f ┆ ! ! _ A = Q _ A = _┆ 0x2e0…300 00 d6 d7 d8 0a 09 45 5c 22 29 88 82 02 00 88 08 41 29 87 22 20 5b 61 6e 73 77 65 72 20 6f 70 70 ┆ E\") A) " [answer opp┆ 0x300…320 6f 6e 65 6e 74 20 66 6e 20 74 65 6d 20 69 6e 68 69 62 69 74 2d 71 75 69 74 20 74 20 63 75 72 73 ┆onent fn tem inhibit-quit t curs┆ 0x320…340 6f 72 2d 69 6e 2d 65 63 68 6f 2d 61 72 65 61 20 71 75 69 74 2d 66 6c 61 67 20 6e 69 6c 20 68 65 ┆or-in-echo-area quit-flag nil he┆ 0x340…360 6c 70 2d 63 68 61 72 20 6d 65 73 73 61 67 65 20 22 25 73 20 69 73 20 6c 6f 63 6b 69 6e 67 20 25 ┆lp-char message "%s is locking %┆ 0x360…380 73 3a 20 61 63 74 69 6f 6e 20 28 73 2c 20 71 2c 20 70 2c 20 3f 29 3f 20 22 20 64 6f 77 6e 63 61 ┆s: action (s, q, p, ?)? " downca┆ 0x380…3a0 73 65 20 61 73 6b 2d 75 73 65 72 2d 61 62 6f 75 74 2d 6c 6f 63 6b 2d 68 65 6c 70 20 61 73 73 6f ┆se ask-user-about-lock-help asso┆ 0x3a0…3c0 63 20 28 28 31 31 35 20 2e 20 74 29 20 28 31 31 33 20 2e 20 79 69 65 6c 64 29 20 28 37 20 2e 20 ┆c ((115 . t) (113 . yield) (7 . ┆ 0x3c0…3e0 79 69 65 6c 64 29 20 28 31 31 32 29 20 28 36 33 20 2e 20 68 65 6c 70 29 29 20 62 65 65 70 20 22 ┆yield) (112) (63 . help)) beep "┆ 0x3e0…400 50 6c 65 61 73 65 20 74 79 70 65 20 71 2c 20 73 2c 20 6f 72 20 70 3b 20 6f 72 20 3f 20 66 6f 72 ┆Please type q, s, or p; or ? for┆ 0x400…420 20 68 65 6c 70 22 20 73 69 74 2d 66 6f 72 20 33 20 68 65 6c 70 20 79 69 65 6c 64 20 73 69 67 6e ┆ help" sit-for 3 help yield sign┆ 0x420…440 61 6c 20 66 69 6c 65 2d 6c 6f 63 6b 65 64 20 22 46 69 6c 65 20 69 73 20 6c 6f 63 6b 65 64 22 5d ┆al file-locked "File is locked"]┆ 0x440…460 20 31 34 29 29 5d 20 32 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 6b 2d 75 73 65 72 2d 61 62 6f 75 ┆ 14))] 2)) (defun ask-user-abou┆ 0x460…480 74 2d 6c 6f 63 6b 2d 68 65 6c 70 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 90 c1 c2 ┆t-lock-help nil (byte-code " ┆ 0x480…4a0 21 91 87 22 20 5b 22 2a 48 65 6c 70 2a 22 20 70 72 69 6e 63 20 22 49 74 20 68 61 73 20 62 65 65 ┆! " ["*Help*" princ "It has bee┆ 0x4a0…4c0 6e 20 64 65 74 65 63 74 65 64 20 74 68 61 74 20 79 6f 75 20 77 61 6e 74 20 74 6f 20 6d 6f 64 69 ┆n detected that you want to modi┆ 0x4c0…4e0 66 79 20 61 20 66 69 6c 65 20 74 68 61 74 20 73 6f 6d 65 6f 6e 65 20 65 6c 73 65 20 68 61 73 0a ┆fy a file that someone else has ┆ 0x4e0…500 61 6c 72 65 61 64 79 20 73 74 61 72 74 65 64 20 6d 6f 64 69 66 79 69 6e 67 20 69 6e 20 45 4d 41 ┆already started modifying in EMA┆ 0x500…520 43 53 2e 0a 0a 59 6f 75 20 63 61 6e 20 3c 73 3e 74 65 61 6c 20 74 68 65 20 66 69 6c 65 3b 20 54 ┆CS. You can <s>teal the file; T┆ 0x520…540 68 65 20 6f 74 68 65 72 20 75 73 65 72 20 62 65 63 6f 6d 65 73 20 74 68 65 0a 20 20 69 6e 74 72 ┆he other user becomes the intr┆ 0x540…560 75 64 65 72 20 69 66 20 28 73 29 68 65 20 65 76 65 72 20 75 6e 6d 6f 64 69 66 69 65 73 20 74 68 ┆uder if (s)he ever unmodifies th┆ 0x560…580 65 20 66 69 6c 65 20 61 6e 64 20 74 68 65 6e 20 63 68 61 6e 67 65 73 20 69 74 20 61 67 61 69 6e ┆e file and then changes it again┆ 0x580…5a0 2e 0a 59 6f 75 20 63 61 6e 20 3c 70 3e 72 6f 63 65 65 64 3b 20 79 6f 75 20 65 64 69 74 20 61 74 ┆. You can <p>roceed; you edit at┆ 0x5a0…5c0 20 79 6f 75 72 20 6f 77 6e 20 28 61 6e 64 20 74 68 65 20 6f 74 68 65 72 20 75 73 65 72 27 73 29 ┆ your own (and the other user's)┆ 0x5c0…5e0 20 72 69 73 6b 2e 0a 59 6f 75 20 63 61 6e 20 3c 71 3e 75 69 74 3b 20 64 6f 6e 27 74 20 6d 6f 64 ┆ risk. You can <q>uit; don't mod┆ 0x5e0…600 69 66 79 20 74 68 69 73 20 66 69 6c 65 2e 22 5d 20 33 29 29 0a 0a 28 70 75 74 20 28 71 75 6f 74 ┆ify this file."] 3)) (put (quot┆ 0x600…620 65 20 66 69 6c 65 2d 73 75 70 65 72 73 65 73 73 69 6f 6e 29 20 28 71 75 6f 74 65 20 65 72 72 6f ┆e file-supersession) (quote erro┆ 0x620…640 72 2d 63 6f 6e 64 69 74 69 6f 6e 73 29 20 28 71 75 6f 74 65 20 28 66 69 6c 65 2d 73 75 70 65 72 ┆r-conditions) (quote (file-super┆ 0x640…660 73 65 73 73 69 6f 6e 20 66 69 6c 65 2d 65 72 72 6f 72 20 65 72 72 6f 72 29 29 29 0a 0a 28 64 65 ┆session file-error error))) (de┆ 0x660…680 66 75 6e 20 61 73 6b 2d 75 73 65 72 2d 61 62 6f 75 74 2d 73 75 70 65 72 73 65 73 73 69 6f 6e 2d ┆fun ask-user-about-supersession-┆ 0x680…6a0 74 68 72 65 61 74 20 28 66 6e 29 20 22 5c 0a 41 73 6b 20 61 20 75 73 65 72 20 77 68 6f 20 69 73 ┆threat (fn) "\ Ask a user who is┆ 0x6a0…6c0 20 61 62 6f 75 74 20 74 6f 20 6d 6f 64 69 66 79 20 61 6e 20 6f 62 73 6f 6c 65 74 65 20 62 75 66 ┆ about to modify an obsolete buf┆ 0x6c0…6e0 66 65 72 20 77 68 61 74 20 74 6f 20 64 6f 2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 68 61 ┆fer what to do. This function ha┆ 0x6e0…700 73 20 74 77 6f 20 63 68 6f 69 63 65 73 3a 20 69 74 20 63 61 6e 20 72 65 74 75 72 6e 2c 20 69 6e ┆s two choices: it can return, in┆ 0x700…720 20 77 68 69 63 68 20 63 61 73 65 20 74 68 65 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 0a 6f 66 20 ┆ which case the modification of ┆ 0x720…740 74 68 65 20 62 75 66 66 65 72 20 77 69 6c 6c 20 70 72 6f 63 65 65 64 2c 20 6f 72 20 69 74 20 63 ┆the buffer will proceed, or it c┆ 0x740…760 61 6e 20 28 73 69 67 6e 61 6c 20 27 66 69 6c 65 2d 73 75 70 65 72 73 65 73 73 69 6f 6e 20 28 66 ┆an (signal 'file-supersession (f┆ 0x760…780 69 6c 65 29 29 2c 0a 69 6e 20 77 68 69 63 68 20 63 61 73 65 20 74 68 65 20 70 72 6f 70 6f 73 65 ┆ile)), in which case the propose┆ 0x780…7a0 64 20 62 75 66 66 65 72 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 77 69 6c 6c 20 6e 6f 74 20 62 ┆d buffer modification will not b┆ 0x7a0…7c0 65 20 6d 61 64 65 2e 0a 59 6f 75 20 63 61 6e 20 72 65 77 72 69 74 65 20 74 68 69 73 20 74 6f 20 ┆e made. You can rewrite this to ┆ 0x7c0…7e0 75 73 65 20 61 6e 79 20 63 72 69 74 65 72 69 6f 6e 20 79 6f 75 20 6c 69 6b 65 20 74 6f 20 63 68 ┆use any criterion you like to ch┆ 0x7e0…800 6f 6f 73 65 20 77 68 69 63 68 20 6f 6e 65 20 74 6f 20 64 6f 2e 22 20 28 62 79 74 65 2d 63 6f 64 ┆oose which one to do." (byte-cod┆ 0x800…820 65 20 22 c8 20 88 c9 8b 87 22 20 5b 61 6e 73 77 65 72 20 74 65 6d 20 63 75 72 73 6f 72 2d 69 6e ┆e " " [answer tem cursor-in┆ 0x820…840 2d 65 63 68 6f 2d 61 72 65 61 20 74 20 68 65 6c 70 2d 63 68 61 72 20 6e 69 6c 20 66 6e 20 62 75 ┆-echo-area t help-char nil fn bu┆ 0x840…860 66 66 65 72 2d 62 61 63 6b 65 64 2d 75 70 20 64 69 73 63 61 72 64 2d 69 6e 70 75 74 20 28 28 62 ┆ffer-backed-up discard-input ((b┆ 0x860…880 79 74 65 2d 63 6f 64 65 20 22 c5 18 08 3f 85 57 00 c8 c9 21 88 ca c3 1a 72 29 21 19 09 0c 55 83 ┆yte-code " ? W ! r)! U ┆ 0x880…8a0 1c 00 cb 82 21 00 cc 09 cd 5c 22 41 89 10 88 08 3f 83 36 00 ce 20 88 c8 cf 21 88 d0 d1 21 82 52 ┆ ! \"A ? 6 ! ! R┆ 0x8a0…8c0 00 08 cb 3d 83 45 00 d2 20 88 c5 89 10 82 52 00 08 d3 3d 85 52 00 d4 d5 d6 0e 06 44 5c 22 29 88 ┆ = E R = R D\") ┆ 0x8c0…8e0 82 02 00 88 c8 d7 21 88 c5 89 16 07 29 87 22 20 5b 61 6e 73 77 65 72 20 74 65 6d 20 63 75 72 73 ┆ ! ) " [answer tem curs┆ 0x8e0…900 6f 72 2d 69 6e 2d 65 63 68 6f 2d 61 72 65 61 20 74 20 68 65 6c 70 2d 63 68 61 72 20 6e 69 6c 20 ┆or-in-echo-area t help-char nil ┆ 0x900…920 66 6e 20 62 75 66 66 65 72 2d 62 61 63 6b 65 64 2d 75 70 20 6d 65 73 73 61 67 65 20 22 46 69 6c ┆fn buffer-backed-up message "Fil┆ 0x920…940 65 20 68 61 73 20 63 68 61 6e 67 65 64 20 6f 6e 20 64 69 73 6b 3b 20 72 65 61 6c 6c 79 20 77 61 ┆e has changed on disk; really wa┆ 0x940…960 6e 74 20 74 6f 20 65 64 69 74 20 74 68 65 20 62 75 66 66 65 72 3f 20 28 79 2c 20 6e 20 6f 72 20 ┆nt to edit the buffer? (y, n or ┆ 0x960…980 43 2d 68 29 20 22 20 64 6f 77 6e 63 61 73 65 20 68 65 6c 70 20 61 73 73 6f 63 20 28 28 31 31 30 ┆C-h) " downcase help assoc ((110┆ 0x980…9a0 20 2e 20 79 69 65 6c 64 29 20 28 37 20 2e 20 79 69 65 6c 64 29 20 28 31 32 31 20 2e 20 70 72 6f ┆ . yield) (7 . yield) (121 . pro┆ 0x9a0…9c0 63 65 65 64 29 20 28 36 33 20 2e 20 68 65 6c 70 29 29 20 62 65 65 70 20 22 50 6c 65 61 73 65 20 ┆ceed) (63 . help)) beep "Please ┆ 0x9c0…9e0 74 79 70 65 20 79 20 6f 72 20 6e 3b 20 6f 72 20 3f 20 66 6f 72 20 68 65 6c 70 22 20 73 69 74 2d ┆type y or n; or ? for help" sit-┆ 0x9e0…a00 66 6f 72 20 33 20 61 73 6b 2d 75 73 65 72 2d 61 62 6f 75 74 2d 73 75 70 65 72 73 65 73 73 69 6f ┆for 3 ask-user-about-supersessio┆ 0xa00…a20 6e 2d 68 65 6c 70 20 79 69 65 6c 64 20 73 69 67 6e 61 6c 20 66 69 6c 65 2d 73 75 70 65 72 73 65 ┆n-help yield signal file-superse┆ 0xa20…a40 73 73 69 6f 6e 20 22 46 69 6c 65 20 63 68 61 6e 67 65 64 20 6f 6e 20 64 69 73 6b 22 20 22 46 69 ┆ssion "File changed on disk" "Fi┆ 0xa40…a60 6c 65 20 6f 6e 20 64 69 73 6b 20 6e 6f 77 20 77 69 6c 6c 20 62 65 63 6f 6d 65 20 61 20 62 61 63 ┆le on disk now will become a bac┆ 0xa60…a80 6b 75 70 20 66 69 6c 65 20 69 66 20 79 6f 75 20 73 61 76 65 20 74 68 65 73 65 20 63 68 61 6e 67 ┆kup file if you save these chang┆ 0xa80…aa0 65 73 2e 22 5d 20 31 32 29 29 5d 20 32 29 29 0a 0a 28 64 65 66 75 6e 20 61 73 6b 2d 75 73 65 72 ┆es."] 12))] 2)) (defun ask-user┆ 0xaa0…ac0 2d 61 62 6f 75 74 2d 73 75 70 65 72 73 65 73 73 69 6f 6e 2d 68 65 6c 70 20 6e 69 6c 20 28 62 79 ┆-about-supersession-help nil (by┆ 0xac0…ae0 74 65 2d 63 6f 64 65 20 22 c0 90 c1 c2 21 91 87 22 20 5b 22 2a 48 65 6c 70 2a 22 20 70 72 69 6e ┆te-code " ! " ["*Help*" prin┆ 0xae0…b00 63 20 22 49 74 20 68 61 73 20 62 65 65 6e 20 64 65 74 65 63 74 65 64 20 74 68 61 74 20 79 6f 75 ┆c "It has been detected that you┆ 0xb00…b20 20 77 61 6e 74 20 74 6f 20 6d 6f 64 69 66 79 20 61 20 62 75 66 66 65 72 0a 74 68 61 74 20 69 73 ┆ want to modify a buffer that is┆ 0xb20…b40 20 6f 62 73 6f 6c 65 74 65 20 62 65 63 61 75 73 65 20 63 68 61 6e 67 65 73 20 69 6e 20 74 68 65 ┆ obsolete because changes in the┆ 0xb40…b60 20 66 69 6c 65 20 6f 6e 20 64 69 73 6b 20 68 61 76 65 20 68 61 70 70 65 6e 65 64 0a 73 69 6e 63 ┆ file on disk have happened sinc┆ 0xb60…b80 65 20 79 6f 75 20 72 65 61 64 20 69 74 20 6f 72 20 77 72 6f 74 65 20 69 74 20 77 69 74 68 20 74 ┆e you read it or wrote it with t┆ 0xb80…ba0 68 69 73 20 62 75 66 66 65 72 2e 0a 0a 49 66 20 79 6f 75 20 73 61 79 20 60 79 27 20 74 6f 20 67 ┆his buffer. If you say `y' to g┆ 0xba0…bc0 6f 20 61 68 65 61 64 20 61 6e 64 20 6d 6f 64 69 66 79 20 74 68 69 73 20 62 75 66 66 65 72 2c 0a ┆o ahead and modify this buffer, ┆ 0xbc0…be0 79 6f 75 20 72 69 73 6b 20 72 75 69 6e 69 6e 67 20 74 68 65 20 77 6f 72 6b 20 6f 66 20 77 68 6f ┆you risk ruining the work of who┆ 0xbe0…c00 65 76 65 72 20 72 65 77 72 6f 74 65 20 74 68 65 20 66 69 6c 65 2e 0a 49 66 20 79 6f 75 20 73 61 ┆ever rewrote the file. If you sa┆ 0xc00…c20 79 20 60 6e 27 2c 20 77 68 61 74 65 76 65 72 20 63 68 61 6e 67 65 20 79 6f 75 20 73 74 61 72 74 ┆y `n', whatever change you start┆ 0xc20…c40 65 64 20 74 6f 20 6d 61 6b 65 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 0a 77 69 6c 6c 20 6e 6f ┆ed to make in the buffer will no┆ 0xc40…c60 74 20 74 61 6b 65 20 70 6c 61 63 65 2e 0a 0a 59 6f 75 20 6d 69 67 68 74 20 63 6f 6e 73 69 64 65 ┆t take place. You might conside┆ 0xc60…c80 72 20 61 6e 73 77 65 72 69 6e 67 20 60 6e 27 2c 20 72 75 6e 6e 69 6e 67 20 60 4d 2d 78 20 72 65 ┆r answering `n', running `M-x re┆ 0xc80…ca0 76 65 72 74 2d 62 75 66 66 65 72 27 20 74 6f 0a 62 72 69 6e 67 20 74 68 65 20 74 65 78 74 20 69 ┆vert-buffer' to bring the text i┆ 0xca0…cc0 6e 20 45 6d 61 63 73 20 69 6e 74 6f 20 61 63 63 6f 72 64 20 77 69 74 68 20 77 68 61 74 20 69 73 ┆n Emacs into accord with what is┆ 0xcc0…ce0 20 6f 6e 20 64 69 73 6b 2c 20 61 6e 64 20 74 68 65 6e 0a 6d 61 6b 69 6e 67 20 74 68 65 20 63 68 ┆ on disk, and then making the ch┆ 0xce0…cf2 61 6e 67 65 20 61 67 61 69 6e 2e 22 5d 20 33 29 29 0a ┆ange again."] 3)) ┆