ofs | hex dump | ascii |
---|
0000 | 0a 28 64 65 66 63 6f 6e 73 74 20 64 65 6c 65 74 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 | .(defconst.delete-auto-save-file |
0020 | 73 20 74 20 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 64 65 6c 65 74 65 20 61 20 62 | s.t."\.*Non-nil.means.delete.a.b |
0040 | 75 66 66 65 72 27 73 20 61 75 74 6f 2d 73 61 76 65 20 66 69 6c 65 0a 77 68 65 6e 20 74 68 65 20 | uffer's.auto-save.file.when.the. |
0060 | 62 75 66 66 65 72 20 69 73 20 73 61 76 65 64 20 66 6f 72 20 72 65 61 6c 2e 22 29 0a 0a 28 64 65 | buffer.is.saved.for.real.")..(de |
0080 | 66 63 6f 6e 73 74 20 6d 61 6b 65 2d 62 61 63 6b 75 70 2d 66 69 6c 65 73 20 28 6e 6f 74 20 28 65 | fconst.make-backup-files.(not.(e |
00a0 | 71 20 73 79 73 74 65 6d 2d 74 79 70 65 20 28 71 75 6f 74 65 20 76 61 78 2d 76 6d 73 29 29 29 20 | q.system-type.(quote.vax-vms))). |
00c0 | 22 5c 0a 2a 43 72 65 61 74 65 20 61 20 62 61 63 6b 75 70 20 6f 66 20 65 61 63 68 20 66 69 6c 65 | "\.*Create.a.backup.of.each.file |
00e0 | 20 77 68 65 6e 20 69 74 20 69 73 20 73 61 76 65 64 20 66 6f 72 20 74 68 65 20 66 69 72 73 74 20 | .when.it.is.saved.for.the.first. |
0100 | 74 69 6d 65 2e 0a 54 68 69 73 20 63 61 6e 20 62 65 20 64 6f 6e 65 20 62 79 20 72 65 6e 61 6d 69 | time..This.can.be.done.by.renami |
0120 | 6e 67 20 74 68 65 20 66 69 6c 65 20 6f 72 20 62 79 20 63 6f 70 79 69 6e 67 2e 0a 0a 52 65 6e 61 | ng.the.file.or.by.copying...Rena |
0140 | 6d 69 6e 67 20 6d 65 61 6e 73 20 74 68 61 74 20 45 6d 61 63 73 20 72 65 6e 61 6d 65 73 20 74 68 | ming.means.that.Emacs.renames.th |
0160 | 65 20 65 78 69 73 74 69 6e 67 20 66 69 6c 65 20 73 6f 20 74 68 61 74 20 69 74 20 69 73 20 61 0a | e.existing.file.so.that.it.is.a. |
0180 | 62 61 63 6b 75 70 20 66 69 6c 65 2c 20 74 68 65 6e 20 77 72 69 74 65 73 20 74 68 65 20 62 75 66 | backup.file,.then.writes.the.buf |
01a0 | 66 65 72 20 69 6e 74 6f 20 61 20 6e 65 77 20 66 69 6c 65 2e 20 20 41 6e 79 20 6f 74 68 65 72 20 | fer.into.a.new.file...Any.other. |
01c0 | 6e 61 6d 65 73 0a 74 68 61 74 20 74 68 65 20 6f 6c 64 20 66 69 6c 65 20 68 61 64 20 77 69 6c 6c | names.that.the.old.file.had.will |
01e0 | 20 6e 6f 77 20 72 65 66 65 72 20 74 6f 20 74 68 65 20 62 61 63 6b 75 70 20 66 69 6c 65 2e 0a 54 | .now.refer.to.the.backup.file..T |
0200 | 68 65 20 6e 65 77 20 66 69 6c 65 20 69 73 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 20 61 6e 64 20 | he.new.file.is.owned.by.you.and. |
0220 | 69 74 73 20 67 72 6f 75 70 20 69 73 20 64 65 66 61 75 6c 74 65 64 2e 0a 0a 43 6f 70 79 69 6e 67 | its.group.is.defaulted...Copying |
0240 | 20 6d 65 61 6e 73 20 74 68 61 74 20 45 6d 61 63 73 20 63 6f 70 69 65 73 20 74 68 65 20 65 78 69 | .means.that.Emacs.copies.the.exi |
0260 | 73 74 69 6e 67 20 66 69 6c 65 20 69 6e 74 6f 20 74 68 65 20 62 61 63 6b 75 70 20 66 69 6c 65 2c | sting.file.into.the.backup.file, |
0280 | 0a 74 68 65 6e 20 77 72 69 74 65 73 20 74 68 65 20 62 75 66 66 65 72 20 6f 6e 20 74 6f 70 20 6f | .then.writes.the.buffer.on.top.o |
02a0 | 66 20 74 68 65 20 65 78 69 73 74 69 6e 67 20 66 69 6c 65 2e 20 20 41 6e 79 20 6f 74 68 65 72 20 | f.the.existing.file...Any.other. |
02c0 | 6e 61 6d 65 73 0a 74 68 61 74 20 74 68 65 20 6f 6c 64 20 66 69 6c 65 20 68 61 64 20 77 69 6c 6c | names.that.the.old.file.had.will |
02e0 | 20 6e 6f 77 20 72 65 66 65 72 20 74 6f 20 74 68 65 20 6e 65 77 20 28 65 64 69 74 65 64 29 20 66 | .now.refer.to.the.new.(edited).f |
0300 | 69 6c 65 2e 0a 54 68 65 20 66 69 6c 65 27 73 20 6f 77 6e 65 72 20 61 6e 64 20 67 72 6f 75 70 20 | ile..The.file's.owner.and.group. |
0320 | 61 72 65 20 75 6e 63 68 61 6e 67 65 64 2e 0a 0a 54 68 65 20 63 68 6f 69 63 65 20 6f 66 20 72 65 | are.unchanged...The.choice.of.re |
0340 | 6e 61 6d 69 6e 67 20 6f 72 20 63 6f 70 79 69 6e 67 20 69 73 20 63 6f 6e 74 72 6f 6c 6c 65 64 20 | naming.or.copying.is.controlled. |
0360 | 62 79 20 74 68 65 20 76 61 72 69 61 62 6c 65 73 0a 62 61 63 6b 75 70 2d 62 79 2d 63 6f 70 79 69 | by.the.variables.backup-by-copyi |
0380 | 6e 67 2c 20 62 61 63 6b 75 70 2d 62 79 2d 63 6f 70 79 69 6e 67 2d 77 68 65 6e 2d 6c 69 6e 6b 65 | ng,.backup-by-copying-when-linke |
03a0 | 64 20 61 6e 64 0a 62 61 63 6b 75 70 2d 62 79 2d 63 6f 70 79 69 6e 67 2d 77 68 65 6e 2d 6d 69 73 | d.and.backup-by-copying-when-mis |
03c0 | 6d 61 74 63 68 2e 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 62 61 63 6b 75 70 2d 62 79 2d 63 6f | match.")..(defconst.backup-by-co |
03e0 | 70 79 69 6e 67 20 6e 69 6c 20 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 61 6c 77 61 | pying.nil."\.*Non-nil.means.alwa |
0400 | 79 73 20 75 73 65 20 63 6f 70 79 69 6e 67 20 74 6f 20 63 72 65 61 74 65 20 62 61 63 6b 75 70 20 | ys.use.copying.to.create.backup. |
0420 | 66 69 6c 65 73 2e 0a 53 65 65 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 76 61 72 69 | files..See.documentation.of.vari |
0440 | 61 62 6c 65 20 20 6d 61 6b 65 2d 62 61 63 6b 75 70 2d 66 69 6c 65 73 2e 22 29 0a 0a 28 64 65 66 | able..make-backup-files.")..(def |
0460 | 63 6f 6e 73 74 20 62 61 63 6b 75 70 2d 62 79 2d 63 6f 70 79 69 6e 67 2d 77 68 65 6e 2d 6c 69 6e | const.backup-by-copying-when-lin |
0480 | 6b 65 64 20 6e 69 6c 20 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 75 73 65 20 63 6f | ked.nil."\.*Non-nil.means.use.co |
04a0 | 70 79 69 6e 67 20 74 6f 20 63 72 65 61 74 65 20 62 61 63 6b 75 70 73 20 66 6f 72 20 66 69 6c 65 | pying.to.create.backups.for.file |
04c0 | 73 20 77 69 74 68 20 6d 75 6c 74 69 70 6c 65 20 6e 61 6d 65 73 2e 0a 54 68 69 73 20 63 61 75 73 | s.with.multiple.names..This.caus |
04e0 | 65 73 20 74 68 65 20 61 6c 74 65 72 6e 61 74 65 20 6e 61 6d 65 73 20 74 6f 20 72 65 66 65 72 20 | es.the.alternate.names.to.refer. |
0500 | 74 6f 20 74 68 65 20 6c 61 74 65 73 74 20 76 65 72 73 69 6f 6e 20 61 73 20 65 64 69 74 65 64 2e | to.the.latest.version.as.edited. |
0520 | 0a 54 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 20 72 65 6c 65 76 61 6e 74 20 6f 6e 6c 79 20 | .This.variable.is.relevant.only. |
0540 | 69 66 20 20 62 61 63 6b 75 70 2d 62 79 2d 63 6f 70 79 69 6e 67 20 20 69 73 20 6e 69 6c 2e 22 29 | if..backup-by-copying..is.nil.") |
0560 | 0a 0a 28 64 65 66 63 6f 6e 73 74 20 62 61 63 6b 75 70 2d 62 79 2d 63 6f 70 79 69 6e 67 2d 77 68 | ..(defconst.backup-by-copying-wh |
0580 | 65 6e 2d 6d 69 73 6d 61 74 63 68 20 6e 69 6c 20 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e | en-mismatch.nil."\.*Non-nil.mean |
05a0 | 73 20 63 72 65 61 74 65 20 62 61 63 6b 75 70 73 20 62 79 20 63 6f 70 79 69 6e 67 20 69 66 20 74 | s.create.backups.by.copying.if.t |
05c0 | 68 69 73 20 70 72 65 73 65 72 76 65 73 20 6f 77 6e 65 72 20 6f 72 20 67 72 6f 75 70 2e 0a 52 65 | his.preserves.owner.or.group..Re |
05e0 | 6e 61 6d 69 6e 67 20 6d 61 79 20 73 74 69 6c 6c 20 62 65 20 75 73 65 64 20 28 73 75 62 6a 65 63 | naming.may.still.be.used.(subjec |
0600 | 74 20 74 6f 20 63 6f 6e 74 72 6f 6c 20 6f 66 20 6f 74 68 65 72 20 76 61 72 69 61 62 6c 65 73 29 | t.to.control.of.other.variables) |
0620 | 0a 77 68 65 6e 20 69 74 20 77 6f 75 6c 64 20 6e 6f 74 20 72 65 73 75 6c 74 20 69 6e 20 63 68 61 | .when.it.would.not.result.in.cha |
0640 | 6e 67 69 6e 67 20 74 68 65 20 6f 77 6e 65 72 20 6f 72 20 67 72 6f 75 70 20 6f 66 20 74 68 65 20 | nging.the.owner.or.group.of.the. |
0660 | 66 69 6c 65 3b 0a 74 68 61 74 20 69 73 2c 20 66 6f 72 20 66 69 6c 65 73 20 77 68 69 63 68 20 61 | file;.that.is,.for.files.which.a |
0680 | 72 65 20 6f 77 6e 65 64 20 62 79 20 79 6f 75 20 61 6e 64 20 77 68 6f 73 65 20 67 72 6f 75 70 20 | re.owned.by.you.and.whose.group. |
06a0 | 6d 61 74 63 68 65 73 0a 74 68 65 20 64 65 66 61 75 6c 74 20 66 6f 72 20 61 20 6e 65 77 20 66 69 | matches.the.default.for.a.new.fi |
06c0 | 6c 65 20 63 72 65 61 74 65 64 20 74 68 65 72 65 20 62 79 20 79 6f 75 2e 0a 54 68 69 73 20 76 61 | le.created.there.by.you..This.va |
06e0 | 72 69 61 62 6c 65 20 69 73 20 72 65 6c 65 76 61 6e 74 20 6f 6e 6c 79 20 69 66 20 20 62 61 63 6b | riable.is.relevant.only.if..back |
0700 | 75 70 2d 62 79 2d 63 6f 70 79 69 6e 67 20 20 69 73 20 6e 69 6c 2e 22 29 0a 0a 28 64 65 66 63 6f | up-by-copying..is.nil.")..(defco |
0720 | 6e 73 74 20 62 75 66 66 65 72 2d 6f 66 66 65 72 2d 73 61 76 65 20 6e 69 6c 20 22 5c 0a 2a 4e 6f | nst.buffer-offer-save.nil."\.*No |
0740 | 6e 2d 6e 69 6c 20 69 6e 20 61 20 62 75 66 66 65 72 20 6d 65 61 6e 73 20 6f 66 66 65 72 20 74 6f | n-nil.in.a.buffer.means.offer.to |
0760 | 20 73 61 76 65 20 74 68 65 20 62 75 66 66 65 72 20 6f 6e 20 65 78 69 74 0a 65 76 65 6e 20 69 66 | .save.the.buffer.on.exit.even.if |
0780 | 20 74 68 65 20 62 75 66 66 65 72 20 69 73 20 6e 6f 74 20 76 69 73 69 74 69 6e 67 20 61 20 66 69 | .the.buffer.is.not.visiting.a.fi |
07a0 | 6c 65 2e 20 20 41 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 6c 6f 63 61 6c 20 69 6e 0a 61 6c 6c 20 | le...Automatically.local.in.all. |
07c0 | 62 75 66 66 65 72 73 2e 22 29 0a 0a 28 6d 61 6b 65 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 | buffers.")..(make-variable-buffe |
07e0 | 72 2d 6c 6f 63 61 6c 20 28 71 75 6f 74 65 20 62 75 66 66 65 72 2d 6f 66 66 65 72 2d 73 61 76 65 | r-local.(quote.buffer-offer-save |
0800 | 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 66 69 6c 65 2d 70 72 65 63 69 6f 75 73 2d 66 6c 61 67 | ))..(defconst.file-precious-flag |
0820 | 20 6e 69 6c 20 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 70 72 6f 74 65 63 74 20 61 | .nil."\.*Non-nil.means.protect.a |
0840 | 67 61 69 6e 73 74 20 49 2f 4f 20 65 72 72 6f 72 73 20 77 68 69 6c 65 20 73 61 76 69 6e 67 20 66 | gainst.I/O.errors.while.saving.f |
0860 | 69 6c 65 73 2e 0a 53 6f 6d 65 20 6d 6f 64 65 73 20 73 65 74 20 74 68 69 73 20 6e 6f 6e 2d 6e 69 | iles..Some.modes.set.this.non-ni |
0880 | 6c 20 69 6e 20 70 61 72 74 69 63 75 6c 61 72 20 62 75 66 66 65 72 73 2e 22 29 0a 0a 28 64 65 66 | l.in.particular.buffers.")..(def |
08a0 | 76 61 72 20 76 65 72 73 69 6f 6e 2d 63 6f 6e 74 72 6f 6c 20 6e 69 6c 20 22 5c 0a 2a 43 6f 6e 74 | var.version-control.nil."\.*Cont |
08c0 | 72 6f 6c 20 75 73 65 20 6f 66 20 76 65 72 73 69 6f 6e 20 6e 75 6d 62 65 72 73 20 66 6f 72 20 62 | rol.use.of.version.numbers.for.b |
08e0 | 61 63 6b 75 70 20 66 69 6c 65 73 2e 0a 74 20 6d 65 61 6e 73 20 6d 61 6b 65 20 6e 75 6d 65 72 69 | ackup.files..t.means.make.numeri |
0900 | 63 20 62 61 63 6b 75 70 20 76 65 72 73 69 6f 6e 73 20 75 6e 63 6f 6e 64 69 74 69 6f 6e 61 6c 6c | c.backup.versions.unconditionall |
0920 | 79 2e 0a 6e 69 6c 20 6d 65 61 6e 73 20 6d 61 6b 65 20 74 68 65 6d 20 66 6f 72 20 66 69 6c 65 73 | y..nil.means.make.them.for.files |
0940 | 20 74 68 61 74 20 68 61 76 65 20 73 6f 6d 65 20 61 6c 72 65 61 64 79 2e 0a 6e 65 76 65 72 20 6d | .that.have.some.already..never.m |
0960 | 65 61 6e 73 20 64 6f 20 6e 6f 74 20 6d 61 6b 65 20 74 68 65 6d 2e 22 29 0a 0a 28 64 65 66 76 61 | eans.do.not.make.them.")..(defva |
0980 | 72 20 64 69 72 65 64 2d 6b 65 70 74 2d 76 65 72 73 69 6f 6e 73 20 32 20 22 5c 0a 2a 57 68 65 6e | r.dired-kept-versions.2."\.*When |
09a0 | 20 63 6c 65 61 6e 69 6e 67 20 64 69 72 65 63 74 6f 72 79 2c 20 6e 75 6d 62 65 72 20 6f 66 20 76 | .cleaning.directory,.number.of.v |
09c0 | 65 72 73 69 6f 6e 73 20 74 6f 20 6b 65 65 70 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 74 72 69 6d | ersions.to.keep.")..(defvar.trim |
09e0 | 2d 76 65 72 73 69 6f 6e 73 2d 77 69 74 68 6f 75 74 2d 61 73 6b 69 6e 67 20 6e 69 6c 20 22 5c 0a | -versions-without-asking.nil."\. |
0a00 | 2a 49 66 20 74 72 75 65 2c 20 64 65 6c 65 74 65 73 20 65 78 63 65 73 73 20 62 61 63 6b 75 70 20 | *If.true,.deletes.excess.backup. |
0a20 | 76 65 72 73 69 6f 6e 73 20 73 69 6c 65 6e 74 6c 79 2e 0a 4f 74 68 65 72 77 69 73 65 20 61 73 6b | versions.silently..Otherwise.ask |
0a40 | 73 20 63 6f 6e 66 69 72 6d 61 74 69 6f 6e 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 6b 65 70 74 2d | s.confirmation.")..(defvar.kept- |
0a60 | 6f 6c 64 2d 76 65 72 73 69 6f 6e 73 20 32 20 22 5c 0a 2a 4e 75 6d 62 65 72 20 6f 66 20 6f 6c 64 | old-versions.2."\.*Number.of.old |
0a80 | 65 73 74 20 76 65 72 73 69 6f 6e 73 20 74 6f 20 6b 65 65 70 20 77 68 65 6e 20 61 20 6e 65 77 20 | est.versions.to.keep.when.a.new. |
0aa0 | 6e 75 6d 62 65 72 65 64 20 62 61 63 6b 75 70 20 69 73 20 6d 61 64 65 2e 22 29 0a 0a 28 64 65 66 | numbered.backup.is.made.")..(def |
0ac0 | 76 61 72 20 6b 65 70 74 2d 6e 65 77 2d 76 65 72 73 69 6f 6e 73 20 32 20 22 5c 0a 2a 4e 75 6d 62 | var.kept-new-versions.2."\.*Numb |
0ae0 | 65 72 20 6f 66 20 6e 65 77 65 73 74 20 76 65 72 73 69 6f 6e 73 20 74 6f 20 6b 65 65 70 20 77 68 | er.of.newest.versions.to.keep.wh |
0b00 | 65 6e 20 61 20 6e 65 77 20 6e 75 6d 62 65 72 65 64 20 62 61 63 6b 75 70 20 69 73 20 6d 61 64 65 | en.a.new.numbered.backup.is.made |
0b20 | 2e 0a 49 6e 63 6c 75 64 65 73 20 74 68 65 20 6e 65 77 20 62 61 63 6b 75 70 2e 20 20 4d 75 73 74 | ..Includes.the.new.backup...Must |
0b40 | 20 62 65 20 3e 20 30 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 72 65 71 75 69 72 65 2d 66 69 6e | .be.>.0")..(defconst.require-fin |
0b60 | 61 6c 2d 6e 65 77 6c 69 6e 65 20 6e 69 6c 20 22 5c 0a 2a 74 20 73 61 79 73 20 73 69 6c 65 6e 74 | al-newline.nil."\.*t.says.silent |
0b80 | 6c 79 20 70 75 74 20 61 20 6e 65 77 6c 69 6e 65 20 61 74 20 74 68 65 20 65 6e 64 20 77 68 65 6e | ly.put.a.newline.at.the.end.when |
0ba0 | 65 76 65 72 20 61 20 66 69 6c 65 20 69 73 20 73 61 76 65 64 2e 0a 4e 6f 6e 2d 6e 69 6c 20 62 75 | ever.a.file.is.saved..Non-nil.bu |
0bc0 | 74 20 6e 6f 74 20 74 20 73 61 79 73 20 61 73 6b 20 75 73 65 72 20 77 68 65 74 68 65 72 20 74 6f | t.not.t.says.ask.user.whether.to |
0be0 | 20 61 64 64 20 61 20 6e 65 77 6c 69 6e 65 20 69 6e 20 65 61 63 68 20 73 75 63 68 20 63 61 73 65 | .add.a.newline.in.each.such.case |
0c00 | 2e 0a 6e 69 6c 20 6d 65 61 6e 73 20 64 6f 6e 27 74 20 61 64 64 20 6e 65 77 6c 69 6e 65 73 2e 22 | ..nil.means.don't.add.newlines." |
0c20 | 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 61 75 74 6f 2d 73 61 76 65 2d 64 65 66 61 75 6c 74 20 74 | )..(defconst.auto-save-default.t |
0c40 | 20 22 5c 0a 2a 74 20 73 61 79 73 20 62 79 20 64 65 66 61 75 6c 74 20 64 6f 20 61 75 74 6f 2d 73 | ."\.*t.says.by.default.do.auto-s |
0c60 | 61 76 69 6e 67 20 6f 66 20 65 76 65 72 79 20 66 69 6c 65 2d 76 69 73 69 74 69 6e 67 20 62 75 66 | aving.of.every.file-visiting.buf |
0c80 | 66 65 72 2e 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 61 75 74 6f 2d 73 61 76 65 2d 76 69 73 69 | fer.")..(defconst.auto-save-visi |
0ca0 | 74 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e 69 6c 20 22 5c 0a 2a 74 20 73 61 79 73 20 61 75 74 | ted-file-name.nil."\.*t.says.aut |
0cc0 | 6f 2d 73 61 76 65 20 61 20 62 75 66 66 65 72 20 69 6e 20 74 68 65 20 66 69 6c 65 20 69 74 20 69 | o-save.a.buffer.in.the.file.it.i |
0ce0 | 73 20 76 69 73 69 74 69 6e 67 2c 20 77 68 65 6e 20 70 72 61 63 74 69 63 61 6c 2e 0a 4e 6f 72 6d | s.visiting,.when.practical..Norm |
0d00 | 61 6c 6c 79 20 61 75 74 6f 2d 73 61 76 65 20 66 69 6c 65 73 20 61 72 65 20 77 72 69 74 74 65 6e | ally.auto-save.files.are.written |
0d20 | 20 75 6e 64 65 72 20 6f 74 68 65 72 20 6e 61 6d 65 73 2e 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 | .under.other.names.")..(defconst |
0d40 | 20 73 61 76 65 2d 61 62 62 72 65 76 73 20 6e 69 6c 20 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 6d 65 | .save-abbrevs.nil."\.*Non-nil.me |
0d60 | 61 6e 73 20 73 61 76 65 20 77 6f 72 64 20 61 62 62 72 65 76 73 20 74 6f 6f 20 77 68 65 6e 20 66 | ans.save.word.abbrevs.too.when.f |
0d80 | 69 6c 65 73 20 61 72 65 20 73 61 76 65 64 2e 0a 4c 6f 61 64 69 6e 67 20 61 6e 20 61 62 62 72 65 | iles.are.saved..Loading.an.abbre |
0da0 | 76 20 66 69 6c 65 20 73 65 74 73 20 74 68 69 73 20 74 6f 20 74 2e 22 29 0a 0a 28 64 65 66 63 6f | v.file.sets.this.to.t.")..(defco |
0dc0 | 6e 73 74 20 66 69 6e 64 2d 66 69 6c 65 2d 72 75 6e 2d 64 69 72 65 64 20 74 20 22 5c 0a 2a 4e 6f | nst.find-file-run-dired.t."\.*No |
0de0 | 6e 2d 6e 69 6c 20 73 61 79 73 20 72 75 6e 20 64 69 72 65 64 20 69 66 20 66 69 6e 64 2d 66 69 6c | n-nil.says.run.dired.if.find-fil |
0e00 | 65 20 69 73 20 67 69 76 65 6e 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 64 69 72 65 63 74 6f | e.is.given.the.name.of.a.directo |
0e20 | 72 79 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 74 2d 66 6f 75 | ry.")..(defvar.find-file-not-fou |
0e40 | 6e 64 2d 68 6f 6f 6b 73 20 6e 69 6c 20 22 5c 0a 4c 69 73 74 20 6f 66 20 66 75 6e 63 74 69 6f 6e | nd-hooks.nil."\.List.of.function |
0e60 | 73 20 74 6f 20 62 65 20 63 61 6c 6c 65 64 20 66 6f 72 20 66 69 6e 64 2d 66 69 6c 65 20 6f 6e 20 | s.to.be.called.for.find-file.on. |
0e80 | 6e 6f 6e 65 78 69 73 74 65 6e 74 20 66 69 6c 65 2e 0a 54 68 65 73 65 20 66 75 6e 63 74 69 6f 6e | nonexistent.file..These.function |
0ea0 | 73 20 61 72 65 20 63 61 6c 6c 65 64 20 61 73 20 73 6f 6f 6e 20 61 73 20 74 68 65 20 65 72 72 6f | s.are.called.as.soon.as.the.erro |
0ec0 | 72 20 69 73 20 64 65 74 65 63 74 65 64 2e 0a 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 | r.is.detected..buffer-file-name. |
0ee0 | 69 73 20 61 6c 72 65 61 64 79 20 73 65 74 20 75 70 2e 0a 54 68 65 20 66 75 6e 63 74 69 6f 6e 73 | is.already.set.up..The.functions |
0f00 | 20 61 72 65 20 63 61 6c 6c 65 64 20 69 6e 20 74 68 65 20 6f 72 64 65 72 20 67 69 76 65 6e 2c 0a | .are.called.in.the.order.given,. |
0f20 | 75 6e 74 69 6c 20 6f 6e 65 20 6f 66 20 74 68 65 6d 20 72 65 74 75 72 6e 73 20 6e 6f 6e 2d 6e 69 | until.one.of.them.returns.non-ni |
0f40 | 6c 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 66 69 6e 64 2d 66 69 6c 65 2d 68 6f 6f 6b 73 20 6e 69 | l.")..(defvar.find-file-hooks.ni |
0f60 | 6c 20 22 5c 0a 4c 69 73 74 20 6f 66 20 66 75 6e 63 74 69 6f 6e 73 20 74 6f 20 62 65 20 63 61 6c | l."\.List.of.functions.to.be.cal |
0f80 | 6c 65 64 20 61 66 74 65 72 20 61 20 62 75 66 66 65 72 20 69 73 20 6c 6f 61 64 65 64 20 66 72 6f | led.after.a.buffer.is.loaded.fro |
0fa0 | 6d 20 61 20 66 69 6c 65 2e 0a 54 68 65 20 62 75 66 66 65 72 27 73 20 6c 6f 63 61 6c 20 76 61 72 | m.a.file..The.buffer's.local.var |
0fc0 | 69 61 62 6c 65 73 20 28 69 66 20 61 6e 79 29 20 77 69 6c 6c 20 68 61 76 65 20 62 65 65 6e 20 70 | iables.(if.any).will.have.been.p |
0fe0 | 72 6f 63 65 73 73 65 64 20 62 65 66 6f 72 65 20 74 68 65 0a 66 75 6e 63 74 69 6f 6e 73 20 61 72 | rocessed.before.the.functions.ar |
1000 | 65 20 63 61 6c 6c 65 64 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 77 72 69 74 65 2d 66 69 6c 65 2d | e.called.")..(defvar.write-file- |
1020 | 68 6f 6f 6b 73 20 6e 69 6c 20 22 5c 0a 4c 69 73 74 20 6f 66 20 66 75 6e 63 74 69 6f 6e 73 20 74 | hooks.nil."\.List.of.functions.t |
1040 | 6f 20 62 65 20 63 61 6c 6c 65 64 20 62 65 66 6f 72 65 20 77 72 69 74 69 6e 67 20 6f 75 74 20 61 | o.be.called.before.writing.out.a |
1060 | 20 62 75 66 66 65 72 20 74 6f 20 61 20 66 69 6c 65 2e 0a 49 66 20 6f 6e 65 20 6f 66 20 74 68 65 | .buffer.to.a.file..If.one.of.the |
1080 | 6d 20 72 65 74 75 72 6e 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 20 66 69 6c 65 20 69 73 20 63 | m.returns.non-nil,.the.file.is.c |
10a0 | 6f 6e 73 69 64 65 72 65 64 20 61 6c 72 65 61 64 79 20 77 72 69 74 74 65 6e 0a 61 6e 64 20 74 68 | onsidered.already.written.and.th |
10c0 | 65 20 72 65 73 74 20 61 72 65 20 6e 6f 74 20 63 61 6c 6c 65 64 2e 22 29 0a 0a 28 64 65 66 63 6f | e.rest.are.not.called.")..(defco |
10e0 | 6e 73 74 20 69 6e 68 69 62 69 74 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 6e 69 6c 20 | nst.inhibit-local-variables.nil. |
1100 | 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 71 75 65 72 79 20 62 65 66 6f 72 65 20 6f | "\.*Non-nil.means.query.before.o |
1120 | 62 65 79 69 6e 67 20 61 20 66 69 6c 65 27 73 20 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 | beying.a.file's.local-variables. |
1140 | 6c 69 73 74 2e 0a 54 68 69 73 20 61 70 70 6c 69 65 73 20 77 68 65 6e 20 74 68 65 20 6c 6f 63 61 | list..This.applies.when.the.loca |
1160 | 6c 2d 76 61 72 69 61 62 6c 65 73 20 6c 69 73 74 20 69 73 20 73 63 61 6e 6e 65 64 20 61 75 74 6f | l-variables.list.is.scanned.auto |
1180 | 6d 61 74 69 63 61 6c 6c 79 0a 61 66 74 65 72 20 79 6f 75 20 66 69 6e 64 20 61 20 66 69 6c 65 2e | matically.after.you.find.a.file. |
11a0 | 20 20 49 66 20 79 6f 75 20 65 78 70 6c 69 63 69 74 6c 79 20 72 65 71 75 65 73 74 20 73 75 63 68 | ..If.you.explicitly.request.such |
11c0 | 20 61 20 73 63 61 6e 20 77 69 74 68 0a 5c 5c 5b 6e 6f 72 6d 61 6c 2d 6d 6f 64 65 5d 2c 20 74 68 | .a.scan.with.\\[normal-mode],.th |
11e0 | 65 72 65 20 69 73 20 6e 6f 20 71 75 65 72 79 2c 20 72 65 67 61 72 64 6c 65 73 73 20 6f 66 20 74 | ere.is.no.query,.regardless.of.t |
1200 | 68 69 73 20 76 61 72 69 61 62 6c 65 2e 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 69 67 6e 6f 72 | his.variable.")..(defconst.ignor |
1220 | 65 2d 6c 6f 63 61 6c 2d 65 76 61 6c 20 6e 69 6c 20 22 5c 0a 2a 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 | e-local-eval.nil."\.*Non-nil.mea |
1240 | 6e 73 20 69 67 6e 6f 72 65 20 74 68 65 20 5c 22 76 61 72 69 61 62 6c 65 5c 22 20 60 65 76 61 6c | ns.ignore.the.\"variable\".`eval |
1260 | 27 20 69 6e 20 61 20 66 69 6c 65 27 73 20 6c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 73 2e 0a 54 | '.in.a.file's.local.variables..T |
1280 | 68 69 73 20 61 70 70 6c 69 65 73 20 77 68 65 6e 20 74 68 65 20 6c 6f 63 61 6c 2d 76 61 72 69 61 | his.applies.when.the.local-varia |
12a0 | 62 6c 65 73 20 6c 69 73 74 20 69 73 20 73 63 61 6e 6e 65 64 20 61 75 74 6f 6d 61 74 69 63 61 6c | bles.list.is.scanned.automatical |
12c0 | 6c 79 0a 61 66 74 65 72 20 79 6f 75 20 66 69 6e 64 20 61 20 66 69 6c 65 2e 20 20 49 66 20 79 6f | ly.after.you.find.a.file...If.yo |
12e0 | 75 20 65 78 70 6c 69 63 69 74 6c 79 20 72 65 71 75 65 73 74 20 73 75 63 68 20 61 20 73 63 61 6e | u.explicitly.request.such.a.scan |
1300 | 20 77 69 74 68 0a 5c 5c 5b 6e 6f 72 6d 61 6c 2d 6d 6f 64 65 5d 2c 20 74 68 65 72 65 20 69 73 20 | .with.\\[normal-mode],.there.is. |
1320 | 6e 6f 20 71 75 65 72 79 2c 20 72 65 67 61 72 64 6c 65 73 73 20 6f 66 20 74 68 69 73 20 76 61 72 | no.query,.regardless.of.this.var |
1340 | 69 61 62 6c 65 2e 22 29 0a 0a 28 6f 72 20 28 66 62 6f 75 6e 64 70 20 28 71 75 6f 74 65 20 6c 6f | iable.")..(or.(fboundp.(quote.lo |
1360 | 63 6b 2d 62 75 66 66 65 72 29 29 20 28 66 73 65 74 20 28 71 75 6f 74 65 20 6c 6f 63 6b 2d 62 75 | ck-buffer)).(fset.(quote.lock-bu |
1380 | 66 66 65 72 29 20 28 71 75 6f 74 65 20 69 67 6e 6f 72 65 29 29 29 0a 0a 28 6f 72 20 28 66 62 6f | ffer).(quote.ignore)))..(or.(fbo |
13a0 | 75 6e 64 70 20 28 71 75 6f 74 65 20 75 6e 6c 6f 63 6b 2d 62 75 66 66 65 72 29 29 20 28 66 73 65 | undp.(quote.unlock-buffer)).(fse |
13c0 | 74 20 28 71 75 6f 74 65 20 75 6e 6c 6f 63 6b 2d 62 75 66 66 65 72 29 20 28 71 75 6f 74 65 20 69 | t.(quote.unlock-buffer).(quote.i |
13e0 | 67 6e 6f 72 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 70 77 64 20 6e 69 6c 20 22 5c 0a 53 68 6f 77 | gnore)))..(defun.pwd.nil."\.Show |
1400 | 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 65 66 61 75 6c 74 20 64 69 72 65 63 74 6f 72 79 2e 22 | .the.current.default.directory." |
1420 | 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 6e 69 6c 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 | .(interactive.nil).(byte-code.". |
1440 | 88 c2 c3 09 5c 22 87 22 20 5b 6e 69 6c 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 | ....\".".[nil.default-directory. |
1460 | 6d 65 73 73 61 67 65 20 22 44 69 72 65 63 74 6f 72 79 20 25 73 22 5d 20 33 29 29 0a 0a 28 64 65 | message."Directory.%s"].3))..(de |
1480 | 66 75 6e 20 63 64 20 28 64 69 72 29 20 22 5c 0a 4d 61 6b 65 20 44 49 52 20 62 65 63 6f 6d 65 20 | fun.cd.(dir)."\.Make.DIR.become. |
14a0 | 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 27 73 20 64 65 66 61 75 6c 74 20 64 69 72 | the.current.buffer's.default.dir |
14c0 | 65 63 74 6f 72 79 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 44 43 68 61 6e 67 65 20 64 | ectory.".(interactive."DChange.d |
14e0 | 65 66 61 75 6c 74 20 64 69 72 65 63 74 6f 72 79 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 | efault.directory:.").(byte-code. |
1500 | 22 c3 88 c4 08 21 89 10 88 09 c5 3d 3f 85 14 00 c6 08 21 89 10 88 c7 08 21 3f 83 23 00 c8 c9 08 | "....!.....=?.....!.....!?.#.... |
1520 | 5c 22 82 26 00 08 89 12 88 ca 20 87 22 20 5b 64 69 72 20 73 79 73 74 65 6d 2d 74 79 70 65 20 64 | \".&........".[dir.system-type.d |
1540 | 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 6e 69 6c 20 65 78 70 61 6e 64 2d 66 69 6c 65 | efault-directory.nil.expand-file |
1560 | 2d 6e 61 6d 65 20 76 61 78 2d 76 6d 73 20 66 69 6c 65 2d 6e 61 6d 65 2d 61 73 2d 64 69 72 65 63 | -name.vax-vms.file-name-as-direc |
1580 | 74 6f 72 79 20 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 65 72 72 6f 72 20 22 25 73 20 | tory.file-directory-p.error."%s. |
15a0 | 69 73 20 6e 6f 74 20 61 20 64 69 72 65 63 74 6f 72 79 22 20 70 77 64 5d 20 36 29 29 0a 0a 28 64 | is.not.a.directory".pwd].6))..(d |
15c0 | 65 66 75 6e 20 6c 6f 61 64 2d 66 69 6c 65 20 28 66 69 6c 65 29 20 22 5c 0a 4c 6f 61 64 20 74 68 | efun.load-file.(file)."\.Load.th |
15e0 | 65 20 66 69 6c 65 20 46 49 4c 45 20 6f 66 20 4c 69 73 70 20 63 6f 64 65 2e 22 20 28 69 6e 74 65 | e.file.FILE.of.Lisp.code.".(inte |
1600 | 72 61 63 74 69 76 65 20 22 66 4c 6f 61 64 20 66 69 6c 65 3a 20 22 29 20 28 62 79 74 65 2d 63 6f | ractive."fLoad.file:.").(byte-co |
1620 | 64 65 20 22 c1 88 c3 c4 08 21 c1 c1 c2 24 87 22 20 5b 66 69 6c 65 20 6e 69 6c 20 74 20 6c 6f 61 | de.".....!...$.".[file.nil.t.loa |
1640 | 64 20 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 | d.expand-file-name].6))..(defun. |
1660 | 6c 6f 61 64 2d 6c 69 62 72 61 72 79 20 28 6c 69 62 72 61 72 79 29 20 22 5c 0a 4c 6f 61 64 20 74 | load-library.(library)."\.Load.t |
1680 | 68 65 20 6c 69 62 72 61 72 79 20 6e 61 6d 65 64 20 4c 49 42 52 41 52 59 2e 0a 54 68 69 73 20 69 | he.library.named.LIBRARY..This.i |
16a0 | 73 20 61 6e 20 69 6e 74 65 72 66 61 63 65 20 74 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 60 | s.an.interface.to.the.function.` |
16c0 | 6c 6f 61 64 27 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 73 4c 6f 61 64 20 6c 69 62 72 | load'.".(interactive."sLoad.libr |
16e0 | 61 72 79 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 08 21 87 22 20 5b 6c 69 62 | ary:.").(byte-code."....!.".[lib |
1700 | 72 61 72 79 20 6e 69 6c 20 6c 6f 61 64 5d 20 32 29 29 0a 0a 28 64 65 66 75 6e 20 73 77 69 74 63 | rary.nil.load].2))..(defun.switc |
1720 | 68 2d 74 6f 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 28 62 75 66 66 65 72 | h-to-buffer-other-window.(buffer |
1740 | 29 20 22 5c 0a 53 65 6c 65 63 74 20 62 75 66 66 65 72 20 42 55 46 46 45 52 20 69 6e 20 61 6e 6f | )."\.Select.buffer.BUFFER.in.ano |
1760 | 74 68 65 72 20 77 69 6e 64 6f 77 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 42 53 77 69 | ther.window.".(interactive."BSwi |
1780 | 74 63 68 20 74 6f 20 62 75 66 66 65 72 20 69 6e 20 6f 74 68 65 72 20 77 69 6e 64 6f 77 3a 20 22 | tch.to.buffer.in.other.window:." |
17a0 | 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 88 c1 18 c4 0a c1 5c 22 29 87 22 20 5b 70 6f 70 2d | ).(byte-code.".......\").".[pop- |
17c0 | 75 70 2d 77 69 6e 64 6f 77 73 20 74 20 62 75 66 66 65 72 20 6e 69 6c 20 70 6f 70 2d 74 6f 2d 62 | up-windows.t.buffer.nil.pop-to-b |
17e0 | 75 66 66 65 72 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 66 69 6e 64 2d 66 69 6c 65 20 28 66 69 | uffer].3))..(defun.find-file.(fi |
1800 | 6c 65 6e 61 6d 65 29 20 22 5c 0a 45 64 69 74 20 66 69 6c 65 20 46 49 4c 45 4e 41 4d 45 2e 0a 53 | lename)."\.Edit.file.FILENAME..S |
1820 | 77 69 74 63 68 20 74 6f 20 61 20 62 75 66 66 65 72 20 76 69 73 69 74 69 6e 67 20 66 69 6c 65 20 | witch.to.a.buffer.visiting.file. |
1840 | 46 49 4c 45 4e 41 4d 45 2c 0a 63 72 65 61 74 69 6e 67 20 6f 6e 65 20 69 66 20 6e 6f 6e 65 20 61 | FILENAME,.creating.one.if.none.a |
1860 | 6c 72 65 61 64 79 20 65 78 69 73 74 73 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 46 46 | lready.exists.".(interactive."FF |
1880 | 69 6e 64 20 66 69 6c 65 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 c3 08 21 21 | ind.file:.").(byte-code.".....!! |
18a0 | 87 22 20 5b 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 | .".[filename.nil.switch-to-buffe |
18c0 | 72 20 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 6c 65 63 74 5d 20 33 29 29 0a 0a 28 64 65 66 75 | r.find-file-noselect].3))..(defu |
18e0 | 6e 20 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 28 66 69 6c 65 6e 61 | n.find-file-other-window.(filena |
1900 | 6d 65 29 20 22 5c 0a 45 64 69 74 20 66 69 6c 65 20 46 49 4c 45 4e 41 4d 45 2c 20 69 6e 20 61 6e | me)."\.Edit.file.FILENAME,.in.an |
1920 | 6f 74 68 65 72 20 77 69 6e 64 6f 77 2e 0a 4d 61 79 20 63 72 65 61 74 65 20 61 20 6e 65 77 20 77 | other.window..May.create.a.new.w |
1940 | 69 6e 64 6f 77 2c 20 6f 72 20 72 65 75 73 65 20 61 6e 20 65 78 69 73 74 69 6e 67 20 6f 6e 65 3b | indow,.or.reuse.an.existing.one; |
1960 | 0a 73 65 65 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 64 69 73 70 6c 61 79 2d 62 75 66 66 65 72 | .see.the.function.display-buffer |
1980 | 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 46 46 69 6e 64 20 66 69 6c 65 20 69 6e 20 6f | .".(interactive."FFind.file.in.o |
19a0 | 74 68 65 72 20 77 69 6e 64 6f 77 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 c3 | ther.window:.").(byte-code.".... |
19c0 | 08 21 21 87 22 20 5b 66 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 | .!!.".[filename.nil.switch-to-bu |
19e0 | 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 20 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 | ffer-other-window.find-file-nose |
1a00 | 6c 65 63 74 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 66 69 6e 64 2d 66 69 6c 65 2d 72 65 61 64 | lect].3))..(defun.find-file-read |
1a20 | 2d 6f 6e 6c 79 20 28 66 69 6c 65 6e 61 6d 65 29 20 22 5c 0a 45 64 69 74 20 66 69 6c 65 20 46 49 | -only.(filename)."\.Edit.file.FI |
1a40 | 4c 45 4e 41 4d 45 20 62 75 74 20 64 6f 6e 27 74 20 73 61 76 65 20 77 69 74 68 6f 75 74 20 63 6f | LENAME.but.don't.save.without.co |
1a60 | 6e 66 69 72 6d 61 74 69 6f 6e 2e 0a 4c 69 6b 65 20 66 69 6e 64 2d 66 69 6c 65 20 62 75 74 20 6d | nfirmation..Like.find-file.but.m |
1a80 | 61 72 6b 73 20 62 75 66 66 65 72 20 61 73 20 72 65 61 64 2d 6f 6e 6c 79 2e 22 20 28 69 6e 74 65 | arks.buffer.as.read-only.".(inte |
1aa0 | 72 61 63 74 69 76 65 20 22 66 46 69 6e 64 20 66 69 6c 65 20 72 65 61 64 2d 6f 6e 6c 79 3a 20 22 | ractive."fFind.file.read-only:." |
1ac0 | 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 88 c4 08 21 88 c2 89 11 87 22 20 5b 66 69 6c 65 6e | ).(byte-code."....!.....".[filen |
1ae0 | 61 6d 65 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 74 20 6e 69 6c 20 66 69 6e 64 2d | ame.buffer-read-only.t.nil.find- |
1b00 | 66 69 6c 65 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 66 69 6e 64 2d 61 6c 74 65 72 6e 61 74 65 | file].3))..(defun.find-alternate |
1b20 | 2d 66 69 6c 65 20 28 66 69 6c 65 6e 61 6d 65 29 20 22 5c 0a 46 69 6e 64 20 66 69 6c 65 20 46 49 | -file.(filename)."\.Find.file.FI |
1b40 | 4c 45 4e 41 4d 45 2c 20 73 65 6c 65 63 74 20 69 74 73 20 62 75 66 66 65 72 2c 20 6b 69 6c 6c 20 | LENAME,.select.its.buffer,.kill. |
1b60 | 70 72 65 76 69 6f 75 73 20 62 75 66 66 65 72 2e 0a 49 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 | previous.buffer..If.the.current. |
1b80 | 62 75 66 66 65 72 20 6e 6f 77 20 63 6f 6e 74 61 69 6e 73 20 61 6e 20 65 6d 70 74 79 20 66 69 6c | buffer.now.contains.an.empty.fil |
1ba0 | 65 20 74 68 61 74 20 79 6f 75 20 6a 75 73 74 20 76 69 73 69 74 65 64 0a 28 70 72 65 73 75 6d 61 | e.that.you.just.visited.(presuma |
1bc0 | 62 6c 79 20 62 79 20 6d 69 73 74 61 6b 65 29 2c 20 75 73 65 20 74 68 69 73 20 63 6f 6d 6d 61 6e | bly.by.mistake),.use.this.comman |
1be0 | 64 20 74 6f 20 76 69 73 69 74 20 74 68 65 20 66 69 6c 65 20 79 6f 75 20 72 65 61 6c 6c 79 20 77 | d.to.visit.the.file.you.really.w |
1c00 | 61 6e 74 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 46 46 69 6e 64 20 61 6c 74 65 72 6e | ant.".(interactive."FFind.altern |
1c20 | 61 74 65 20 66 69 6c 65 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c4 88 c6 20 85 15 00 | ate.file:.").(byte-code."....... |
1c40 | c7 c8 c9 ca 20 5c 22 21 3f 85 15 00 cb cc 21 88 70 0a ca 20 1b 19 18 cd ce 21 88 c4 89 12 88 cf | .....\"!?.....!.p........!...... |
1c60 | 8e d0 20 88 d1 0d 21 29 88 08 70 3d 86 38 00 d2 08 21 2b 87 22 20 5b 6f 62 75 66 20 6f 66 69 6c | ......!)..p=.8...!+.".[obuf.ofil |
1c80 | 65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 6f 6e 61 6d 65 20 6e 69 6c 20 66 69 6c | e.buffer-file-name.oname.nil.fil |
1ca0 | 65 6e 61 6d 65 20 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 79 65 73 2d 6f 72 2d 6e | ename.buffer-modified-p.yes-or-n |
1cc0 | 6f 2d 70 20 66 6f 72 6d 61 74 20 22 42 75 66 66 65 72 20 25 73 20 69 73 20 6d 6f 64 69 66 69 65 | o-p.format."Buffer.%s.is.modifie |
1ce0 | 64 3b 20 6b 69 6c 6c 20 61 6e 79 77 61 79 3f 20 22 20 62 75 66 66 65 72 2d 6e 61 6d 65 20 65 72 | d;.kill.anyway?.".buffer-name.er |
1d00 | 72 6f 72 20 22 41 62 6f 72 74 65 64 22 20 72 65 6e 61 6d 65 2d 62 75 66 66 65 72 20 22 20 2a 2a | ror."Aborted".rename-buffer.".** |
1d20 | 6c 6f 73 65 2a 2a 22 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 08 70 3d 85 10 00 0a 89 11 88 c4 | lose**".((byte-code.".p=........ |
1d40 | 20 88 c5 0b 21 87 22 20 5b 6f 62 75 66 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 6f | ....!.".[obuf.buffer-file-name.o |
1d60 | 66 69 6c 65 20 6f 6e 61 6d 65 20 6c 6f 63 6b 2d 62 75 66 66 65 72 20 72 65 6e 61 6d 65 2d 62 75 | file.oname.lock-buffer.rename-bu |
1d80 | 66 66 65 72 5d 20 33 29 29 20 75 6e 6c 6f 63 6b 2d 62 75 66 66 65 72 20 66 69 6e 64 2d 66 69 6c | ffer].3)).unlock-buffer.find-fil |
1da0 | 65 20 6b 69 6c 6c 2d 62 75 66 66 65 72 5d 20 31 31 29 29 0a 0a 28 64 65 66 75 6e 20 63 72 65 61 | e.kill-buffer].11))..(defun.crea |
1dc0 | 74 65 2d 66 69 6c 65 2d 62 75 66 66 65 72 20 28 66 69 6c 65 6e 61 6d 65 29 20 22 5c 0a 43 72 65 | te-file-buffer.(filename)."\.Cre |
1de0 | 61 74 65 20 61 20 73 75 69 74 61 62 6c 79 20 6e 61 6d 65 64 20 62 75 66 66 65 72 20 66 6f 72 20 | ate.a.suitably.named.buffer.for. |
1e00 | 76 69 73 69 74 69 6e 67 20 46 49 4c 45 4e 41 4d 45 2c 20 61 6e 64 20 72 65 74 75 72 6e 20 69 74 | visiting.FILENAME,.and.return.it |
1e20 | 2e 0a 46 49 4c 45 4e 41 4d 45 20 28 73 61 6e 73 20 64 69 72 65 63 74 6f 72 79 29 20 69 73 20 75 | ..FILENAME.(sans.directory).is.u |
1e40 | 73 65 64 20 75 6e 63 68 61 6e 67 65 64 20 69 66 20 74 68 61 74 20 6e 61 6d 65 20 69 73 20 66 72 | sed.unchanged.if.that.name.is.fr |
1e60 | 65 65 3b 0a 6f 74 68 65 72 77 69 73 65 20 61 20 73 74 72 69 6e 67 20 3c 32 3e 20 6f 72 20 3c 33 | ee;.otherwise.a.string.<2>.or.<3 |
1e80 | 3e 20 6f 72 20 2e 2e 2e 20 69 73 20 61 70 70 65 6e 64 65 64 20 74 6f 20 67 65 74 20 61 6e 20 75 | >.or.....is.appended.to.get.an.u |
1ea0 | 6e 75 73 65 64 20 6e 61 6d 65 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 09 21 18 c3 08 c4 | nused.name.".(byte-code."..!.... |
1ec0 | 5c 22 85 0e 00 09 89 10 88 c5 08 21 29 87 22 20 5b 6c 61 73 74 6e 61 6d 65 20 66 69 6c 65 6e 61 | \".........!).".[lastname.filena |
1ee0 | 6d 65 20 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 73 74 72 69 6e 67 | me.file-name-nondirectory.string |
1f00 | 3d 20 22 22 20 67 65 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 5d 20 34 29 29 0a 0a 28 | =."".generate-new-buffer].4))..( |
1f20 | 64 65 66 63 6f 6e 73 74 20 61 75 74 6f 6d 6f 75 6e 74 2d 64 69 72 2d 70 72 65 66 69 78 20 22 5e | defconst.automount-dir-prefix."^ |
1f40 | 2f 74 6d 70 5f 6d 6e 74 2f 22 20 22 5c 0a 52 65 67 65 78 70 20 74 6f 20 6d 61 74 63 68 20 74 68 | /tmp_mnt/"."\.Regexp.to.match.th |
1f60 | 65 20 61 75 74 6f 6d 6f 75 6e 74 65 72 20 70 72 65 66 69 78 20 69 6e 20 61 20 64 69 72 65 63 74 | e.automounter.prefix.in.a.direct |
1f80 | 6f 72 79 20 6e 61 6d 65 2e 22 29 0a 0a 28 64 65 66 75 6e 20 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f | ory.name.")..(defun.find-file-no |
1fa0 | 73 65 6c 65 63 74 20 28 66 69 6c 65 6e 61 6d 65 20 26 6f 70 74 69 6f 6e 61 6c 20 6e 6f 77 61 72 | select.(filename.&optional.nowar |
1fc0 | 6e 29 20 22 5c 0a 52 65 61 64 20 66 69 6c 65 20 46 49 4c 45 4e 41 4d 45 20 69 6e 74 6f 20 61 20 | n)."\.Read.file.FILENAME.into.a. |
1fe0 | 62 75 66 66 65 72 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65 20 62 75 66 66 65 72 2e 0a 49 66 | buffer.and.return.the.buffer..If |
2000 | 20 61 20 62 75 66 66 65 72 20 65 78 69 73 74 73 20 76 69 73 69 74 69 6e 67 20 46 49 4c 45 4e 41 | .a.buffer.exists.visiting.FILENA |
2020 | 4d 45 2c 20 72 65 74 75 72 6e 20 74 68 61 74 20 6f 6e 65 2c 0a 62 75 74 20 76 65 72 69 66 79 20 | ME,.return.that.one,.but.verify. |
2040 | 74 68 61 74 20 74 68 65 20 66 69 6c 65 20 68 61 73 20 6e 6f 74 20 63 68 61 6e 67 65 64 20 73 69 | that.the.file.has.not.changed.si |
2060 | 6e 63 65 20 76 69 73 69 74 65 64 20 6f 72 20 73 61 76 65 64 2e 0a 54 68 65 20 62 75 66 66 65 72 | nce.visited.or.saved..The.buffer |
2080 | 20 69 73 20 6e 6f 74 20 73 65 6c 65 63 74 65 64 2c 20 6a 75 73 74 20 72 65 74 75 72 6e 65 64 20 | .is.not.selected,.just.returned. |
20a0 | 74 6f 20 74 68 65 20 63 61 6c 6c 65 72 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c8 08 21 89 | to.the.caller.".(byte-code."..!. |
20c0 | 10 88 c9 09 08 5c 22 85 18 00 ca cb 08 cc cd 21 53 ce 4f 21 21 85 24 00 08 cc cd 21 53 ce 4f 89 | .....\"........!S.O!!.$....!S.O. |
20e0 | 10 88 cf 08 21 83 3c 00 0a 83 35 00 d0 08 21 82 39 00 c4 d1 08 5c 22 82 9c 00 d2 08 21 ce 1c 1b | ....!.<...5...!.9....\".....!... |
2100 | 0b 83 7a 00 0d 86 77 00 d3 0b 21 86 77 00 ca 08 21 3f 83 5e 00 c4 d4 08 5c 22 82 77 00 d5 d6 0b | ..z...w...!.w...!?.^....\".w.... |
2120 | 21 83 69 00 d7 82 6a 00 d8 21 85 77 00 8a 0b 71 88 d9 c6 c6 5c 22 29 82 99 00 8a da 08 21 89 13 | !.i...j..!.w...q....\")......!.. |
2140 | 88 0b 71 88 db 20 88 ce dc dd 8f 88 cb 08 21 89 16 07 88 de 0c 0d 3f 5c 22 29 88 0b 2a 87 22 20 | ..q...........!.......?\")..*.". |
2160 | 5b 66 69 6c 65 6e 61 6d 65 20 61 75 74 6f 6d 6f 75 6e 74 2d 64 69 72 2d 70 72 65 66 69 78 20 66 | [filename.automount-dir-prefix.f |
2180 | 69 6e 64 2d 66 69 6c 65 2d 72 75 6e 2d 64 69 72 65 64 20 62 75 66 20 65 72 72 6f 72 20 6e 6f 77 | ind-file-run-dired.buf.error.now |
21a0 | 61 72 6e 20 74 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 65 78 70 61 6e 64 2d 66 | arn.t.default-directory.expand-f |
21c0 | 69 6c 65 2d 6e 61 6d 65 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 66 69 6c 65 2d 65 78 69 73 74 | ile-name.string-match.file-exist |
21e0 | 73 2d 70 20 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 6d 61 74 63 68 2d 65 6e | s-p.file-name-directory.match-en |
2200 | 64 20 30 20 6e 69 6c 20 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 64 69 72 65 64 2d 6e | d.0.nil.file-directory-p.dired-n |
2220 | 6f 73 65 6c 65 63 74 20 22 25 73 20 69 73 20 61 20 64 69 72 65 63 74 6f 72 79 2e 22 20 67 65 74 | oselect."%s.is.a.directory.".get |
2240 | 2d 66 69 6c 65 2d 62 75 66 66 65 72 20 76 65 72 69 66 79 2d 76 69 73 69 74 65 64 2d 66 69 6c 65 | -file-buffer.verify-visited-file |
2260 | 2d 6d 6f 64 74 69 6d 65 20 22 46 69 6c 65 20 25 73 20 6e 6f 20 6c 6f 6e 67 65 72 20 65 78 69 73 | -modtime."File.%s.no.longer.exis |
2280 | 74 73 21 22 20 79 65 73 2d 6f 72 2d 6e 6f 2d 70 20 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 | ts!".yes-or-no-p.buffer-modified |
22a0 | 2d 70 20 22 46 69 6c 65 20 68 61 73 20 63 68 61 6e 67 65 64 20 73 69 6e 63 65 20 6c 61 73 74 20 | -p."File.has.changed.since.last. |
22c0 | 76 69 73 69 74 65 64 20 6f 72 20 73 61 76 65 64 2e 20 20 46 6c 75 73 68 20 79 6f 75 72 20 63 68 | visited.or.saved...Flush.your.ch |
22e0 | 61 6e 67 65 73 3f 20 22 20 22 46 69 6c 65 20 68 61 73 20 63 68 61 6e 67 65 64 20 73 69 6e 63 65 | anges?."."File.has.changed.since |
2300 | 20 6c 61 73 74 20 76 69 73 69 74 65 64 20 6f 72 20 73 61 76 65 64 2e 20 20 52 65 61 64 20 66 72 | .last.visited.or.saved...Read.fr |
2320 | 6f 6d 20 64 69 73 6b 3f 20 22 20 72 65 76 65 72 74 2d 62 75 66 66 65 72 20 63 72 65 61 74 65 2d | om.disk?.".revert-buffer.create- |
2340 | 66 69 6c 65 2d 62 75 66 66 65 72 20 65 72 61 73 65 2d 62 75 66 66 65 72 20 28 62 79 74 65 2d 63 | file-buffer.erase-buffer.(byte-c |
2360 | 6f 64 65 20 22 c2 08 c1 5c 22 87 22 20 5b 66 69 6c 65 6e 61 6d 65 20 74 20 69 6e 73 65 72 74 2d | ode."...\".".[filename.t.insert- |
2380 | 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 5d 20 33 29 20 28 28 66 69 6c 65 2d 65 72 72 6f 72 20 28 | file-contents].3).((file-error.( |
23a0 | 62 79 74 65 2d 63 6f 64 65 20 22 c1 89 10 88 0b 1a 0a 85 0f 00 c4 0a 40 21 3f 85 1a 00 0a 41 89 | byte-code."............@!?....A. |
23c0 | 12 88 82 06 00 29 87 22 20 5b 65 72 72 6f 72 20 74 20 68 6f 6f 6b 73 20 66 69 6e 64 2d 66 69 6c | .....).".[error.t.hooks.find-fil |
23e0 | 65 2d 6e 6f 74 2d 66 6f 75 6e 64 2d 68 6f 6f 6b 73 20 66 75 6e 63 61 6c 6c 5d 20 34 29 29 29 20 | e-not-found-hooks.funcall].4))). |
2400 | 61 66 74 65 72 2d 66 69 6e 64 2d 66 69 6c 65 5d 20 32 32 29 29 0a 0a 28 64 65 66 75 6e 20 61 66 | after-find-file].22))..(defun.af |
2420 | 74 65 72 2d 66 69 6e 64 2d 66 69 6c 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 65 72 72 6f 72 20 77 | ter-find-file.(&optional.error.w |
2440 | 61 72 6e 29 20 22 5c 0a 43 61 6c 6c 65 64 20 61 66 74 65 72 20 66 69 6e 64 69 6e 67 20 61 20 66 | arn)."\.Called.after.finding.a.f |
2460 | 69 6c 65 20 61 6e 64 20 62 79 20 74 68 65 20 64 65 66 61 75 6c 74 20 72 65 76 65 72 74 20 66 75 | ile.and.by.the.default.revert.fu |
2480 | 6e 63 74 69 6f 6e 2e 0a 53 65 74 73 20 62 75 66 66 65 72 20 6d 6f 64 65 2c 20 70 61 72 73 65 73 | nction..Sets.buffer.mode,.parses |
24a0 | 20 6c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 73 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 73 20 | .local.variables..Optional.args. |
24c0 | 45 52 52 4f 52 20 61 6e 64 20 57 41 52 4e 3a 20 45 52 52 4f 52 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 | ERROR.and.WARN:.ERROR.non-nil.me |
24e0 | 61 6e 73 20 74 68 65 72 65 20 77 61 73 20 61 6e 0a 65 72 72 6f 72 20 69 6e 20 72 65 61 64 69 6e | ans.there.was.an.error.in.readin |
2500 | 67 20 74 68 65 20 66 69 6c 65 2e 20 20 57 41 52 4e 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 | g.the.file...WARN.non-nil.means. |
2520 | 77 61 72 6e 20 69 66 20 74 68 65 72 65 0a 65 78 69 73 74 73 20 61 6e 20 61 75 74 6f 2d 73 61 76 | warn.if.there.exists.an.auto-sav |
2540 | 65 20 66 69 6c 65 20 6d 6f 72 65 20 72 65 63 65 6e 74 20 74 68 61 6e 20 74 68 65 20 76 69 73 69 | e.file.more.recent.than.the.visi |
2560 | 74 65 64 20 66 69 6c 65 2e 0a 46 69 6e 69 73 68 65 73 20 62 79 20 63 61 6c 6c 69 6e 67 20 74 68 | ted.file..Finishes.by.calling.th |
2580 | 65 20 66 75 6e 63 74 69 6f 6e 73 20 69 6e 20 66 69 6e 64 2d 66 69 6c 65 2d 68 6f 6f 6b 73 2e 22 | e.functions.in.find-file-hooks." |
25a0 | 20 28 62 79 74 65 2d 63 6f 64 65 20 22 cc 09 21 3f 89 10 88 0a 83 0f 00 c3 82 79 00 c3 1c 08 3f | .(byte-code."..!?.........y....? |
25c0 | 83 38 00 0e 06 85 20 00 cd ce 20 09 5c 22 83 27 00 cf 82 35 00 c7 89 14 88 0e 08 83 34 00 d0 82 | .8..........\".'...5........4... |
25e0 | 35 00 c3 82 5e 00 0e 08 3f 83 46 00 c7 89 14 88 d1 82 5e 00 d2 09 21 83 50 00 d3 82 5e 00 d2 d4 | 5...^...?.F.......^...!.P...^... |
2600 | 0e 09 21 21 83 5d 00 d5 82 5e 00 d6 1d 0d 85 6f 00 d7 0d 21 88 0c 86 6f 00 d8 d9 c7 5c 22 2a 88 | ..!!.]...^.....o...!...o....\"*. |
2620 | 0e 0a 85 79 00 da c7 21 88 db c7 21 88 dc dd 0e 0b 5c 22 87 22 20 5b 62 75 66 66 65 72 2d 72 65 | ...y...!...!.....\".".[buffer-re |
2640 | 61 64 2d 6f 6e 6c 79 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e 6f 6e 69 6e 74 65 | ad-only.buffer-file-name.noninte |
2660 | 72 61 63 74 69 76 65 20 6e 69 6c 20 6e 6f 74 2d 73 65 72 69 6f 75 73 20 6d 73 67 20 77 61 72 6e | ractive.nil.not-serious.msg.warn |
2680 | 20 74 20 65 72 72 6f 72 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 61 75 74 6f 2d | .t.error.default-directory.auto- |
26a0 | 73 61 76 65 2d 64 65 66 61 75 6c 74 20 66 69 6e 64 2d 66 69 6c 65 2d 68 6f 6f 6b 73 20 66 69 6c | save-default.find-file-hooks.fil |
26c0 | 65 2d 77 72 69 74 61 62 6c 65 2d 70 20 66 69 6c 65 2d 6e 65 77 65 72 2d 74 68 61 6e 2d 66 69 6c | e-writable-p.file-newer-than-fil |
26e0 | 65 2d 70 20 6d 61 6b 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 41 75 | e-p.make-auto-save-file-name."Au |
2700 | 74 6f 20 73 61 76 65 20 66 69 6c 65 20 69 73 20 6e 65 77 65 72 3b 20 63 6f 6e 73 69 64 65 72 20 | to.save.file.is.newer;.consider. |
2720 | 4d 2d 78 20 72 65 63 6f 76 65 72 2d 66 69 6c 65 22 20 22 28 4e 65 77 20 66 69 6c 65 29 22 20 22 | M-x.recover-file"."(New.file)"." |
2740 | 46 69 6c 65 20 69 73 20 77 72 69 74 65 20 70 72 6f 74 65 63 74 65 64 22 20 66 69 6c 65 2d 61 74 | File.is.write.protected".file-at |
2760 | 74 72 69 62 75 74 65 73 20 22 46 69 6c 65 20 65 78 69 73 74 73 2c 20 62 75 74 20 69 73 20 72 65 | tributes."File.exists,.but.is.re |
2780 | 61 64 2d 70 72 6f 74 65 63 74 65 64 2e 22 20 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d 6e 61 | ad-protected.".directory-file-na |
27a0 | 6d 65 20 22 46 69 6c 65 20 6e 6f 74 20 66 6f 75 6e 64 20 61 6e 64 20 64 69 72 65 63 74 6f 72 79 | me."File.not.found.and.directory |
27c0 | 20 77 72 69 74 65 2d 70 72 6f 74 65 63 74 65 64 22 20 22 46 69 6c 65 20 6e 6f 74 20 66 6f 75 6e | .write-protected"."File.not.foun |
27e0 | 64 20 61 6e 64 20 64 69 72 65 63 74 6f 72 79 20 64 6f 65 73 6e 27 74 20 65 78 69 73 74 22 20 6d | d.and.directory.doesn't.exist".m |
2800 | 65 73 73 61 67 65 20 73 69 74 2d 66 6f 72 20 31 20 61 75 74 6f 2d 73 61 76 65 2d 6d 6f 64 65 20 | essage.sit-for.1.auto-save-mode. |
2820 | 6e 6f 72 6d 61 6c 2d 6d 6f 64 65 20 6d 61 70 63 61 72 20 66 75 6e 63 61 6c 6c 5d 20 31 33 29 29 | normal-mode.mapcar.funcall].13)) |
2840 | 0a 0a 28 64 65 66 75 6e 20 6e 6f 72 6d 61 6c 2d 6d 6f 64 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 | ..(defun.normal-mode.(&optional. |
2860 | 66 69 6e 64 2d 66 69 6c 65 29 20 22 5c 0a 43 68 6f 6f 73 65 20 74 68 65 20 6d 61 6a 6f 72 20 6d | find-file)."\.Choose.the.major.m |
2880 | 6f 64 65 20 66 6f 72 20 74 68 69 73 20 62 75 66 66 65 72 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c | ode.for.this.buffer.automaticall |
28a0 | 79 2e 0a 41 6c 73 6f 20 73 65 74 73 20 75 70 20 61 6e 79 20 73 70 65 63 69 66 69 65 64 20 6c 6f | y..Also.sets.up.any.specified.lo |
28c0 | 63 61 6c 20 76 61 72 69 61 62 6c 65 73 20 6f 66 20 74 68 65 20 66 69 6c 65 2e 0a 55 73 65 73 20 | cal.variables.of.the.file..Uses. |
28e0 | 74 68 65 20 76 69 73 69 74 65 64 20 66 69 6c 65 20 6e 61 6d 65 2c 20 74 68 65 20 2d 2a 2d 20 6c | the.visited.file.name,.the.-*-.l |
2900 | 69 6e 65 2c 20 61 6e 64 20 74 68 65 20 6c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 73 20 73 70 65 | ine,.and.the.local.variables.spe |
2920 | 63 2e 0a 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 63 61 6c 6c 65 64 20 61 75 74 6f | c...This.function.is.called.auto |
2940 | 6d 61 74 69 63 61 6c 6c 79 20 66 72 6f 6d 20 60 66 69 6e 64 2d 66 69 6c 65 27 2e 20 20 49 6e 20 | matically.from.`find-file'...In. |
2960 | 74 68 61 74 20 63 61 73 65 2c 0a 69 66 20 60 69 6e 68 69 62 69 74 2d 6c 6f 63 61 6c 2d 76 61 72 | that.case,.if.`inhibit-local-var |
2980 | 69 61 62 6c 65 73 27 20 69 73 20 6e 6f 6e 2d 60 6e 69 6c 27 20 77 65 20 72 65 71 75 69 72 65 20 | iables'.is.non-`nil'.we.require. |
29a0 | 63 6f 6e 66 69 72 6d 61 74 69 6f 6e 20 62 65 66 6f 72 65 0a 70 72 6f 63 65 73 73 69 6e 67 20 61 | confirmation.before.processing.a |
29c0 | 20 6c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 73 20 73 70 65 63 2e 20 20 49 66 20 79 6f 75 20 72 | .local.variables.spec...If.you.r |
29e0 | 75 6e 20 60 6e 6f 72 6d 61 6c 2d 6d 6f 64 65 27 20 65 78 70 6c 69 63 69 74 6c 79 2c 0a 63 6f 6e | un.`normal-mode'.explicitly,.con |
2a00 | 66 69 72 6d 61 74 69 6f 6e 20 69 73 20 6e 65 76 65 72 20 72 65 71 75 69 72 65 64 2e 22 20 28 69 | firmation.is.never.required.".(i |
2a20 | 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 08 86 0d 00 c3 09 | nteractive).(byte-code."........ |
2a40 | 86 0c 00 c4 21 88 c5 c6 c7 8f 88 c5 c8 c9 8f 87 22 20 5b 66 69 6e 64 2d 66 69 6c 65 20 64 65 66 | ....!...........".[find-file.def |
2a60 | 61 75 6c 74 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6e 69 6c 20 66 75 6e 63 61 6c 6c 20 66 75 6e 64 | ault-major-mode.nil.funcall.fund |
2a80 | 61 6d 65 6e 74 61 6c 2d 6d 6f 64 65 20 65 72 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 20 87 | amental-mode.err.(byte-code."... |
2aa0 | 22 20 5b 73 65 74 2d 61 75 74 6f 2d 6d 6f 64 65 5d 20 32 29 20 28 28 65 72 72 6f 72 20 28 62 79 | ".[set-auto-mode].2).((error.(by |
2ac0 | 74 65 2d 63 6f 64 65 20 22 c1 c2 c3 08 21 5c 22 87 22 20 5b 65 72 72 20 6d 65 73 73 61 67 65 20 | te-code."....!\".".[err.message. |
2ae0 | 22 46 69 6c 65 20 6d 6f 64 65 20 73 70 65 63 69 66 69 63 61 74 69 6f 6e 20 65 72 72 6f 72 3a 20 | "File.mode.specification.error:. |
2b00 | 25 73 22 20 70 72 69 6e 31 2d 74 6f 2d 73 74 72 69 6e 67 5d 20 34 29 29 29 20 28 62 79 74 65 2d | %s".prin1-to-string].4))).(byte- |
2b20 | 63 6f 64 65 20 22 c1 08 3f 21 87 22 20 5b 66 69 6e 64 2d 66 69 6c 65 20 68 61 63 6b 2d 6c 6f 63 | code."..?!.".[find-file.hack-loc |
2b40 | 61 6c 2d 76 61 72 69 61 62 6c 65 73 5d 20 32 29 20 28 28 65 72 72 6f 72 20 28 62 79 74 65 2d 63 | al-variables].2).((error.(byte-c |
2b60 | 6f 64 65 20 22 c1 c2 c3 08 21 5c 22 87 22 20 5b 65 72 72 20 6d 65 73 73 61 67 65 20 22 46 69 6c | ode."....!\".".[err.message."Fil |
2b80 | 65 20 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 65 72 72 6f 72 3a 20 25 73 22 20 70 72 69 | e.local-variables.error:.%s".pri |
2ba0 | 6e 31 2d 74 6f 2d 73 74 72 69 6e 67 5d 20 34 29 29 29 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 | n1-to-string].4)))].4))..(defun. |
2bc0 | 73 65 74 2d 61 75 74 6f 2d 6d 6f 64 65 20 6e 69 6c 20 22 5c 0a 53 65 6c 65 63 74 20 6d 61 6a 6f | set-auto-mode.nil."\.Select.majo |
2be0 | 72 20 6d 6f 64 65 20 61 70 70 72 6f 70 72 69 61 74 65 20 66 6f 72 20 63 75 72 72 65 6e 74 20 62 | r.mode.appropriate.for.current.b |
2c00 | 75 66 66 65 72 2e 0a 4d 61 79 20 62 61 73 65 20 64 65 63 69 73 69 6f 6e 20 6f 6e 20 76 69 73 69 | uffer..May.base.decision.on.visi |
2c20 | 74 65 64 20 66 69 6c 65 20 6e 61 6d 65 20 28 53 65 65 20 76 61 72 69 61 62 6c 65 20 20 61 75 74 | ted.file.name.(See.variable..aut |
2c40 | 6f 2d 6d 6f 64 65 2d 6c 69 73 74 29 0a 6f 72 20 6f 6e 20 62 75 66 66 65 72 20 63 6f 6e 74 65 6e | o-mode-list).or.on.buffer.conten |
2c60 | 74 73 20 28 2d 2a 2d 20 6c 69 6e 65 20 6f 72 20 6c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 73 20 | ts.(-*-.line.or.local.variables. |
2c80 | 73 70 65 63 29 2c 20 62 75 74 20 64 6f 65 73 20 6e 6f 74 20 6c 6f 6f 6b 0a 66 6f 72 20 74 68 65 | spec),.but.does.not.look.for.the |
2ca0 | 20 5c 22 6d 6f 64 65 3a 5c 22 20 6c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 2e 20 20 46 6f 72 20 | .\"mode:\".local.variable...For. |
2cc0 | 74 68 61 74 2c 20 75 73 65 20 20 68 61 63 6b 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 2e | that,.use..hack-local-variables. |
2ce0 | 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 ca ca ca 1a 19 18 8a 65 62 88 cb cc 21 88 cd ce 8a cf | ".(byte-code.".......eb...!..... |
2d00 | 20 88 60 29 c3 23 85 81 00 cb d0 21 88 60 89 10 88 cd ce 8a cf 20 88 60 29 c3 23 85 81 00 d1 d2 | ..`).#.....!.`.........`).#..... |
2d20 | 21 88 d3 d0 21 88 60 89 11 88 08 62 88 cd d4 09 c3 23 83 7b 00 08 62 88 c3 1c cd d5 09 c3 23 29 | !...!.`....b.....#.{..b.......#) |
2d40 | 85 78 00 cb d0 21 88 60 89 10 88 cd d6 09 c3 23 83 6b 00 d1 d7 21 82 6d 00 09 62 88 d3 d0 21 88 | .x...!.`.......#.k...!.m..b...!. |
2d60 | d8 08 60 5c 22 89 12 82 81 00 d8 08 09 5c 22 89 12 83 90 00 d9 da db 0a 21 dc 50 21 21 82 cf 00 | ..`\"........\".........!.P!!... |
2d80 | 0e 06 0e 08 1e 07 1d 0e 09 dd 3d 1c de 0e 07 21 89 16 07 88 0a 3f 85 aa 00 0d 85 c5 00 df 0d 40 | ..........=....!.....?.........@ |
2da0 | 40 0e 07 5c 22 85 bc 00 0d 40 41 89 12 88 0d 41 89 15 88 82 a4 00 29 88 0a 85 ce 00 d9 0a 21 2a | @..\"....@A....A......).......!* |
2dc0 | 29 2b 87 22 20 5b 62 65 67 20 65 6e 64 20 6d 6f 64 65 20 74 20 63 61 73 65 2d 66 6f 6c 64 2d 73 | )+.".[beg.end.mode.t.case-fold-s |
2de0 | 65 61 72 63 68 20 61 6c 69 73 74 20 61 75 74 6f 2d 6d 6f 64 65 2d 61 6c 69 73 74 20 6e 61 6d 65 | earch.alist.auto-mode-alist.name |
2e00 | 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 73 79 73 74 65 6d 2d 74 79 70 65 20 6e 69 | .buffer-file-name.system-type.ni |
2e20 | 6c 20 73 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 20 09 0a 22 20 73 65 61 72 63 | l.skip-chars-forward."...".searc |
2e40 | 68 2d 66 6f 72 77 61 72 64 20 22 2d 2a 2d 22 20 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 22 20 09 22 | h-forward."-*-".end-of-line.".." |
2e60 | 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d 33 20 73 6b 69 70 2d 63 68 61 72 73 2d 62 61 63 6b | .forward-char.-3.skip-chars-back |
2e80 | 77 61 72 64 20 22 3a 22 20 22 6d 6f 64 65 3a 22 20 22 3b 22 20 2d 31 20 62 75 66 66 65 72 2d 73 | ward.":"."mode:".";".-1.buffer-s |
2ea0 | 75 62 73 74 72 69 6e 67 20 66 75 6e 63 61 6c 6c 20 69 6e 74 65 72 6e 20 64 6f 77 6e 63 61 73 65 | ubstring.funcall.intern.downcase |
2ec0 | 20 22 2d 6d 6f 64 65 22 20 76 61 78 2d 76 6d 73 20 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d | ."-mode".vax-vms.file-name-sans- |
2ee0 | 76 65 72 73 69 6f 6e 73 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 5d 20 32 34 29 29 0a 0a 28 64 65 | versions.string-match].24))..(de |
2f00 | 66 75 6e 20 68 61 63 6b 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 28 26 6f 70 74 69 6f | fun.hack-local-variables.(&optio |
2f20 | 6e 61 6c 20 66 6f 72 63 65 29 20 22 5c 0a 50 61 72 73 65 2c 20 61 6e 64 20 62 69 6e 64 20 6f 72 | nal.force)."\.Parse,.and.bind.or |
2f40 | 20 65 76 61 6c 75 61 74 65 20 61 73 20 61 70 70 72 6f 70 72 69 61 74 65 2c 20 61 6e 79 20 6c 6f | .evaluate.as.appropriate,.any.lo |
2f60 | 63 61 6c 20 76 61 72 69 61 62 6c 65 73 0a 66 6f 72 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 | cal.variables.for.current.buffer |
2f80 | 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 8a 64 62 88 d0 d1 64 d2 5a 65 5d d3 23 88 c1 18 d4 | .".(byte-code.".db...d.Ze].#.... |
2fa0 | d5 c2 c1 23 85 23 00 0b 3f 86 23 00 0c 86 23 00 d6 8b 29 85 70 01 c1 c2 c2 c2 c2 1e 0a 1e 09 1e | ...#.#..?.#...#...).p........... |
2fc0 | 08 1e 07 1e 06 d7 d8 21 88 6c 86 48 00 d9 60 da 20 88 60 5c 22 89 16 09 88 db dc 21 62 88 6e 86 | .......!.l.H..`...`\"......!b.n. |
2fe0 | 5c 5c 00 d9 60 dd 20 88 60 5c 22 89 16 07 88 0e 07 85 6e 00 0e 07 47 16 08 de 0e 07 21 89 16 07 | \\..`...`\".......n...G.....!... |
3000 | 88 0e 09 85 7d 00 de 0e 09 21 df 50 89 16 09 88 0e 06 85 6f 01 0e 0b 83 8e 00 e0 e1 21 82 91 00 | ....}....!.P.......o........!... |
3020 | e2 e3 21 88 0e 07 85 a8 00 e4 0e 07 21 83 a5 00 e5 0e 08 21 82 a8 00 e6 e7 21 88 d7 d8 21 88 60 | ..!.........!......!.....!...!.` |
3040 | 89 16 0a 88 d7 e8 21 88 6c 85 bd 00 e6 e9 21 88 ea d8 21 88 d9 0e 0a 60 5c 22 1e 0c eb 0e 0c 21 | ......!.l.....!...!....`\".....! |
3060 | 1e 0d c2 1e 0e ec ed 0e 0c 21 ee 5c 22 83 e3 00 c2 89 16 06 82 6a 01 d7 ef 21 88 e5 e3 21 88 eb | .........!.\"........j...!...!.. |
3080 | 70 21 89 16 0e 88 ea f0 21 88 d7 d8 21 88 0e 09 83 06 01 e4 0e 09 21 82 07 01 6c 86 0d 01 e6 f1 | p!......!...!.........!...l..... |
30a0 | 21 88 0e 0d f2 3d 83 24 01 f3 f4 ed f5 0e 0e 21 21 f6 50 21 21 82 6a 01 0e 0d c4 3d 83 2f 01 c2 | !....=.$.......!!.P!!.j....=./.. |
30c0 | 82 6a 01 0e 0d cf 3d 83 3a 01 c2 82 6a 01 0e 0d f7 3d 83 60 01 0e 0f 85 48 01 0c 3f 86 50 01 f8 | .j....=.:...j....=.`....H..?.P.. |
30e0 | f9 20 fa 5c 22 83 59 01 fb fc 21 82 5d 01 f7 0e 0e 21 82 6a 01 fd 0e 0d 21 88 0e 0d 0e 0e 4c 2b | ...\".Y...!.]....!.j....!.....L+ |
3100 | 88 82 7e 00 2d 29 87 22 20 5b 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 74 20 6e 69 6c | ..~.-).".[case-fold-search.t.nil |
3120 | 20 69 6e 68 69 62 69 74 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 66 6f 72 63 65 20 62 | .inhibit-local-variables.force.b |
3140 | 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 63 6f 6e 74 69 6e 75 65 20 70 72 65 66 69 78 20 | uffer-file-name.continue.prefix. |
3160 | 70 72 65 66 69 78 6c 65 6e 20 73 75 66 66 69 78 20 62 65 67 20 73 65 6c 65 63 74 69 76 65 2d 64 | prefixlen.suffix.beg.selective-d |
3180 | 69 73 70 6c 61 79 20 73 74 72 20 76 61 72 20 76 61 6c 20 69 67 6e 6f 72 65 2d 6c 6f 63 61 6c 2d | isplay.str.var.val.ignore-local- |
31a0 | 65 76 61 6c 20 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 22 0a 0c 22 20 33 30 30 30 20 6d | eval.search-backward."..".3000.m |
31c0 | 6f 76 65 20 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 4c 6f 63 61 6c 20 56 61 72 69 61 62 | ove.search-forward."Local.Variab |
31e0 | 6c 65 73 3a 22 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 70 21 88 8a c2 20 88 c3 c4 20 60 5c | les:".((byte-code.".p!........`\ |
3200 | 22 29 88 c5 c6 c7 c8 08 21 5c 22 21 87 22 20 5b 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 | ")......!\"!.".[buffer-file-name |
3220 | 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c | .switch-to-buffer.beginning-of-l |
3240 | 69 6e 65 20 73 65 74 2d 77 69 6e 64 6f 77 2d 73 74 61 72 74 20 73 65 6c 65 63 74 65 64 2d 77 69 | ine.set-window-start.selected-wi |
3260 | 6e 64 6f 77 20 79 2d 6f 72 2d 6e 2d 70 20 66 6f 72 6d 61 74 20 22 53 65 74 20 6c 6f 63 61 6c 20 | ndow.y-or-n-p.format."Set.local. |
3280 | 76 61 72 69 61 62 6c 65 73 20 61 73 20 73 70 65 63 69 66 69 65 64 20 61 74 20 65 6e 64 20 6f 66 | variables.as.specified.at.end.of |
32a0 | 20 25 73 3f 20 22 20 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 5d 20 39 | .%s?.".file-name-nondirectory].9 |
32c0 | 29 29 20 73 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 20 09 22 20 62 75 66 66 65 | )).skip-chars-forward."..".buffe |
32e0 | 72 2d 73 75 62 73 74 72 69 6e 67 20 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 6d 61 74 63 68 2d 62 65 | r-substring.end-of-line.match-be |
3300 | 67 69 6e 6e 69 6e 67 20 30 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 72 65 67 65 | ginning.0.beginning-of-line.rege |
3320 | 78 70 2d 71 75 6f 74 65 20 22 24 22 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 | xp-quote."$".re-search-forward." |
3340 | 5b 0a 0d 5d 22 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 | [..]".forward-line.1.looking-at. |
3360 | 66 6f 72 77 61 72 64 2d 63 68 61 72 20 65 72 72 6f 72 20 22 4c 6f 63 61 6c 20 76 61 72 69 61 62 | forward-char.error."Local.variab |
3380 | 6c 65 73 20 65 6e 74 72 79 20 69 73 20 6d 69 73 73 69 6e 67 20 74 68 65 20 70 72 65 66 69 78 22 | les.entry.is.missing.the.prefix" |
33a0 | 20 22 5e 3a 0a 22 20 22 4d 69 73 73 69 6e 67 20 63 6f 6c 6f 6e 20 69 6e 20 6c 6f 63 61 6c 20 76 | ."^:."."Missing.colon.in.local.v |
33c0 | 61 72 69 61 62 6c 65 73 20 65 6e 74 72 79 22 20 73 6b 69 70 2d 63 68 61 72 73 2d 62 61 63 6b 77 | ariables.entry".skip-chars-backw |
33e0 | 61 72 64 20 72 65 61 64 20 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 64 6f 77 6e 63 61 73 65 20 22 | ard.read.string-equal.downcase." |
3400 | 65 6e 64 22 20 22 5e 3a 22 20 22 0a 22 20 22 4c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 73 20 65 | end"."^:"."."."Local.variables.e |
3420 | 6e 74 72 79 20 69 73 20 74 65 72 6d 69 6e 61 74 65 64 20 69 6e 63 6f 72 72 65 63 74 6c 79 22 20 | ntry.is.terminated.incorrectly". |
3440 | 6d 6f 64 65 20 66 75 6e 63 61 6c 6c 20 69 6e 74 65 72 6e 20 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 | mode.funcall.intern.symbol-name. |
3460 | 22 2d 6d 6f 64 65 22 20 65 76 61 6c 20 73 74 72 69 6e 67 3d 20 75 73 65 72 2d 6c 6f 67 69 6e 2d | "-mode".eval.string=.user-login- |
3480 | 6e 61 6d 65 20 22 72 6f 6f 74 22 20 6d 65 73 73 61 67 65 20 22 49 67 6e 6f 72 69 6e 67 20 60 65 | name."root".message."Ignoring.`e |
34a0 | 76 61 6c 3a 27 20 69 6e 20 66 69 6c 65 27 73 20 6c 6f 63 61 6c 20 76 61 72 69 61 62 6c 65 73 22 | val:'.in.file's.local.variables" |
34c0 | 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 5d 20 34 32 29 29 0a 0a 28 64 65 66 | .make-local-variable].42))..(def |
34e0 | 75 6e 20 73 65 74 2d 76 69 73 69 74 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 66 69 6c 65 6e 61 | un.set-visited-file-name.(filena |
3500 | 6d 65 29 20 22 5c 0a 43 68 61 6e 67 65 20 6e 61 6d 65 20 6f 66 20 66 69 6c 65 20 76 69 73 69 74 | me)."\.Change.name.of.file.visit |
3520 | 65 64 20 69 6e 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 74 6f 20 46 49 4c 45 4e 41 4d 45 | ed.in.current.buffer.to.FILENAME |
3540 | 2e 0a 54 68 65 20 6e 65 78 74 20 74 69 6d 65 20 74 68 65 20 62 75 66 66 65 72 20 69 73 20 73 61 | ..The.next.time.the.buffer.is.sa |
3560 | 76 65 64 20 69 74 20 77 69 6c 6c 20 67 6f 20 69 6e 20 74 68 65 20 6e 65 77 6c 79 20 73 70 65 63 | ved.it.will.go.in.the.newly.spec |
3580 | 69 66 69 65 64 20 66 69 6c 65 2e 0a 6e 69 6c 20 6f 72 20 65 6d 70 74 79 20 73 74 72 69 6e 67 20 | ified.file..nil.or.empty.string. |
35a0 | 61 73 20 61 72 67 75 6d 65 6e 74 20 6d 65 61 6e 73 20 6d 61 6b 65 20 62 75 66 66 65 72 20 6e 6f | as.argument.means.make.buffer.no |
35c0 | 74 20 62 65 20 76 69 73 69 74 69 6e 67 20 61 6e 79 20 66 69 6c 65 2e 0a 52 65 6d 65 6d 62 65 72 | t.be.visiting.any.file..Remember |
35e0 | 20 74 6f 20 64 65 6c 65 74 65 20 74 68 65 20 69 6e 69 74 69 61 6c 20 63 6f 6e 74 65 6e 74 73 20 | .to.delete.the.initial.contents. |
3600 | 6f 66 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 0a 69 66 20 79 6f 75 20 77 69 73 68 20 74 6f | of.the.minibuffer.if.you.wish.to |
3620 | 20 70 61 73 73 20 61 6e 20 65 6d 70 74 79 20 73 74 72 69 6e 67 20 61 73 20 74 68 65 20 61 72 67 | .pass.an.empty.string.as.the.arg |
3640 | 75 6d 65 6e 74 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 46 53 65 74 20 76 69 73 69 74 | ument.".(interactive."FSet.visit |
3660 | 65 64 20 66 69 6c 65 20 6e 61 6d 65 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 08 | ed.file.name:.").(byte-code."... |
3680 | 85 16 00 ca 08 cb 5c 22 83 11 00 c1 82 14 00 cc 08 21 89 10 88 cd 08 0a 5c 22 86 29 00 08 3f 86 | ......\".........!......\".)..?. |
36a0 | 29 00 ce 08 21 88 cf 20 88 08 83 6b 00 d0 08 21 1b d1 0b cb 5c 22 85 3c 00 d2 d3 21 88 d4 08 21 | )...!......k...!....\".<...!...! |
36c0 | 85 47 00 d2 d5 08 5c 22 88 0c d6 3d 85 53 00 d7 0b 21 89 13 88 08 89 12 88 d8 0a 21 89 15 88 d9 | .G....\"...=.S...!.........!.... |
36e0 | 0b 21 86 67 00 da 0b 21 29 82 6e 00 c1 89 12 88 c1 89 16 06 88 db 20 88 dc dd 21 88 dc de 21 88 | .!.g...!).n...............!...!. |
3700 | 0e 07 83 89 00 df 20 82 91 00 e0 0a 85 90 00 0e 08 21 88 0a 85 99 00 e1 c9 21 87 22 20 5b 66 69 | .................!.......!.".[fi |
3720 | 6c 65 6e 61 6d 65 20 6e 69 6c 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e 65 77 2d | lename.nil.buffer-file-name.new- |
3740 | 6e 61 6d 65 20 73 79 73 74 65 6d 2d 74 79 70 65 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f | name.system-type.default-directo |
3760 | 72 79 20 62 75 66 66 65 72 2d 62 61 63 6b 65 64 2d 75 70 20 62 75 66 66 65 72 2d 61 75 74 6f 2d | ry.buffer-backed-up.buffer-auto- |
3780 | 73 61 76 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 61 75 74 6f 2d 73 61 76 65 2d 64 65 66 61 75 6c 74 | save-file-name.auto-save-default |
37a0 | 20 74 20 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 22 22 20 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e | .t.string-equal."".expand-file-n |
37c0 | 61 6d 65 20 65 71 75 61 6c 20 6c 6f 63 6b 2d 62 75 66 66 65 72 20 75 6e 6c 6f 63 6b 2d 62 75 66 | ame.equal.lock-buffer.unlock-buf |
37e0 | 66 65 72 20 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 73 74 72 69 6e | fer.file-name-nondirectory.strin |
3800 | 67 3d 20 65 72 72 6f 72 20 22 45 6d 70 74 79 20 66 69 6c 65 20 6e 61 6d 65 22 20 66 69 6c 65 2d | g=.error."Empty.file.name".file- |
3820 | 64 69 72 65 63 74 6f 72 79 2d 70 20 22 46 69 6c 65 20 25 73 20 69 73 20 61 20 64 69 72 65 63 74 | directory-p."File.%s.is.a.direct |
3840 | 6f 72 79 22 20 76 61 78 2d 76 6d 73 20 64 6f 77 6e 63 61 73 65 20 66 69 6c 65 2d 6e 61 6d 65 2d | ory".vax-vms.downcase.file-name- |
3860 | 64 69 72 65 63 74 6f 72 79 20 67 65 74 2d 62 75 66 66 65 72 20 72 65 6e 61 6d 65 2d 62 75 66 66 | directory.get-buffer.rename-buff |
3880 | 65 72 20 63 6c 65 61 72 2d 76 69 73 69 74 65 64 2d 66 69 6c 65 2d 6d 6f 64 74 69 6d 65 20 6b 69 | er.clear-visited-file-modtime.ki |
38a0 | 6c 6c 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 77 72 69 74 65 2d 66 69 6c 65 2d 68 6f 6f | ll-local-variable.write-file-hoo |
38c0 | 6b 73 20 72 65 76 65 72 74 2d 62 75 66 66 65 72 2d 66 75 6e 63 74 69 6f 6e 20 72 65 6e 61 6d 65 | ks.revert-buffer-function.rename |
38e0 | 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 20 61 75 74 6f 2d 73 61 76 65 2d 6d 6f 64 65 20 73 | -auto-save-file.auto-save-mode.s |
3900 | 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 5d 20 32 31 29 29 0a 0a 28 64 65 66 | et-buffer-modified-p].21))..(def |
3920 | 75 6e 20 77 72 69 74 65 2d 66 69 6c 65 20 28 66 69 6c 65 6e 61 6d 65 29 20 22 5c 0a 57 72 69 74 | un.write-file.(filename)."\.Writ |
3940 | 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 69 6e 74 6f 20 66 69 6c 65 20 46 49 4c 45 4e | e.current.buffer.into.file.FILEN |
3960 | 41 4d 45 2e 0a 4d 61 6b 65 73 20 62 75 66 66 65 72 20 76 69 73 69 74 20 74 68 61 74 20 66 69 6c | AME..Makes.buffer.visit.that.fil |
3980 | 65 2c 20 61 6e 64 20 6d 61 72 6b 73 20 69 74 20 6e 6f 74 20 6d 6f 64 69 66 69 65 64 2e 22 20 28 | e,.and.marks.it.not.modified.".( |
39a0 | 69 6e 74 65 72 61 63 74 69 76 65 20 22 46 57 72 69 74 65 20 66 69 6c 65 3a 20 22 29 20 28 62 79 | interactive."FWrite.file:.").(by |
39c0 | 74 65 2d 63 6f 64 65 20 22 c2 88 08 3f 86 11 00 c3 08 c4 5c 22 86 11 00 c5 08 21 88 c6 c1 21 88 | te-code."...?......\".....!...!. |
39e0 | c7 20 87 22 20 5b 66 69 6c 65 6e 61 6d 65 20 74 20 6e 69 6c 20 73 74 72 69 6e 67 2d 65 71 75 61 | ...".[filename.t.nil.string-equa |
3a00 | 6c 20 22 22 20 73 65 74 2d 76 69 73 69 74 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 73 65 74 2d 62 | l."".set-visited-file-name.set-b |
3a20 | 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 73 61 76 65 2d 62 75 66 66 65 72 5d 20 35 29 | uffer-modified-p.save-buffer].5) |
3a40 | 29 0a 0a 28 64 65 66 75 6e 20 62 61 63 6b 75 70 2d 62 75 66 66 65 72 20 6e 69 6c 20 22 5c 0a 4d | )..(defun.backup-buffer.nil."\.M |
3a60 | 61 6b 65 20 61 20 62 61 63 6b 75 70 20 6f 66 20 74 68 65 20 64 69 73 6b 20 66 69 6c 65 20 76 69 | ake.a.backup.of.the.disk.file.vi |
3a80 | 73 69 74 65 64 20 62 79 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2c 20 69 66 20 | sited.by.the.current.buffer,.if. |
3aa0 | 61 70 70 72 6f 70 72 69 61 74 65 2e 0a 54 68 69 73 20 69 73 20 6e 6f 72 6d 61 6c 6c 79 20 64 6f | appropriate..This.is.normally.do |
3ac0 | 6e 65 20 62 65 66 6f 72 65 20 73 61 76 69 6e 67 20 74 68 65 20 62 75 66 66 65 72 20 74 68 65 20 | ne.before.saving.the.buffer.the. |
3ae0 | 66 69 72 73 74 20 74 69 6d 65 2e 0a 49 66 20 74 68 65 20 76 61 6c 75 65 20 69 73 20 6e 6f 6e 2d | first.time..If.the.value.is.non- |
3b00 | 6e 69 6c 2c 20 69 74 20 69 73 20 74 68 65 20 72 65 73 75 6c 74 20 6f 66 20 60 66 69 6c 65 2d 6d | nil,.it.is.the.result.of.`file-m |
3b20 | 6f 64 65 73 27 20 6f 6e 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 66 69 6c 65 3b 0a 74 68 69 73 | odes'.on.the.original.file;.this |
3b40 | 20 6d 65 61 6e 73 20 74 68 61 74 20 74 68 65 20 63 61 6c 6c 65 72 2c 20 61 66 74 65 72 20 73 61 | .means.that.the.caller,.after.sa |
3b60 | 76 69 6e 67 20 74 68 65 20 62 75 66 66 65 72 2c 20 73 68 6f 75 6c 64 20 63 68 61 6e 67 65 20 74 | ving.the.buffer,.should.change.t |
3b80 | 68 65 20 6d 6f 64 65 73 0a 6f 66 20 74 68 65 20 6e 65 77 20 66 69 6c 65 20 74 6f 20 61 67 72 65 | he.modes.of.the.new.file.to.agre |
3ba0 | 65 20 77 69 74 68 20 74 68 65 20 6f 6c 64 20 6d 6f 64 65 73 2e 22 20 28 62 79 74 65 2d 63 6f 64 | e.with.the.old.modes.".(byte-cod |
3bc0 | 65 20 22 08 85 32 00 09 3f 85 32 00 c3 0a 21 85 32 00 c4 c5 0a 21 c6 5c 22 c7 48 c8 3e 85 32 00 | e."..2..?.2...!.2....!.\".H.>.2. |
3be0 | 0a 47 c9 57 86 2b 00 ca cb 0a c7 c9 4f 5c 22 3f 85 32 00 cc cd ce 8f 87 22 20 5b 6d 61 6b 65 2d | .G.W.+......O\"?.2......".[make- |
3c00 | 62 61 63 6b 75 70 2d 66 69 6c 65 73 20 62 75 66 66 65 72 2d 62 61 63 6b 65 64 2d 75 70 20 62 75 | backup-files.buffer-backed-up.bu |
3c20 | 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 65 6c 74 | ffer-file-name.file-exists-p.elt |
3c40 | 20 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 20 38 20 30 20 28 34 35 20 31 30 38 29 20 35 20 | .file-attributes.8.0.(45.108).5. |
3c60 | 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 22 2f 74 6d 70 2f 22 20 6e 69 6c 20 28 62 79 74 65 2d 63 | string-equal."/tmp/".nil.(byte-c |
3c80 | 6f 64 65 20 22 c8 09 21 18 08 40 1a 08 41 1b c9 1c c9 ca cb 8f 88 c6 89 15 88 0b 85 24 00 0e 07 | ode."..!..@..A..............$... |
3ca0 | 86 24 00 cc cd ce 09 5c 22 21 85 38 00 0b 85 38 00 c9 cf d0 8f 88 0b 41 89 13 88 82 27 00 88 0c | .$.....\"!.8...8.......A....'... |
3cc0 | 2c 87 22 20 5b 62 61 63 6b 75 70 2d 69 6e 66 6f 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d | ,.".[backup-info.buffer-file-nam |
3ce0 | 65 20 62 61 63 6b 75 70 6e 61 6d 65 20 74 61 72 67 65 74 73 20 73 65 74 6d 6f 64 65 73 20 62 75 | e.backupname.targets.setmodes.bu |
3d00 | 66 66 65 72 2d 62 61 63 6b 65 64 2d 75 70 20 74 20 74 72 69 6d 2d 76 65 72 73 69 6f 6e 73 2d 77 | ffer-backed-up.t.trim-versions-w |
3d20 | 69 74 68 6f 75 74 2d 61 73 6b 69 6e 67 20 66 69 6e 64 2d 62 61 63 6b 75 70 2d 66 69 6c 65 2d 6e | ithout-asking.find-backup-file-n |
3d40 | 61 6d 65 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 86 30 00 c9 09 21 86 30 00 0a 86 | ame.nil.(byte-code."..0...!.0... |
3d60 | 30 00 0b 85 17 00 ca 09 21 cb 56 86 30 00 0c 85 30 00 cc 09 21 1d cd 0d 38 86 2f 00 ce cf 0d 38 | 0.......!.V.0...0...!...8./....8 |
3d80 | d0 20 5c 22 29 83 3d 00 d1 09 0e 06 c7 c7 24 82 50 00 d2 d3 d4 8f 88 d5 09 0e 06 c7 23 88 d6 0e | ..\").=.......$.P...........#... |
3da0 | 06 21 89 16 08 87 22 20 5b 66 69 6c 65 2d 70 72 65 63 69 6f 75 73 2d 66 6c 61 67 20 62 75 66 66 | .!....".[file-precious-flag.buff |
3dc0 | 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 62 61 63 6b 75 70 2d 62 79 2d 63 6f 70 79 69 6e 67 20 62 | er-file-name.backup-by-copying.b |
3de0 | 61 63 6b 75 70 2d 62 79 2d 63 6f 70 79 69 6e 67 2d 77 68 65 6e 2d 6c 69 6e 6b 65 64 20 62 61 63 | ackup-by-copying-when-linked.bac |
3e00 | 6b 75 70 2d 62 79 2d 63 6f 70 79 69 6e 67 2d 77 68 65 6e 2d 6d 69 73 6d 61 74 63 68 20 61 74 74 | kup-by-copying-when-mismatch.att |
3e20 | 72 20 62 61 63 6b 75 70 6e 61 6d 65 20 74 20 73 65 74 6d 6f 64 65 73 20 66 69 6c 65 2d 73 79 6d | r.backupname.t.setmodes.file-sym |
3e40 | 6c 69 6e 6b 2d 70 20 66 69 6c 65 2d 6e 6c 69 6e 6b 73 20 31 20 66 69 6c 65 2d 61 74 74 72 69 62 | link-p.file-nlinks.1.file-attrib |
3e60 | 75 74 65 73 20 39 20 2f 3d 20 32 20 75 73 65 72 2d 75 69 64 20 63 6f 70 79 2d 66 69 6c 65 20 6e | utes.9./=.2.user-uid.copy-file.n |
3e80 | 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21 87 22 20 5b 62 61 63 6b 75 70 6e 61 6d 65 | il.(byte-code."..!.".[backupname |
3ea0 | 20 64 65 6c 65 74 65 2d 66 69 6c 65 5d 20 32 29 20 28 28 66 69 6c 65 2d 65 72 72 6f 72 20 28 62 | .delete-file].2).((file-error.(b |
3ec0 | 79 74 65 2d 63 6f 64 65 20 22 c0 87 22 20 5b 6e 69 6c 5d 20 31 29 29 29 20 72 65 6e 61 6d 65 2d | yte-code."..".[nil].1))).rename- |
3ee0 | 66 69 6c 65 20 66 69 6c 65 2d 6d 6f 64 65 73 5d 20 31 30 29 20 28 28 66 69 6c 65 2d 65 72 72 6f | file.file-modes].10).((file-erro |
3f00 | 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 c4 21 89 10 88 c5 c6 21 88 c7 c8 21 88 c9 ca cb 8f | r.(byte-code."..!.....!...!..... |
3f20 | 88 cc 09 08 c2 c2 24 87 22 20 5b 62 61 63 6b 75 70 6e 61 6d 65 20 62 75 66 66 65 72 2d 66 69 6c | ......$.".[backupname.buffer-fil |
3f40 | 65 2d 6e 61 6d 65 20 74 20 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 7e 2f 25 62 61 | e-name.t.expand-file-name."~/%ba |
3f60 | 63 6b 75 70 25 7e 22 20 6d 65 73 73 61 67 65 20 22 43 61 6e 6e 6f 74 20 77 72 69 74 65 20 62 61 | ckup%~".message."Cannot.write.ba |
3f80 | 63 6b 75 70 20 66 69 6c 65 3b 20 62 61 63 6b 69 6e 67 20 75 70 20 69 6e 20 7e 2f 25 25 62 61 63 | ckup.file;.backing.up.in.~/%%bac |
3fa0 | 6b 75 70 25 25 7e 22 20 73 6c 65 65 70 2d 66 6f 72 20 31 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f | kup%%~".sleep-for.1.nil.(byte-co |
3fc0 | 64 65 20 22 c1 08 21 87 22 20 5b 62 61 63 6b 75 70 6e 61 6d 65 20 64 65 6c 65 74 65 2d 66 69 6c | de."..!.".[backupname.delete-fil |
3fe0 | 65 5d 20 32 29 20 28 28 66 69 6c 65 2d 65 72 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 | e].2).((file-error.(byte-code.". |
4000 | 87 22 20 5b 6e 69 6c 5d 20 31 29 29 29 20 63 6f 70 79 2d 66 69 6c 65 5d 20 38 29 29 29 20 79 2d | .".[nil].1))).copy-file].8))).y- |
4020 | 6f 72 2d 6e 2d 70 20 66 6f 72 6d 61 74 20 22 44 65 6c 65 74 65 20 65 78 63 65 73 73 20 62 61 63 | or-n-p.format."Delete.excess.bac |
4040 | 6b 75 70 20 76 65 72 73 69 6f 6e 73 20 6f 66 20 25 73 3f 20 22 20 28 62 79 74 65 2d 63 6f 64 65 | kup.versions.of.%s?.".(byte-code |
4060 | 20 22 c1 08 40 21 87 22 20 5b 74 61 72 67 65 74 73 20 64 65 6c 65 74 65 2d 66 69 6c 65 5d 20 32 | ."..@!.".[targets.delete-file].2 |
4080 | 29 20 28 28 66 69 6c 65 2d 65 72 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 87 22 20 5b | ).((file-error.(byte-code."..".[ |
40a0 | 6e 69 6c 5d 20 31 29 29 29 5d 20 37 29 20 28 28 66 69 6c 65 2d 65 72 72 6f 72 20 28 62 79 74 65 | nil].1)))].7).((file-error.(byte |
40c0 | 2d 63 6f 64 65 20 22 c0 87 22 20 5b 6e 69 6c 5d 20 31 29 29 29 5d 20 38 29 29 0a 0a 28 64 65 66 | -code."..".[nil].1)))].8))..(def |
40e0 | 75 6e 20 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d 76 65 72 73 69 6f 6e 73 20 28 6e 61 6d 65 | un.file-name-sans-versions.(name |
4100 | 29 20 22 5c 0a 52 65 74 75 72 6e 20 46 49 4c 45 4e 41 4d 45 20 73 61 6e 73 20 62 61 63 6b 75 70 | )."\.Return.FILENAME.sans.backup |
4120 | 20 76 65 72 73 69 6f 6e 73 20 6f 72 20 73 74 72 69 6e 67 73 2e 0a 54 68 69 73 20 69 73 20 61 20 | .versions.or.strings..This.is.a. |
4140 | 73 65 70 61 72 61 74 65 20 70 72 6f 63 65 64 75 72 65 20 73 6f 20 79 6f 75 72 20 73 69 74 65 2d | separate.procedure.so.your.site- |
4160 | 69 6e 69 74 20 6f 72 20 73 74 61 72 74 75 70 20 66 69 6c 65 20 63 61 6e 0a 72 65 64 65 66 69 6e | init.or.startup.file.can.redefin |
4180 | 65 20 69 74 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 c2 09 c3 3d 83 24 00 c4 c5 08 5c 22 | e.it.".(byte-code."....=.$....\" |
41a0 | 86 21 00 c4 c6 08 c4 c7 08 5c 22 23 85 21 00 c4 c8 08 c9 c2 21 23 82 28 00 c4 ca 08 5c 22 4f 87 | .!.......\"#.!......!#.(....\"O. |
41c0 | 22 20 5b 6e 61 6d 65 20 73 79 73 74 65 6d 2d 74 79 70 65 20 30 20 76 61 78 2d 76 6d 73 20 73 74 | ".[name.system-type.0.vax-vms.st |
41e0 | 72 69 6e 67 2d 6d 61 74 63 68 20 22 3b 5b 30 2d 39 5d 2a 5c 5c 27 22 20 22 5c 5c 2e 22 20 22 5b | ring-match.";[0-9]*\\'"."\\."."[ |
4200 | 5d 3e 5d 22 20 22 5c 5c 2e 5b 30 2d 39 5d 2a 5c 5c 27 22 20 6d 61 74 63 68 2d 65 6e 64 20 22 5c | ]>]"."\\.[0-9]*\\'".match-end."\ |
4220 | 5c 28 5c 5c 2e 7e 5b 30 2d 39 5d 2b 5c 5c 29 3f 7e 5c 5c 27 22 5d 20 31 30 29 29 0a 0a 28 64 65 | \(\\.~[0-9]+\\)?~\\'"].10))..(de |
4240 | 66 75 6e 20 6d 61 6b 65 2d 62 61 63 6b 75 70 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 66 69 6c 65 29 | fun.make-backup-file-name.(file) |
4260 | 20 22 5c 0a 43 72 65 61 74 65 20 74 68 65 20 6e 6f 6e 2d 6e 75 6d 65 72 69 63 20 62 61 63 6b 75 | ."\.Create.the.non-numeric.backu |
4280 | 70 20 66 69 6c 65 20 6e 61 6d 65 20 66 6f 72 20 46 49 4c 45 2e 0a 54 68 69 73 20 69 73 20 61 20 | p.file.name.for.FILE..This.is.a. |
42a0 | 73 65 70 61 72 61 74 65 20 66 75 6e 63 74 69 6f 6e 20 73 6f 20 79 6f 75 20 63 61 6e 20 72 65 64 | separate.function.so.you.can.red |
42c0 | 65 66 69 6e 65 20 69 74 20 66 6f 72 20 63 75 73 74 6f 6d 69 7a 61 74 69 6f 6e 2e 22 20 28 62 79 | efine.it.for.customization.".(by |
42e0 | 74 65 2d 63 6f 64 65 20 22 08 c1 50 87 22 20 5b 66 69 6c 65 20 22 7e 22 5d 20 32 29 29 0a 0a 28 | te-code."..P.".[file."~"].2))..( |
4300 | 64 65 66 75 6e 20 62 61 63 6b 75 70 2d 66 69 6c 65 2d 6e 61 6d 65 2d 70 20 28 66 69 6c 65 29 20 | defun.backup-file-name-p.(file). |
4320 | 22 5c 0a 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 46 49 4c 45 20 69 73 20 61 20 62 | "\.Return.non-nil.if.FILE.is.a.b |
4340 | 61 63 6b 75 70 20 66 69 6c 65 20 6e 61 6d 65 20 28 6e 75 6d 65 72 69 63 20 6f 72 20 6e 6f 74 29 | ackup.file.name.(numeric.or.not) |
4360 | 2e 0a 54 68 69 73 20 69 73 20 61 20 73 65 70 61 72 61 74 65 20 66 75 6e 63 74 69 6f 6e 20 73 6f | ..This.is.a.separate.function.so |
4380 | 20 79 6f 75 20 63 61 6e 20 72 65 64 65 66 69 6e 65 20 69 74 20 66 6f 72 20 63 75 73 74 6f 6d 69 | .you.can.redefine.it.for.customi |
43a0 | 7a 61 74 69 6f 6e 2e 0a 59 6f 75 20 6d 61 79 20 6e 65 65 64 20 74 6f 20 72 65 64 65 66 69 6e 65 | zation..You.may.need.to.redefine |
43c0 | 20 66 69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d 76 65 72 73 69 6f 6e 73 20 61 73 20 77 65 6c 6c | .file-name-sans-versions.as.well |
43e0 | 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 c2 08 5c 22 87 22 20 5b 66 69 6c 65 20 73 74 72 | .".(byte-code."...\".".[file.str |
4400 | 69 6e 67 2d 6d 61 74 63 68 20 22 7e 24 22 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 66 69 6e 64 | ing-match."~$"].3))..(defun.find |
4420 | 2d 62 61 63 6b 75 70 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 66 6e 29 20 22 5c 0a 46 69 6e 64 20 61 | -backup-file-name.(fn)."\.Find.a |
4440 | 20 66 69 6c 65 20 6e 61 6d 65 20 66 6f 72 20 61 20 62 61 63 6b 75 70 20 66 69 6c 65 2c 20 61 6e | .file.name.for.a.backup.file,.an |
4460 | 64 20 73 75 67 67 65 73 74 69 6f 6e 73 20 66 6f 72 20 64 65 6c 65 74 69 6f 6e 73 2e 0a 56 61 6c | d.suggestions.for.deletions..Val |
4480 | 75 65 20 69 73 20 61 20 6c 69 73 74 20 77 68 6f 73 65 20 63 61 72 20 69 73 20 74 68 65 20 6e 61 | ue.is.a.list.whose.car.is.the.na |
44a0 | 6d 65 20 66 6f 72 20 74 68 65 20 62 61 63 6b 75 70 20 66 69 6c 65 0a 20 61 6e 64 20 77 68 6f 73 | me.for.the.backup.file..and.whos |
44c0 | 65 20 63 64 72 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 6f 6c 64 20 76 65 72 73 69 6f 6e 73 20 | e.cdr.is.a.list.of.old.versions. |
44e0 | 74 6f 20 63 6f 6e 73 69 64 65 72 20 64 65 6c 65 74 69 6e 67 20 6e 6f 77 2e 22 20 28 62 79 74 65 | to.consider.deleting.now.".(byte |
4500 | 2d 63 6f 64 65 20 22 08 cd 3d 83 0d 00 ce 09 21 43 82 86 00 cf 09 21 d0 50 1a 0a 47 1b d1 0a d2 | -code."..=.....!C.....!.P..G.... |
4520 | 09 21 5c 22 1c d3 d4 d5 0c 5c 22 d6 5c 22 1d d7 d8 d9 0d 42 5c 22 1e 06 08 86 35 00 0e 06 d9 56 | .!\".....\".\".....B\"....5....V |
4540 | 1e 07 da 0d 47 0e 09 0e 0a db 24 1e 08 0e 07 3f 83 4f 00 ce 09 21 43 82 84 00 09 d0 dc 0e 06 54 | ....G.....$....?.O...!C........T |
4560 | 21 dd 52 0e 08 d9 56 85 68 00 de 0e 0a 0e 09 db 23 d9 59 85 83 00 d4 df e0 0e 09 0d 5c 22 1e 0b | !.R...V.h.......#.Y.........\".. |
4580 | e1 e0 0e 08 53 0e 0b 5c 22 cc 5c 22 88 0e 0b 29 5c 22 42 2e 07 87 22 20 5b 76 65 72 73 69 6f 6e | ....S..\".\"...)\"B...".[version |
45a0 | 2d 63 6f 6e 74 72 6f 6c 20 66 6e 20 62 61 73 65 2d 76 65 72 73 69 6f 6e 73 20 62 76 2d 6c 65 6e | -control.fn.base-versions.bv-len |
45c0 | 67 74 68 20 70 6f 73 73 69 62 69 6c 69 74 69 65 73 20 76 65 72 73 69 6f 6e 73 20 68 69 67 68 2d | gth.possibilities.versions.high- |
45e0 | 77 61 74 65 72 2d 6d 61 72 6b 20 64 65 73 65 72 76 65 2d 76 65 72 73 69 6f 6e 73 2d 70 20 6e 75 | water-mark.deserve-versions-p.nu |
4600 | 6d 62 65 72 2d 74 6f 2d 64 65 6c 65 74 65 20 6b 65 70 74 2d 6f 6c 64 2d 76 65 72 73 69 6f 6e 73 | mber-to-delete.kept-old-versions |
4620 | 20 6b 65 70 74 2d 6e 65 77 2d 76 65 72 73 69 6f 6e 73 20 76 20 6e 69 6c 20 6e 65 76 65 72 20 6d | .kept-new-versions.v.nil.never.m |
4640 | 61 6b 65 2d 62 61 63 6b 75 70 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 2d 6e 61 6d 65 2d 6e | ake-backup-file-name.file-name-n |
4660 | 6f 6e 64 69 72 65 63 74 6f 72 79 20 22 2e 7e 22 20 66 69 6c 65 2d 6e 61 6d 65 2d 61 6c 6c 2d 63 | ondirectory.".~".file-name-all-c |
4680 | 6f 6d 70 6c 65 74 69 6f 6e 73 20 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 73 | ompletions.file-name-directory.s |
46a0 | 6f 72 74 20 6d 61 70 63 61 72 20 62 61 63 6b 75 70 2d 65 78 74 72 61 63 74 2d 76 65 72 73 69 6f | ort.mapcar.backup-extract-versio |
46c0 | 6e 20 3c 20 61 70 70 6c 79 20 6d 61 78 20 30 20 2d 20 2d 31 20 69 6e 74 2d 74 6f 2d 73 74 72 69 | n.<.apply.max.0.-.-1.int-to-stri |
46e0 | 6e 67 20 22 7e 22 20 2b 20 28 6c 61 6d 62 64 61 20 28 6e 29 20 28 62 79 74 65 2d 63 6f 64 65 20 | ng."~".+.(lambda.(n).(byte-code. |
4700 | 22 08 c2 c3 09 21 c4 52 87 22 20 5b 66 6e 20 6e 20 22 2e 7e 22 20 69 6e 74 2d 74 6f 2d 73 74 72 | "....!.R.".[fn.n.".~".int-to-str |
4720 | 69 6e 67 20 22 7e 22 5d 20 35 29 29 20 6e 74 68 63 64 72 20 72 70 6c 61 63 64 5d 20 31 39 29 29 | ing."~"].5)).nthcdr.rplacd].19)) |
4740 | 0a 0a 28 64 65 66 75 6e 20 62 61 63 6b 75 70 2d 65 78 74 72 61 63 74 2d 76 65 72 73 69 6f 6e 20 | ..(defun.backup-extract-version. |
4760 | 28 66 6e 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 c3 08 09 23 85 0d 00 c4 c5 21 09 55 83 19 | (fn).(byte-code."....#.....!.U.. |
4780 | 00 c6 08 09 c7 4f 21 82 1a 00 c5 87 22 20 5b 66 6e 20 62 76 2d 6c 65 6e 67 74 68 20 73 74 72 69 | .....O!.....".[fn.bv-length.stri |
47a0 | 6e 67 2d 6d 61 74 63 68 20 22 5b 30 2d 39 5d 2b 7e 24 22 20 6d 61 74 63 68 2d 62 65 67 69 6e 6e | ng-match."[0-9]+~$".match-beginn |
47c0 | 69 6e 67 20 30 20 73 74 72 69 6e 67 2d 74 6f 2d 69 6e 74 20 2d 31 5d 20 36 29 29 0a 0a 28 64 65 | ing.0.string-to-int.-1].6))..(de |
47e0 | 66 75 6e 20 66 69 6c 65 2d 6e 6c 69 6e 6b 73 20 28 66 69 6c 65 6e 61 6d 65 29 20 22 5c 0a 52 65 | fun.file-nlinks.(filename)."\.Re |
4800 | 74 75 72 6e 20 6e 75 6d 62 65 72 20 6f 66 20 6e 61 6d 65 73 20 66 69 6c 65 20 46 49 4c 45 4e 41 | turn.number.of.names.file.FILENA |
4820 | 4d 45 20 68 61 73 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21 41 40 87 22 20 5b 66 69 | ME.has.".(byte-code."..!A@.".[fi |
4840 | 6c 65 6e 61 6d 65 20 66 69 6c 65 2d 61 74 74 72 69 62 75 74 65 73 5d 20 32 29 29 0a 0a 28 64 65 | lename.file-attributes].2))..(de |
4860 | 66 75 6e 20 73 61 76 65 2d 62 75 66 66 65 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 73 29 | fun.save-buffer.(&optional.args) |
4880 | 20 22 5c 0a 53 61 76 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 69 6e 20 76 69 73 69 74 | ."\.Save.current.buffer.in.visit |
48a0 | 65 64 20 66 69 6c 65 20 69 66 20 6d 6f 64 69 66 69 65 64 2e 20 20 56 65 72 73 69 6f 6e 73 20 64 | ed.file.if.modified...Versions.d |
48c0 | 65 73 63 72 69 62 65 64 20 62 65 6c 6f 77 2e 0a 0a 42 79 20 64 65 66 61 75 6c 74 2c 20 6d 61 6b | escribed.below...By.default,.mak |
48e0 | 65 73 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 76 65 72 73 69 6f 6e 20 69 6e 74 6f 20 61 20 62 | es.the.previous.version.into.a.b |
4900 | 61 63 6b 75 70 20 66 69 6c 65 0a 20 69 66 20 70 72 65 76 69 6f 75 73 6c 79 20 72 65 71 75 65 73 | ackup.file..if.previously.reques |
4920 | 74 65 64 20 6f 72 20 69 66 20 74 68 69 73 20 69 73 20 74 68 65 20 66 69 72 73 74 20 73 61 76 65 | ted.or.if.this.is.the.first.save |
4940 | 2e 0a 57 69 74 68 20 31 20 6f 72 20 33 20 5c 5c 5b 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d | ..With.1.or.3.\\[universal-argum |
4960 | 65 6e 74 5d 27 73 2c 20 6d 61 72 6b 73 20 74 68 69 73 20 76 65 72 73 69 6f 6e 0a 20 74 6f 20 62 | ent]'s,.marks.this.version..to.b |
4980 | 65 63 6f 6d 65 20 61 20 62 61 63 6b 75 70 20 77 68 65 6e 20 74 68 65 20 6e 65 78 74 20 73 61 76 | ecome.a.backup.when.the.next.sav |
49a0 | 65 20 69 73 20 64 6f 6e 65 2e 0a 57 69 74 68 20 32 20 6f 72 20 33 20 5c 5c 5b 75 6e 69 76 65 72 | e.is.done..With.2.or.3.\\[univer |
49c0 | 73 61 6c 2d 61 72 67 75 6d 65 6e 74 5d 27 73 2c 0a 20 75 6e 63 6f 6e 64 69 74 69 6f 6e 61 6c 6c | sal-argument]'s,..unconditionall |
49e0 | 79 20 6d 61 6b 65 73 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 76 65 72 73 69 6f 6e 20 69 6e 74 | y.makes.the.previous.version.int |
4a00 | 6f 20 61 20 62 61 63 6b 75 70 20 66 69 6c 65 2e 0a 57 69 74 68 20 61 72 67 75 6d 65 6e 74 20 6f | o.a.backup.file..With.argument.o |
4a20 | 66 20 30 2c 20 6e 65 76 65 72 20 6d 61 6b 65 73 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 76 65 | f.0,.never.makes.the.previous.ve |
4a40 | 72 73 69 6f 6e 20 69 6e 74 6f 20 61 20 62 61 63 6b 75 70 20 66 69 6c 65 2e 0a 0a 49 66 20 61 20 | rsion.into.a.backup.file...If.a. |
4a60 | 66 69 6c 65 27 73 20 6e 61 6d 65 20 69 73 20 46 4f 4f 2c 20 74 68 65 20 6e 61 6d 65 73 20 6f 66 | file's.name.is.FOO,.the.names.of |
4a80 | 20 69 74 73 20 6e 75 6d 62 65 72 65 64 20 62 61 63 6b 75 70 20 76 65 72 73 69 6f 6e 73 20 61 72 | .its.numbered.backup.versions.ar |
4aa0 | 65 0a 20 46 4f 4f 2e 7e 69 7e 20 66 6f 72 20 76 61 72 69 6f 75 73 20 69 6e 74 65 67 65 72 73 20 | e..FOO.~i~.for.various.integers. |
4ac0 | 69 2e 20 20 41 20 6e 6f 6e 2d 6e 75 6d 62 65 72 65 64 20 62 61 63 6b 75 70 20 66 69 6c 65 20 69 | i...A.non-numbered.backup.file.i |
4ae0 | 73 20 63 61 6c 6c 65 64 20 46 4f 4f 7e 2e 0a 4e 75 6d 65 72 69 63 20 62 61 63 6b 75 70 73 20 28 | s.called.FOO~..Numeric.backups.( |
4b00 | 72 61 74 68 65 72 20 74 68 61 6e 20 46 4f 4f 7e 29 20 77 69 6c 6c 20 62 65 20 6d 61 64 65 20 69 | rather.than.FOO~).will.be.made.i |
4b20 | 66 20 76 61 6c 75 65 20 6f 66 0a 20 60 76 65 72 73 69 6f 6e 2d 63 6f 6e 74 72 6f 6c 27 20 69 73 | f.value.of..`version-control'.is |
4b40 | 20 6e 6f 74 20 74 68 65 20 61 74 6f 6d 20 60 6e 65 76 65 72 27 20 61 6e 64 20 65 69 74 68 65 72 | .not.the.atom.`never'.and.either |
4b60 | 20 74 68 65 72 65 20 61 72 65 20 61 6c 72 65 61 64 79 0a 20 6e 75 6d 65 72 69 63 20 76 65 72 73 | .there.are.already..numeric.vers |
4b80 | 69 6f 6e 73 20 6f 66 20 74 68 65 20 66 69 6c 65 20 62 65 69 6e 67 20 62 61 63 6b 65 64 20 75 70 | ions.of.the.file.being.backed.up |
4ba0 | 2c 20 6f 72 20 60 76 65 72 73 69 6f 6e 2d 63 6f 6e 74 72 6f 6c 27 20 69 73 0a 20 6e 6f 6e 2d 6e | ,.or.`version-control'.is..non-n |
4bc0 | 69 6c 2e 0a 57 65 20 64 6f 6e 27 74 20 77 61 6e 74 20 65 78 63 65 73 73 69 76 65 20 76 65 72 73 | il..We.don't.want.excessive.vers |
4be0 | 69 6f 6e 73 20 70 69 6c 69 6e 67 20 75 70 2c 20 73 6f 20 74 68 65 72 65 20 61 72 65 20 76 61 72 | ions.piling.up,.so.there.are.var |
4c00 | 69 61 62 6c 65 73 0a 20 60 6b 65 70 74 2d 6f 6c 64 2d 76 65 72 73 69 6f 6e 73 27 2c 20 77 68 69 | iables..`kept-old-versions',.whi |
4c20 | 63 68 20 74 65 6c 6c 73 20 45 6d 61 63 73 20 68 6f 77 20 6d 61 6e 79 20 6f 6c 64 65 73 74 20 76 | ch.tells.Emacs.how.many.oldest.v |
4c40 | 65 72 73 69 6f 6e 73 20 74 6f 20 6b 65 65 70 2c 0a 20 61 6e 64 20 60 6b 65 70 74 2d 6e 65 77 2d | ersions.to.keep,..and.`kept-new- |
4c60 | 76 65 72 73 69 6f 6e 73 27 2c 20 77 68 69 63 68 20 74 65 6c 6c 73 20 68 6f 77 20 6d 61 6e 79 20 | versions',.which.tells.how.many. |
4c80 | 6e 65 77 65 73 74 20 76 65 72 73 69 6f 6e 73 20 74 6f 20 6b 65 65 70 2e 0a 20 44 65 66 61 75 6c | newest.versions.to.keep...Defaul |
4ca0 | 74 73 20 61 72 65 20 32 20 6f 6c 64 20 76 65 72 73 69 6f 6e 73 20 61 6e 64 20 32 20 6e 65 77 2e | ts.are.2.old.versions.and.2.new. |
4cc0 | 0a 60 64 69 72 65 64 2d 6b 65 70 74 2d 76 65 72 73 69 6f 6e 73 27 20 63 6f 6e 74 72 6f 6c 73 20 | .`dired-kept-versions'.controls. |
4ce0 | 64 69 72 65 64 27 73 20 63 6c 65 61 6e 2d 64 69 72 65 63 74 6f 72 79 20 28 2e 29 20 63 6f 6d 6d | dired's.clean-directory.(.).comm |
4d00 | 61 6e 64 2e 0a 49 66 20 60 74 72 69 6d 2d 76 65 72 73 69 6f 6e 73 2d 77 69 74 68 6f 75 74 2d 61 | and..If.`trim-versions-without-a |
4d20 | 73 6b 69 6e 67 27 20 69 73 20 6e 69 6c 2c 20 73 79 73 74 65 6d 20 77 69 6c 6c 20 71 75 65 72 79 | sking'.is.nil,.system.will.query |
4d40 | 20 75 73 65 72 0a 20 62 65 66 6f 72 65 20 74 72 69 6d 6d 69 6e 67 20 76 65 72 73 69 6f 6e 73 2e | .user..before.trimming.versions. |
4d60 | 20 20 4f 74 68 65 72 77 69 73 65 20 69 74 20 64 6f 65 73 20 69 74 20 73 69 6c 65 6e 74 6c 79 2e | ..Otherwise.it.does.it.silently. |
4d80 | 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 | ".(interactive."p").(byte-code." |
4da0 | c5 88 c6 20 c7 20 c8 56 0a 85 10 00 0b c9 3d 3f 1a 19 18 08 85 20 00 0b ca 3e 85 20 00 c5 89 14 | .......V......=?.........>...... |
4dc0 | 88 08 85 26 00 09 85 2e 00 cb cc cd 20 5c 22 88 ce 20 88 08 85 3f 00 0b cf 3e 85 3f 00 c5 89 14 | ...&.........\"......?...>.?.... |
4de0 | 2b 87 22 20 5b 6d 6f 64 70 20 6c 61 72 67 65 20 6d 61 6b 65 2d 62 61 63 6b 75 70 2d 66 69 6c 65 | +.".[modp.large.make-backup-file |
4e00 | 73 20 61 72 67 73 20 62 75 66 66 65 72 2d 62 61 63 6b 65 64 2d 75 70 20 6e 69 6c 20 62 75 66 66 | s.args.buffer-backed-up.nil.buff |
4e20 | 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 62 75 66 66 65 72 2d 73 69 7a 65 20 35 30 30 30 30 20 | er-modified-p.buffer-size.50000. |
4e40 | 30 20 28 31 36 20 36 34 29 20 6d 65 73 73 61 67 65 20 22 53 61 76 69 6e 67 20 66 69 6c 65 20 25 | 0.(16.64).message."Saving.file.% |
4e60 | 73 2e 2e 2e 22 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 62 61 73 69 63 2d 73 61 76 | s...".buffer-file-name.basic-sav |
4e80 | 65 2d 62 75 66 66 65 72 20 28 34 20 36 34 29 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 64 65 6c | e-buffer.(4.64)].7))..(defun.del |
4ea0 | 65 74 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 69 66 2d 6e 65 63 65 73 73 61 72 79 20 | ete-auto-save-file-if-necessary. |
4ec0 | 6e 69 6c 20 22 5c 0a 44 65 6c 65 74 65 20 74 68 65 20 61 75 74 6f 2d 73 61 76 65 20 66 69 6c 65 | nil."\.Delete.the.auto-save.file |
4ee0 | 6e 61 6d 65 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 28 69 66 20 | name.for.the.current.buffer.(if. |
4f00 | 69 74 20 68 61 73 20 6f 6e 65 29 0a 69 66 20 76 61 72 69 61 62 6c 65 20 20 64 65 6c 65 74 65 2d | it.has.one).if.variable..delete- |
4f20 | 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 73 20 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 22 20 28 62 | auto-save-files..is.non-nil.".(b |
4f40 | 79 74 65 2d 63 6f 64 65 20 22 08 85 17 00 09 85 17 00 c3 0a 08 5c 22 3f 85 17 00 c4 c5 c6 8f 88 | yte-code."...........\"?........ |
4f60 | c7 20 87 22 20 5b 62 75 66 66 65 72 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 6e 61 6d 65 | ...".[buffer-auto-save-file-name |
4f80 | 20 64 65 6c 65 74 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 73 20 62 75 66 66 65 72 2d 66 | .delete-auto-save-files.buffer-f |
4fa0 | 69 6c 65 2d 6e 61 6d 65 20 73 74 72 69 6e 67 3d 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 | ile-name.string=.nil.(byte-code. |
4fc0 | 22 c1 08 21 87 22 20 5b 62 75 66 66 65 72 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 6e 61 | "..!.".[buffer-auto-save-file-na |
4fe0 | 6d 65 20 64 65 6c 65 74 65 2d 66 69 6c 65 5d 20 32 29 20 28 28 66 69 6c 65 2d 65 72 72 6f 72 20 | me.delete-file].2).((file-error. |
5000 | 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 87 22 20 5b 6e 69 6c 5d 20 31 29 29 29 20 73 65 74 2d 62 | (byte-code."..".[nil].1))).set-b |
5020 | 75 66 66 65 72 2d 61 75 74 6f 2d 73 61 76 65 64 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 62 61 | uffer-auto-saved].4))..(defun.ba |
5040 | 73 69 63 2d 73 61 76 65 2d 62 75 66 66 65 72 20 6e 69 6c 20 22 5c 0a 53 61 76 65 20 74 68 65 20 | sic-save-buffer.nil."\.Save.the. |
5060 | 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 69 6e 20 69 74 73 20 76 69 73 69 74 65 64 20 66 69 | current.buffer.in.its.visited.fi |
5080 | 6c 65 2c 20 69 66 20 69 74 20 68 61 73 20 62 65 65 6e 20 6d 6f 64 69 66 69 65 64 2e 22 20 28 69 | le,.if.it.has.been.modified.".(i |
50a0 | 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 88 d1 20 83 27 01 c3 | nteractive).(byte-code.".....'.. |
50c0 | c3 19 18 0a 86 1f 00 d2 d3 d4 21 c3 5c 22 12 d5 0a 21 89 14 88 d6 0d 21 88 d7 0a 21 3f 85 3b 00 | ..........!.\"...!.....!...!?.;. |
50e0 | d8 d9 da db 0a 21 5c 22 21 83 38 00 c6 89 11 82 3b 00 dc dd 21 88 de 70 21 86 52 00 df 0a 21 3f | .....!\"!.8.....;...!..p!.R...!? |
5100 | 86 52 00 d8 e0 21 86 52 00 dc e1 21 88 0e 07 86 5c 5c 00 e2 20 89 10 88 8c e3 20 88 64 e4 56 85 | .R...!.R...!....\\..........d.V. |
5120 | 8d 00 e5 64 53 66 e6 5c 22 85 8d 00 0e 08 c6 3d 86 83 00 0e 08 85 83 00 d8 d9 e7 e8 20 5c 22 21 | ...dSf.\"......=.............\"! |
5140 | 85 8d 00 8a 64 62 88 e6 63 29 88 0e 0a c3 1e 0b 1e 09 0e 09 85 a3 00 e9 0e 09 40 21 89 16 0b 3f | ....db..c)................@!...? |
5160 | 85 b0 00 0e 09 41 89 16 09 88 82 95 00 88 0e 0b 83 bc 00 c3 89 10 82 15 01 0e 0b 3f 85 15 01 0e | .....A.....................?.... |
5180 | 0c 83 ed 00 c6 c3 0a ea 50 1e 0f 1e 0e 1e 0d c3 eb ec 8f 88 ed 8e ee 20 88 ef 65 64 0a c3 c6 25 | ........P.................ed...% |
51a0 | 88 c3 89 16 0d 29 2b 82 15 01 0e 10 f0 3d 85 f9 00 c3 10 c3 89 11 88 09 85 00 01 08 3f 85 0d 01 | .....)+......=..............?... |
51c0 | f1 0a 21 89 10 88 f2 0a f3 5c 22 88 ef 65 64 0a c3 c6 25 2a 88 08 85 1f 01 c3 f4 f5 8f 29 88 f6 | ..!......\"..ed...%*.........).. |
51e0 | 20 2a 82 2a 01 f7 f8 21 87 22 20 5b 73 65 74 6d 6f 64 65 73 20 74 65 6d 70 73 65 74 6d 6f 64 65 | .*.*...!.".[setmodes.tempsetmode |
5200 | 73 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e 69 6c 20 64 65 66 61 75 6c 74 2d 64 | s.buffer-file-name.nil.default-d |
5220 | 69 72 65 63 74 6f 72 79 20 61 75 74 6f 2d 73 61 76 65 2d 64 65 66 61 75 6c 74 20 74 20 62 75 66 | irectory.auto-save-default.t.buf |
5240 | 66 65 72 2d 62 61 63 6b 65 64 2d 75 70 20 72 65 71 75 69 72 65 2d 66 69 6e 61 6c 2d 6e 65 77 6c | fer-backed-up.require-final-newl |
5260 | 69 6e 65 20 68 6f 6f 6b 73 20 77 72 69 74 65 2d 66 69 6c 65 2d 68 6f 6f 6b 73 20 64 6f 6e 65 20 | ine.hooks.write-file-hooks.done. |
5280 | 66 69 6c 65 2d 70 72 65 63 69 6f 75 73 2d 66 6c 61 67 20 72 65 6e 61 6d 65 20 6e 6f 64 65 6c 65 | file-precious-flag.rename.nodele |
52a0 | 74 65 20 66 69 6c 65 20 73 79 73 74 65 6d 2d 74 79 70 65 20 62 75 66 66 65 72 2d 6d 6f 64 69 66 | te.file.system-type.buffer-modif |
52c0 | 69 65 64 2d 70 20 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 72 65 61 64 2d 66 69 6c 65 | ied-p.expand-file-name.read-file |
52e0 | 2d 6e 61 6d 65 20 22 46 69 6c 65 20 74 6f 20 73 61 76 65 20 69 6e 3a 20 22 20 66 69 6c 65 2d 6e | -name."File.to.save.in:.".file-n |
5300 | 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 61 75 74 6f 2d 73 61 76 65 2d 6d 6f 64 65 20 66 69 6c | ame-directory.auto-save-mode.fil |
5320 | 65 2d 77 72 69 74 61 62 6c 65 2d 70 20 79 65 73 2d 6f 72 2d 6e 6f 2d 70 20 66 6f 72 6d 61 74 20 | e-writable-p.yes-or-no-p.format. |
5340 | 22 46 69 6c 65 20 25 73 20 69 73 20 77 72 69 74 65 2d 70 72 6f 74 65 63 74 65 64 3b 20 74 72 79 | "File.%s.is.write-protected;.try |
5360 | 20 74 6f 20 73 61 76 65 20 61 6e 79 77 61 79 3f 20 22 20 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e | .to.save.anyway?.".file-name-non |
5380 | 64 69 72 65 63 74 6f 72 79 20 65 72 72 6f 72 20 22 41 74 74 65 6d 70 74 20 74 6f 20 73 61 76 65 | directory.error."Attempt.to.save |
53a0 | 20 74 6f 20 61 20 66 69 6c 65 20 77 68 69 63 68 20 79 6f 75 20 61 72 65 6e 27 74 20 61 6c 6c 6f | .to.a.file.which.you.aren't.allo |
53c0 | 77 65 64 20 74 6f 20 77 72 69 74 65 22 20 76 65 72 69 66 79 2d 76 69 73 69 74 65 64 2d 66 69 6c | wed.to.write".verify-visited-fil |
53e0 | 65 2d 6d 6f 64 74 69 6d 65 20 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 22 44 69 73 6b 20 66 69 | e-modtime.file-exists-p."Disk.fi |
5400 | 6c 65 20 68 61 73 20 63 68 61 6e 67 65 64 20 73 69 6e 63 65 20 76 69 73 69 74 65 64 20 6f 72 20 | le.has.changed.since.visited.or. |
5420 | 73 61 76 65 64 2e 20 20 53 61 76 65 20 61 6e 79 77 61 79 3f 20 22 20 22 53 61 76 65 20 6e 6f 74 | saved...Save.anyway?."."Save.not |
5440 | 20 63 6f 6e 66 69 72 6d 65 64 22 20 62 61 63 6b 75 70 2d 62 75 66 66 65 72 20 77 69 64 65 6e 20 | .confirmed".backup-buffer.widen. |
5460 | 31 20 2f 3d 20 31 30 20 22 42 75 66 66 65 72 20 25 73 20 64 6f 65 73 20 6e 6f 74 20 65 6e 64 20 | 1./=.10."Buffer.%s.does.not.end. |
5480 | 69 6e 20 6e 65 77 6c 69 6e 65 2e 20 20 41 64 64 20 6f 6e 65 3f 20 22 20 62 75 66 66 65 72 2d 6e | in.newline...Add.one?.".buffer-n |
54a0 | 61 6d 65 20 66 75 6e 63 61 6c 6c 20 22 23 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c4 08 09 c2 | ame.funcall."#".(byte-code.".... |
54c0 | 23 88 c5 09 21 89 13 87 22 20 5b 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 | #...!...".[buffer-file-name.file |
54e0 | 20 74 20 73 65 74 6d 6f 64 65 73 20 72 65 6e 61 6d 65 2d 66 69 6c 65 20 66 69 6c 65 2d 6d 6f 64 | .t.setmodes.rename-file.file-mod |
5500 | 65 73 5d 20 34 29 20 28 28 66 69 6c 65 2d 65 72 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 | es].4).((file-error.(byte-code." |
5520 | c1 10 c3 89 12 87 22 20 5b 72 65 6e 61 6d 65 20 6e 69 6c 20 6e 6f 64 65 6c 65 74 65 20 74 5d 20 | ......".[rename.nil.nodelete.t]. |
5540 | 32 29 29 29 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 08 83 0f 00 c5 09 0a c3 23 88 c6 20 82 17 | 2))).((byte-code."........#..... |
5560 | 00 0c 86 17 00 c7 c8 c9 8f 87 22 20 5b 72 65 6e 61 6d 65 20 66 69 6c 65 20 62 75 66 66 65 72 2d | ..........".[rename.file.buffer- |
5580 | 66 69 6c 65 2d 6e 61 6d 65 20 74 20 6e 6f 64 65 6c 65 74 65 20 72 65 6e 61 6d 65 2d 66 69 6c 65 | file-name.t.nodelete.rename-file |
55a0 | 20 63 6c 65 61 72 2d 76 69 73 69 74 65 64 2d 66 69 6c 65 2d 6d 6f 64 74 69 6d 65 20 6e 69 6c 20 | .clear-visited-file-modtime.nil. |
55c0 | 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21 87 22 20 5b 66 69 6c 65 20 64 65 6c 65 74 65 2d 66 | (byte-code."..!.".[file.delete-f |
55e0 | 69 6c 65 5d 20 32 29 20 28 28 65 72 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 87 22 20 | ile].2).((error.(byte-code."..". |
5600 | 5b 6e 69 6c 5d 20 31 29 29 29 5d 20 35 29 29 20 63 6c 65 61 72 2d 76 69 73 69 74 65 64 2d 66 69 | [nil].1)))].5)).clear-visited-fi |
5620 | 6c 65 2d 6d 6f 64 74 69 6d 65 20 77 72 69 74 65 2d 72 65 67 69 6f 6e 20 76 61 78 2d 76 6d 73 20 | le-modtime.write-region.vax-vms. |
5640 | 66 69 6c 65 2d 6d 6f 64 65 73 20 73 65 74 2d 66 69 6c 65 2d 6d 6f 64 65 73 20 35 31 31 20 28 62 | file-modes.set-file-modes.511.(b |
5660 | 79 74 65 2d 63 6f 64 65 20 22 c2 08 09 5c 22 87 22 20 5b 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e | yte-code."...\".".[buffer-file-n |
5680 | 61 6d 65 20 73 65 74 6d 6f 64 65 73 20 73 65 74 2d 66 69 6c 65 2d 6d 6f 64 65 73 5d 20 33 29 20 | ame.setmodes.set-file-modes].3). |
56a0 | 28 28 65 72 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 87 22 20 5b 6e 69 6c 5d 20 31 29 | ((error.(byte-code."..".[nil].1) |
56c0 | 29 29 20 64 65 6c 65 74 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 69 66 2d 6e 65 63 65 | )).delete-auto-save-file-if-nece |
56e0 | 73 73 61 72 79 20 6d 65 73 73 61 67 65 20 22 28 4e 6f 20 63 68 61 6e 67 65 73 20 6e 65 65 64 20 | ssary.message."(No.changes.need. |
5700 | 74 6f 20 62 65 20 73 61 76 65 64 29 22 5d 20 33 31 29 29 0a 0a 28 64 65 66 75 6e 20 73 61 76 65 | to.be.saved)"].31))..(defun.save |
5720 | 2d 73 6f 6d 65 2d 62 75 66 66 65 72 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 20 65 78 69 | -some-buffers.(&optional.arg.exi |
5740 | 74 69 6e 67 29 20 22 5c 0a 53 61 76 65 20 73 6f 6d 65 20 6d 6f 64 69 66 69 65 64 20 66 69 6c 65 | ting)."\.Save.some.modified.file |
5760 | 2d 76 69 73 69 74 69 6e 67 20 62 75 66 66 65 72 73 2e 20 20 41 73 6b 73 20 75 73 65 72 20 61 62 | -visiting.buffers...Asks.user.ab |
5780 | 6f 75 74 20 65 61 63 68 20 6f 6e 65 2e 0a 4f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 | out.each.one..Optional.argument. |
57a0 | 28 74 68 65 20 70 72 65 66 69 78 29 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 73 61 76 65 20 | (the.prefix).non-nil.means.save. |
57c0 | 61 6c 6c 20 77 69 74 68 20 6e 6f 20 71 75 65 73 74 69 6f 6e 73 2e 0a 4f 70 74 69 6f 6e 61 6c 20 | all.with.no.questions..Optional. |
57e0 | 73 65 63 6f 6e 64 20 61 72 67 75 6d 65 6e 74 20 45 58 49 54 49 4e 47 20 6d 65 61 6e 73 20 61 73 | second.argument.EXITING.means.as |
5800 | 6b 20 61 62 6f 75 74 20 63 65 72 74 61 69 6e 20 6e 6f 6e 2d 66 69 6c 65 20 62 75 66 66 65 72 73 | k.about.certain.non-file.buffers |
5820 | 0a 20 61 73 20 77 65 6c 6c 20 61 73 20 61 62 6f 75 74 20 66 69 6c 65 20 62 75 66 66 65 72 73 2e | ..as.well.as.about.file.buffers. |
5840 | 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 | ".(interactive."P").(byte-code." |
5860 | cb 88 cb cc 20 19 18 09 85 5a 00 09 40 1a cd 0a 21 85 50 00 8a 0a 71 88 0b 86 28 00 0c 85 28 00 | .........Z..@...!.P...q...(...(. |
5880 | 0d 85 28 00 ce 20 cf 56 85 4f 00 c6 89 10 85 4f 00 0e 07 86 48 00 d0 0b 83 42 00 d1 d2 0b 5c 22 | ..(....V.O.....O....H....B....\" |
58a0 | 82 47 00 d1 d3 d4 20 5c 22 21 85 4f 00 cb d5 d6 8f 29 29 88 09 41 89 11 88 82 07 00 88 0e 08 85 | .G.....\"!.O.....))..A.......... |
58c0 | 80 00 0e 09 85 80 00 c6 89 10 88 0e 07 86 75 00 d0 d1 d7 0e 0a 5c 22 21 85 7b 00 d8 cb 21 88 cb | ..............u......\"!.{...!.. |
58e0 | 89 16 09 88 08 83 8b 00 d9 da 21 82 8e 00 d9 db 21 2a 87 22 20 5b 63 6f 6e 73 69 64 65 72 65 64 | ..........!.....!*.".[considered |
5900 | 20 6c 69 73 74 20 62 75 66 66 65 72 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 65 78 | .list.buffer.buffer-file-name.ex |
5920 | 69 74 69 6e 67 20 62 75 66 66 65 72 2d 6f 66 66 65 72 2d 73 61 76 65 20 74 20 61 72 67 20 73 61 | iting.buffer-offer-save.t.arg.sa |
5940 | 76 65 2d 61 62 62 72 65 76 73 20 61 62 62 72 65 76 73 2d 63 68 61 6e 67 65 64 20 61 62 62 72 65 | ve-abbrevs.abbrevs-changed.abbre |
5960 | 76 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e 69 6c 20 62 75 66 66 65 72 2d 6c 69 73 74 20 62 75 66 66 | v-file-name.nil.buffer-list.buff |
5980 | 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 62 75 66 66 65 72 2d 73 69 7a 65 20 30 20 79 2d 6f 72 | er-modified-p.buffer-size.0.y-or |
59a0 | 2d 6e 2d 70 20 66 6f 72 6d 61 74 20 22 53 61 76 65 20 66 69 6c 65 20 25 73 3f 20 22 20 22 53 61 | -n-p.format."Save.file.%s?."."Sa |
59c0 | 76 65 20 62 75 66 66 65 72 20 25 73 3f 20 22 20 62 75 66 66 65 72 2d 6e 61 6d 65 20 28 62 79 74 | ve.buffer.%s?.".buffer-name.(byt |
59e0 | 65 2d 63 6f 64 65 20 22 c0 20 87 22 20 5b 73 61 76 65 2d 62 75 66 66 65 72 5d 20 32 29 20 28 28 | e-code."...".[save-buffer].2).(( |
5a00 | 65 72 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 87 22 20 5b 6e 69 6c 5d 20 31 29 29 29 | error.(byte-code."..".[nil].1))) |
5a20 | 20 22 53 61 76 65 20 61 62 62 72 65 76 73 20 69 6e 20 25 73 3f 20 22 20 77 72 69 74 65 2d 61 62 | ."Save.abbrevs.in.%s?.".write-ab |
5a40 | 62 72 65 76 2d 66 69 6c 65 20 6d 65 73 73 61 67 65 20 22 22 20 22 28 4e 6f 20 66 69 6c 65 73 20 | brev-file.message.""."(No.files. |
5a60 | 6e 65 65 64 20 73 61 76 69 6e 67 29 22 5d 20 31 33 29 29 0a 0a 28 64 65 66 75 6e 20 6e 6f 74 2d | need.saving)"].13))..(defun.not- |
5a80 | 6d 6f 64 69 66 69 65 64 20 6e 69 6c 20 22 5c 0a 4d 61 72 6b 20 63 75 72 72 65 6e 74 20 62 75 66 | modified.nil."\.Mark.current.buf |
5aa0 | 66 65 72 20 61 73 20 75 6e 6d 6f 64 69 66 69 65 64 2c 20 6e 6f 74 20 6e 65 65 64 69 6e 67 20 74 | fer.as.unmodified,.not.needing.t |
5ac0 | 6f 20 62 65 20 73 61 76 65 64 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 | o.be.saved.".(interactive).(byte |
5ae0 | 2d 63 6f 64 65 20 22 c0 88 c1 c2 21 88 c3 c0 21 87 22 20 5b 6e 69 6c 20 6d 65 73 73 61 67 65 20 | -code."....!...!.".[nil.message. |
5b00 | 22 4d 6f 64 69 66 69 63 61 74 69 6f 6e 2d 66 6c 61 67 20 63 6c 65 61 72 65 64 22 20 73 65 74 2d | "Modification-flag.cleared".set- |
5b20 | 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 74 | buffer-modified-p].3))..(defun.t |
5b40 | 6f 67 67 6c 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 20 22 5c 0a 43 68 61 6e 67 65 20 77 68 | oggle-read-only.nil."\.Change.wh |
5b60 | 65 74 68 65 72 20 74 68 69 73 20 62 75 66 66 65 72 20 69 73 20 76 69 73 69 74 69 6e 67 20 69 74 | ether.this.buffer.is.visiting.it |
5b80 | 73 20 66 69 6c 65 20 72 65 61 64 2d 6f 6e 6c 79 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 | s.file.read-only.".(interactive) |
5ba0 | 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 08 3f 89 10 88 c2 c3 20 21 87 22 20 5b 62 75 66 66 | .(byte-code."...?......!.".[buff |
5bc0 | 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 20 73 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 | er-read-only.nil.set-buffer-modi |
5be0 | 66 69 65 64 2d 70 20 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 5d 20 33 29 29 0a 0a 28 | fied-p.buffer-modified-p].3))..( |
5c00 | 64 65 66 75 6e 20 69 6e 73 65 72 74 2d 66 69 6c 65 20 28 66 69 6c 65 6e 61 6d 65 29 20 22 5c 0a | defun.insert-file.(filename)."\. |
5c20 | 49 6e 73 65 72 74 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 66 69 6c 65 20 46 49 4c 45 4e 41 4d 45 | Insert.contents.of.file.FILENAME |
5c40 | 20 69 6e 74 6f 20 62 75 66 66 65 72 20 61 66 74 65 72 20 70 6f 69 6e 74 2e 0a 53 65 74 20 6d 61 | .into.buffer.after.point..Set.ma |
5c60 | 72 6b 20 61 66 74 65 72 20 74 68 65 20 69 6e 73 65 72 74 65 64 20 74 65 78 74 2e 22 20 28 69 6e | rk.after.the.inserted.text.".(in |
5c80 | 74 65 72 61 63 74 69 76 65 20 22 66 49 6e 73 65 72 74 20 66 69 6c 65 3a 20 22 29 20 28 62 79 74 | teractive."fInsert.file:.").(byt |
5ca0 | 65 2d 63 6f 64 65 20 22 c2 88 c3 09 21 18 c4 60 08 41 40 5c 5c 21 29 87 22 20 5b 74 65 6d 20 66 | e-code."....!..`.A@\\!).".[tem.f |
5cc0 | 69 6c 65 6e 61 6d 65 20 6e 69 6c 20 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 | ilename.nil.insert-file-contents |
5ce0 | 20 70 75 73 68 2d 6d 61 72 6b 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 61 70 70 65 6e 64 2d 74 | .push-mark].4))..(defun.append-t |
5d00 | 6f 2d 66 69 6c 65 20 28 73 74 61 72 74 20 65 6e 64 20 66 69 6c 65 6e 61 6d 65 29 20 22 5c 0a 41 | o-file.(start.end.filename)."\.A |
5d20 | 70 70 65 6e 64 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 74 68 65 20 72 65 67 69 6f 6e | ppend.the.contents.of.the.region |
5d40 | 20 74 6f 20 74 68 65 20 65 6e 64 20 6f 66 20 66 69 6c 65 20 46 49 4c 45 4e 41 4d 45 2e 0a 57 68 | .to.the.end.of.file.FILENAME..Wh |
5d60 | 65 6e 20 63 61 6c 6c 65 64 20 66 72 6f 6d 20 61 20 66 75 6e 63 74 69 6f 6e 2c 20 65 78 70 65 63 | en.called.from.a.function,.expec |
5d80 | 74 73 20 74 68 72 65 65 20 61 72 67 75 6d 65 6e 74 73 2c 0a 53 54 41 52 54 2c 20 45 4e 44 20 61 | ts.three.arguments,.START,.END.a |
5da0 | 6e 64 20 46 49 4c 45 4e 41 4d 45 2e 20 20 53 54 41 52 54 20 61 6e 64 20 45 4e 44 20 61 72 65 20 | nd.FILENAME...START.and.END.are. |
5dc0 | 62 75 66 66 65 72 20 70 6f 73 69 74 69 6f 6e 73 0a 73 61 79 69 6e 67 20 77 68 61 74 20 74 65 78 | buffer.positions.saying.what.tex |
5de0 | 74 20 74 6f 20 77 72 69 74 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 72 0a 46 41 70 | t.to.write.".(interactive."r.FAp |
5e00 | 70 65 6e 64 20 74 6f 20 66 69 6c 65 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c4 88 c5 | pend.to.file:.").(byte-code."... |
5e20 | 08 09 0a c3 24 87 22 20 5b 73 74 61 72 74 20 65 6e 64 20 66 69 6c 65 6e 61 6d 65 20 74 20 6e 69 | ....$.".[start.end.filename.t.ni |
5e40 | 6c 20 77 72 69 74 65 2d 72 65 67 69 6f 6e 5d 20 35 29 29 0a 0a 28 64 65 66 76 61 72 20 72 65 76 | l.write-region].5))..(defvar.rev |
5e60 | 65 72 74 2d 62 75 66 66 65 72 2d 66 75 6e 63 74 69 6f 6e 20 6e 69 6c 20 22 5c 0a 46 75 6e 63 74 | ert-buffer-function.nil."\.Funct |
5e80 | 69 6f 6e 20 74 6f 20 75 73 65 20 74 6f 20 72 65 76 65 72 74 20 74 68 69 73 20 62 75 66 66 65 72 | ion.to.use.to.revert.this.buffer |
5ea0 | 2c 20 6f 72 20 6e 69 6c 20 74 6f 20 64 6f 20 74 68 65 20 64 65 66 61 75 6c 74 2e 22 29 0a 0a 28 | ,.or.nil.to.do.the.default.")..( |
5ec0 | 64 65 66 75 6e 20 72 65 76 65 72 74 2d 62 75 66 66 65 72 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 | defun.revert-buffer.(&optional.a |
5ee0 | 72 67 20 6e 6f 63 6f 6e 66 69 72 6d 29 20 22 5c 0a 52 65 70 6c 61 63 65 20 74 68 65 20 62 75 66 | rg.noconfirm)."\.Replace.the.buf |
5f00 | 66 65 72 20 74 65 78 74 20 77 69 74 68 20 74 68 65 20 74 65 78 74 20 6f 66 20 74 68 65 20 76 69 | fer.text.with.the.text.of.the.vi |
5f20 | 73 69 74 65 64 20 66 69 6c 65 20 6f 6e 20 64 69 73 6b 2e 0a 54 68 69 73 20 75 6e 64 6f 65 73 20 | sited.file.on.disk..This.undoes. |
5f40 | 61 6c 6c 20 63 68 61 6e 67 65 73 20 73 69 6e 63 65 20 74 68 65 20 66 69 6c 65 20 77 61 73 20 76 | all.changes.since.the.file.was.v |
5f60 | 69 73 69 74 65 64 20 6f 72 20 73 61 76 65 64 2e 0a 49 66 20 6c 61 74 65 73 74 20 61 75 74 6f 2d | isited.or.saved..If.latest.auto- |
5f80 | 73 61 76 65 20 66 69 6c 65 20 69 73 20 6d 6f 72 65 20 72 65 63 65 6e 74 20 74 68 61 6e 20 74 68 | save.file.is.more.recent.than.th |
5fa0 | 65 20 76 69 73 69 74 65 64 20 66 69 6c 65 2c 0a 61 73 6b 73 20 75 73 65 72 20 77 68 65 74 68 65 | e.visited.file,.asks.user.whethe |
5fc0 | 72 20 74 6f 20 75 73 65 20 74 68 61 74 20 69 6e 73 74 65 61 64 2e 0a 46 69 72 73 74 20 61 72 67 | r.to.use.that.instead..First.arg |
5fe0 | 75 6d 65 6e 74 20 28 6f 70 74 69 6f 6e 61 6c 29 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 64 | ument.(optional).non-nil.means.d |
6000 | 6f 6e 27 74 20 6f 66 66 65 72 20 74 6f 20 75 73 65 20 61 75 74 6f 2d 73 61 76 65 20 66 69 6c 65 | on't.offer.to.use.auto-save.file |
6020 | 2e 0a 20 54 68 69 73 20 69 73 20 74 68 65 20 70 72 65 66 69 78 20 61 72 67 20 77 68 65 6e 20 63 | ...This.is.the.prefix.arg.when.c |
6040 | 61 6c 6c 65 64 20 69 6e 74 65 72 61 63 74 69 76 65 6c 79 2e 0a 0a 53 65 63 6f 6e 64 20 61 72 67 | alled.interactively...Second.arg |
6060 | 75 6d 65 6e 74 20 28 6f 70 74 69 6f 6e 61 6c 29 20 6e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 64 | ument.(optional).non-nil.means.d |
6080 | 6f 6e 27 74 20 61 73 6b 20 66 6f 72 20 63 6f 6e 66 69 72 6d 61 74 69 6f 6e 20 61 74 20 61 6c 6c | on't.ask.for.confirmation.at.all |
60a0 | 2e 0a 0a 49 66 20 72 65 76 65 72 74 2d 62 75 66 66 65 72 2d 66 75 6e 63 74 69 6f 6e 27 73 20 76 | ...If.revert-buffer-function's.v |
60c0 | 61 6c 75 65 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 74 20 69 73 20 63 61 6c 6c 65 64 20 74 6f | alue.is.non-nil,.it.is.called.to |
60e0 | 20 64 6f 20 74 68 65 20 77 6f 72 6b 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 | .do.the.work.".(interactive."P") |
6100 | 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c9 88 08 83 0e 00 cd 08 09 0a 23 82 a2 00 60 1b 09 3f 85 | .(byte-code."..........#...`..?. |
6120 | 27 00 ce 20 85 27 00 0d 85 27 00 cf 0d 21 85 27 00 d0 d1 21 1c 0c 83 30 00 0d 82 32 00 0e 07 1e | '....'...'...!.'...!...0...2.... |
6140 | 06 0e 06 3f 83 40 00 d2 d3 21 82 a1 00 d4 0e 06 21 3f 83 50 00 d2 d5 0e 06 5c 22 82 a1 00 0a 86 | ...?.@...!......!?.P.....\"..... |
6160 | 5b 00 d6 d7 d8 0e 06 5c 22 21 85 a1 00 0c 3f 85 6e 00 d9 70 21 3f 85 6e 00 c9 89 16 08 88 0e 0a | [......\"!....?.n..p!?.n........ |
6180 | cb 3d 86 7a 00 c9 89 16 0a 88 c9 cb 1e 0a 1e 0c c9 1e 07 0c 86 8a 00 da 20 88 db 20 29 88 dc 0e | .=.z........................)... |
61a0 | 06 0c 3f 5c 22 2a 88 0b 64 5e 62 88 dd c9 21 88 cb 2b 87 22 20 5b 72 65 76 65 72 74 2d 62 75 66 | ..?\"*..d^b...!..+.".[revert-buf |
61c0 | 66 65 72 2d 66 75 6e 63 74 69 6f 6e 20 61 72 67 20 6e 6f 63 6f 6e 66 69 72 6d 20 6f 70 6f 69 6e | fer-function.arg.noconfirm.opoin |
61e0 | 74 20 61 75 74 6f 2d 73 61 76 65 2d 70 20 62 75 66 66 65 72 2d 61 75 74 6f 2d 73 61 76 65 2d 66 | t.auto-save-p.buffer-auto-save-f |
6200 | 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e | ile-name.file-name.buffer-file-n |
6220 | 61 6d 65 20 62 75 66 66 65 72 2d 62 61 63 6b 65 64 2d 75 70 20 6e 69 6c 20 62 75 66 66 65 72 2d | ame.buffer-backed-up.nil.buffer- |
6240 | 75 6e 64 6f 2d 6c 69 73 74 20 74 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 66 75 6e | undo-list.t.buffer-read-only.fun |
6260 | 63 61 6c 6c 20 72 65 63 65 6e 74 2d 61 75 74 6f 2d 73 61 76 65 2d 70 20 66 69 6c 65 2d 72 65 61 | call.recent-auto-save-p.file-rea |
6280 | 64 61 62 6c 65 2d 70 20 79 2d 6f 72 2d 6e 2d 70 20 22 42 75 66 66 65 72 20 68 61 73 20 62 65 65 | dable-p.y-or-n-p."Buffer.has.bee |
62a0 | 6e 20 61 75 74 6f 2d 73 61 76 65 64 20 72 65 63 65 6e 74 6c 79 2e 20 20 52 65 76 65 72 74 20 66 | n.auto-saved.recently...Revert.f |
62c0 | 72 6f 6d 20 61 75 74 6f 2d 73 61 76 65 20 66 69 6c 65 3f 20 22 20 65 72 72 6f 72 20 22 42 75 66 | rom.auto-save.file?.".error."Buf |
62e0 | 66 65 72 20 64 6f 65 73 20 6e 6f 74 20 73 65 65 6d 20 74 6f 20 62 65 20 61 73 73 6f 63 69 61 74 | fer.does.not.seem.to.be.associat |
6300 | 65 64 20 77 69 74 68 20 61 6e 79 20 66 69 6c 65 22 20 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 | ed.with.any.file".file-exists-p. |
6320 | 22 46 69 6c 65 20 25 73 20 6e 6f 20 6c 6f 6e 67 65 72 20 65 78 69 73 74 73 21 22 20 79 65 73 2d | "File.%s.no.longer.exists!".yes- |
6340 | 6f 72 2d 6e 6f 2d 70 20 66 6f 72 6d 61 74 20 22 52 65 76 65 72 74 20 62 75 66 66 65 72 20 66 72 | or-no-p.format."Revert.buffer.fr |
6360 | 6f 6d 20 66 69 6c 65 20 25 73 3f 20 22 20 76 65 72 69 66 79 2d 76 69 73 69 74 65 64 2d 66 69 6c | om.file.%s?.".verify-visited-fil |
6380 | 65 2d 6d 6f 64 74 69 6d 65 20 75 6e 6c 6f 63 6b 2d 62 75 66 66 65 72 20 65 72 61 73 65 2d 62 75 | e-modtime.unlock-buffer.erase-bu |
63a0 | 66 66 65 72 20 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 61 66 74 65 72 2d | ffer.insert-file-contents.after- |
63c0 | 66 69 6e 64 2d 66 69 6c 65 5d 20 31 35 29 29 0a 0a 28 64 65 66 75 6e 20 72 65 63 6f 76 65 72 2d | find-file].15))..(defun.recover- |
63e0 | 66 69 6c 65 20 28 66 69 6c 65 29 20 22 5c 0a 56 69 73 69 74 20 66 69 6c 65 20 46 49 4c 45 2c 20 | file.(file)."\.Visit.file.FILE,. |
6400 | 62 75 74 20 67 65 74 20 63 6f 6e 74 65 6e 74 73 20 66 72 6f 6d 20 69 74 73 20 6c 61 73 74 20 61 | but.get.contents.from.its.last.a |
6420 | 75 74 6f 2d 73 61 76 65 20 66 69 6c 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 46 52 | uto-save.file.".(interactive."FR |
6440 | 65 63 6f 76 65 72 20 66 69 6c 65 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c5 88 c9 08 | ecover.file:.").(byte-code.".... |
6460 | 21 89 10 88 ca 08 21 85 12 00 cb cc 08 5c 22 88 08 1a cd 20 29 19 ce 09 08 5c 22 3f 83 28 00 cb | !.....!......\".....)....\"?.(.. |
6480 | cf 09 5c 22 82 49 00 d0 8b 83 46 00 d1 d2 08 c6 5c 22 21 88 c5 1e 07 d3 20 88 d4 09 c5 5c 22 29 | ..\".I....F.....\"!..........\") |
64a0 | 88 d5 c5 21 82 49 00 cb d6 21 29 88 c5 89 16 08 88 d7 d8 21 87 22 20 5b 66 69 6c 65 20 66 69 6c | ...!.I...!)........!.".[file.fil |
64c0 | 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 73 79 73 74 65 6d 2d 74 | e-name.buffer-file-name.system-t |
64e0 | 79 70 65 20 73 74 61 6e 64 61 72 64 2d 6f 75 74 70 75 74 20 6e 69 6c 20 74 20 62 75 66 66 65 72 | ype.standard-output.nil.t.buffer |
6500 | 2d 72 65 61 64 2d 6f 6e 6c 79 20 62 75 66 66 65 72 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 | -read-only.buffer-auto-save-file |
6520 | 2d 6e 61 6d 65 20 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 61 75 74 6f 2d 73 61 76 65 | -name.expand-file-name.auto-save |
6540 | 2d 66 69 6c 65 2d 6e 61 6d 65 2d 70 20 65 72 72 6f 72 20 22 25 73 20 69 73 20 61 6e 20 61 75 74 | -file-name-p.error."%s.is.an.aut |
6560 | 6f 2d 73 61 76 65 20 66 69 6c 65 22 20 6d 61 6b 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 | o-save.file".make-auto-save-file |
6580 | 2d 6e 61 6d 65 20 66 69 6c 65 2d 6e 65 77 65 72 2d 74 68 61 6e 2d 66 69 6c 65 2d 70 20 22 41 75 | -name.file-newer-than-file-p."Au |
65a0 | 74 6f 2d 73 61 76 65 20 66 69 6c 65 20 25 73 20 6e 6f 74 20 63 75 72 72 65 6e 74 22 20 28 28 62 | to-save.file.%s.not.current".((b |
65c0 | 79 74 65 2d 63 6f 64 65 20 22 08 c5 3d 3f 85 18 00 c6 90 c7 09 21 88 c8 c9 c2 09 c2 ca 0b 0c 26 | yte-code."..=?.......!.........& |
65e0 | 07 91 88 cb cc cd 0c 5c 22 21 87 22 20 5b 73 79 73 74 65 6d 2d 74 79 70 65 20 73 74 61 6e 64 61 | .......\"!.".[system-type.standa |
6600 | 72 64 2d 6f 75 74 70 75 74 20 6e 69 6c 20 66 69 6c 65 20 66 69 6c 65 2d 6e 61 6d 65 20 76 61 78 | rd-output.nil.file.file-name.vax |
6620 | 2d 76 6d 73 20 22 2a 44 69 72 65 63 74 6f 72 79 2a 22 20 62 75 66 66 65 72 2d 66 6c 75 73 68 2d | -vms."*Directory*".buffer-flush- |
6640 | 75 6e 64 6f 20 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 22 6c 73 22 20 22 2d 6c 22 20 79 65 73 2d | undo.call-process."ls"."-l".yes- |
6660 | 6f 72 2d 6e 6f 2d 70 20 66 6f 72 6d 61 74 20 22 52 65 63 6f 76 65 72 20 61 75 74 6f 20 73 61 76 | or-no-p.format."Recover.auto.sav |
6680 | 65 20 66 69 6c 65 20 25 73 3f 20 22 5d 20 31 30 29 29 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 | e.file.%s?."].10)).switch-to-buf |
66a0 | 66 65 72 20 66 69 6e 64 2d 66 69 6c 65 2d 6e 6f 73 65 6c 65 63 74 20 65 72 61 73 65 2d 62 75 66 | fer.find-file-noselect.erase-buf |
66c0 | 66 65 72 20 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 61 66 74 65 72 2d 66 | fer.insert-file-contents.after-f |
66e0 | 69 6e 64 2d 66 69 6c 65 20 22 52 65 63 6f 76 65 72 2d 66 69 6c 65 20 63 61 6e 63 65 6c 6c 65 64 | ind-file."Recover-file.cancelled |
6700 | 2e 22 20 6d 65 73 73 61 67 65 20 22 41 75 74 6f 2d 73 61 76 65 20 6f 66 66 20 69 6e 20 74 68 69 | .".message."Auto-save.off.in.thi |
6720 | 73 20 62 75 66 66 65 72 20 74 69 6c 6c 20 79 6f 75 20 64 6f 20 4d 2d 78 20 61 75 74 6f 2d 73 61 | s.buffer.till.you.do.M-x.auto-sa |
6740 | 76 65 2d 6d 6f 64 65 2e 22 5d 20 31 34 29 29 0a 0a 28 64 65 66 75 6e 20 6b 69 6c 6c 2d 73 6f 6d | ve-mode."].14))..(defun.kill-som |
6760 | 65 2d 62 75 66 66 65 72 73 20 6e 69 6c 20 22 5c 0a 46 6f 72 20 65 61 63 68 20 62 75 66 66 65 72 | e-buffers.nil."\.For.each.buffer |
6780 | 2c 20 61 73 6b 20 77 68 65 74 68 65 72 20 74 6f 20 6b 69 6c 6c 20 69 74 2e 22 20 28 69 6e 74 65 | ,.ask.whether.to.kill.it.".(inte |
67a0 | 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 88 c4 20 18 08 85 42 00 08 40 | ractive).(byte-code.".......B..@ |
67c0 | 19 c5 09 21 1a c6 0a c7 5c 22 3f 85 38 00 c8 0a c9 48 ca 5c 22 85 38 00 cb cc cd 0a ce 09 21 83 | ...!....\"?.8....H.\".8.......!. |
67e0 | 2f 00 cf 82 30 00 d0 23 21 85 38 00 d1 09 21 2a 88 08 41 89 10 88 82 05 00 29 87 22 20 5b 6c 69 | /...0..#!.8...!*..A......).".[li |
6800 | 73 74 20 62 75 66 66 65 72 20 6e 61 6d 65 20 6e 69 6c 20 62 75 66 66 65 72 2d 6c 69 73 74 20 62 | st.buffer.name.nil.buffer-list.b |
6820 | 75 66 66 65 72 2d 6e 61 6d 65 20 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 22 22 20 2f 3d 20 30 20 | uffer-name.string-equal.""./=.0. |
6840 | 33 32 20 79 65 73 2d 6f 72 2d 6e 6f 2d 70 20 66 6f 72 6d 61 74 20 22 42 75 66 66 65 72 20 25 73 | 32.yes-or-no-p.format."Buffer.%s |
6860 | 20 25 73 2e 20 20 4b 69 6c 6c 3f 20 22 20 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 | .%s...Kill?.".buffer-modified-p. |
6880 | 22 48 41 53 20 42 45 45 4e 20 45 44 49 54 45 44 22 20 22 69 73 20 75 6e 6d 6f 64 69 66 69 65 64 | "HAS.BEEN.EDITED"."is.unmodified |
68a0 | 22 20 6b 69 6c 6c 2d 62 75 66 66 65 72 5d 20 31 31 29 29 0a 0a 28 64 65 66 75 6e 20 61 75 74 6f | ".kill-buffer].11))..(defun.auto |
68c0 | 2d 73 61 76 65 2d 6d 6f 64 65 20 28 61 72 67 29 20 22 5c 0a 54 6f 67 67 6c 65 20 61 75 74 6f 2d | -save-mode.(arg)."\.Toggle.auto- |
68e0 | 73 61 76 69 6e 67 20 6f 66 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 63 75 72 72 65 6e 74 20 62 75 | saving.of.contents.of.current.bu |
6900 | 66 66 65 72 2e 0a 57 69 74 68 20 61 72 67 2c 20 74 75 72 6e 20 61 75 74 6f 2d 73 61 76 69 6e 67 | ffer..With.arg,.turn.auto-saving |
6920 | 20 6f 6e 20 69 66 20 61 72 67 20 69 73 20 70 6f 73 69 74 69 76 65 2c 20 65 6c 73 65 20 6f 66 66 | .on.if.arg.is.positive,.else.off |
6940 | 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 | .".(interactive."P").(byte-code. |
6960 | 22 c6 88 09 3f 83 0c 00 08 3f 82 20 00 09 c2 3d 86 20 00 09 3c 86 20 00 c7 09 21 85 20 00 09 c8 | "...?....?.....=....<.....!..... |
6980 | 56 85 36 00 0b 85 2d 00 0c 85 2d 00 0d 3f 83 34 00 0b 82 36 00 c9 20 89 10 88 74 85 49 00 ca cb | V.6...-...-..?.4...6......t.I... |
69a0 | 08 83 47 00 cc 82 48 00 cd 5c 22 88 08 87 22 20 5b 62 75 66 66 65 72 2d 61 75 74 6f 2d 73 61 76 | ..G...H..\"...".[buffer-auto-sav |
69c0 | 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 61 72 67 20 74 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 | e-file-name.arg.t.buffer-file-na |
69e0 | 6d 65 20 61 75 74 6f 2d 73 61 76 65 2d 76 69 73 69 74 65 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 62 | me.auto-save-visited-file-name.b |
6a00 | 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 20 69 6e 74 65 67 65 72 70 20 30 20 6d | uffer-read-only.nil.integerp.0.m |
6a20 | 61 6b 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 6d 65 73 73 61 67 65 20 | ake-auto-save-file-name.message. |
6a40 | 22 41 75 74 6f 2d 73 61 76 65 20 25 73 20 28 69 6e 20 74 68 69 73 20 62 75 66 66 65 72 29 22 20 | "Auto-save.%s.(in.this.buffer)". |
6a60 | 22 6f 6e 22 20 22 6f 66 66 22 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 72 65 6e 61 6d 65 2d 61 | "on"."off"].5))..(defun.rename-a |
6a80 | 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 20 6e 69 6c 20 22 5c 0a 41 64 6a 75 73 74 20 63 75 72 72 | uto-save-file.nil."\.Adjust.curr |
6aa0 | 65 6e 74 20 62 75 66 66 65 72 27 73 20 61 75 74 6f 20 73 61 76 65 20 66 69 6c 65 20 6e 61 6d 65 | ent.buffer's.auto.save.file.name |
6ac0 | 20 66 6f 72 20 63 75 72 72 65 6e 74 20 63 6f 6e 64 69 74 69 6f 6e 73 2e 0a 41 6c 73 6f 20 72 65 | .for.current.conditions..Also.re |
6ae0 | 6e 61 6d 65 20 61 6e 79 20 65 78 69 73 74 69 6e 67 20 61 75 74 6f 20 73 61 76 65 20 66 69 6c 65 | name.any.existing.auto.save.file |
6b00 | 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 09 18 c4 20 89 11 88 08 85 5c 22 00 09 85 5c 22 00 | .".(byte-code.".........\"...\". |
6b20 | c5 09 0a 5c 22 3f 85 5c 22 00 c5 09 08 5c 22 3f 85 5c 22 00 c6 08 21 85 2a 00 c7 08 09 c3 23 29 | ...\"?.\"....\"?.\"...!.*.....#) |
6b40 | 87 22 20 5b 6f 73 61 76 65 20 62 75 66 66 65 72 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d | .".[osave.buffer-auto-save-file- |
6b60 | 6e 61 6d 65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 74 20 6d 61 6b 65 2d 61 75 74 | name.buffer-file-name.t.make-aut |
6b80 | 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 73 74 72 69 6e 67 3d 20 66 69 6c 65 2d 65 78 | o-save-file-name.string=.file-ex |
6ba0 | 69 73 74 73 2d 70 20 72 65 6e 61 6d 65 2d 66 69 6c 65 5d 20 38 29 29 0a 0a 28 64 65 66 75 6e 20 | ists-p.rename-file].8))..(defun. |
6bc0 | 6d 61 6b 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 6e 69 6c 20 22 5c 0a | make-auto-save-file-name.nil."\. |
6be0 | 52 65 74 75 72 6e 20 66 69 6c 65 20 6e 61 6d 65 20 74 6f 20 75 73 65 20 66 6f 72 20 61 75 74 6f | Return.file.name.to.use.for.auto |
6c00 | 2d 73 61 76 65 73 20 6f 66 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 44 6f 65 73 20 6e | -saves.of.current.buffer..Does.n |
6c20 | 6f 74 20 63 6f 6e 73 69 64 65 72 20 61 75 74 6f 2d 73 61 76 65 2d 76 69 73 69 74 65 64 2d 66 69 | ot.consider.auto-save-visited-fi |
6c40 | 6c 65 2d 6e 61 6d 65 3b 20 74 68 61 74 20 69 73 20 63 68 65 63 6b 65 64 0a 62 65 66 6f 72 65 20 | le-name;.that.is.checked.before. |
6c60 | 63 61 6c 6c 69 6e 67 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 2e 0a 59 6f 75 20 63 61 6e 20 72 | calling.this.function..You.can.r |
6c80 | 65 64 65 66 69 6e 65 20 74 68 69 73 20 66 6f 72 20 63 75 73 74 6f 6d 69 7a 61 74 69 6f 6e 2e 0a | edefine.this.for.customization.. |
6ca0 | 53 65 65 20 61 6c 73 6f 20 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 6e 61 6d 65 2d 70 2e 22 | See.also.auto-save-file-name-p." |
6cc0 | 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 83 10 00 c1 08 21 c2 c3 08 21 c2 52 82 17 00 c4 c5 c6 | .(byte-code."......!...!.R...... |
6ce0 | 20 c2 51 21 87 22 20 5b 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 2d 6e 61 | ..Q!.".[buffer-file-name.file-na |
6d00 | 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 22 23 22 20 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 | me-directory."#".file-name-nondi |
6d20 | 72 65 63 74 6f 72 79 20 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 23 25 22 20 62 75 | rectory.expand-file-name."#%".bu |
6d40 | 66 66 65 72 2d 6e 61 6d 65 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 61 75 74 6f 2d 73 61 76 65 | ffer-name].7))..(defun.auto-save |
6d60 | 2d 66 69 6c 65 2d 6e 61 6d 65 2d 70 20 28 66 69 6c 65 6e 61 6d 65 29 20 22 5c 0a 52 65 74 75 72 | -file-name-p.(filename)."\.Retur |
6d80 | 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 46 49 4c 45 4e 41 4d 45 20 63 61 6e 20 62 65 20 79 69 65 | n.non-nil.if.FILENAME.can.be.yie |
6da0 | 6c 64 65 64 20 62 79 20 6d 61 6b 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 6c 65 2d 6e 61 6d 65 | lded.by.make-auto-save-file-name |
6dc0 | 2e 0a 46 49 4c 45 4e 41 4d 45 20 73 68 6f 75 6c 64 20 6c 61 63 6b 20 73 6c 61 73 68 65 73 2e 0a | ..FILENAME.should.lack.slashes.. |
6de0 | 59 6f 75 20 63 61 6e 20 72 65 64 65 66 69 6e 65 20 74 68 69 73 20 66 6f 72 20 63 75 73 74 6f 6d | You.can.redefine.this.for.custom |
6e00 | 69 7a 61 74 69 6f 6e 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 c2 08 5c 22 87 22 20 5b 66 | ization.".(byte-code."...\".".[f |
6e20 | 69 6c 65 6e 61 6d 65 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5e 23 2e 2a 23 24 22 5d 20 33 | ilename.string-match."^#.*#$"].3 |
6e40 | 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 6c 69 73 74 2d 64 69 72 65 63 74 6f 72 79 2d 62 72 69 | ))..(defconst.list-directory-bri |
6e60 | 65 66 2d 73 77 69 74 63 68 65 73 20 22 2d 43 46 22 20 22 5c 0a 2a 53 77 69 74 63 68 65 73 20 66 | ef-switches."-CF"."\.*Switches.f |
6e80 | 6f 72 20 6c 69 73 74 2d 64 69 72 65 63 74 6f 72 79 20 74 6f 20 70 61 73 73 20 74 6f 20 60 6c 73 | or.list-directory.to.pass.to.`ls |
6ea0 | 27 20 66 6f 72 20 62 72 69 65 66 20 6c 69 73 74 69 6e 67 2c 22 29 0a 0a 28 64 65 66 63 6f 6e 73 | '.for.brief.listing,")..(defcons |
6ec0 | 74 20 6c 69 73 74 2d 64 69 72 65 63 74 6f 72 79 2d 76 65 72 62 6f 73 65 2d 73 77 69 74 63 68 65 | t.list-directory-verbose-switche |
6ee0 | 73 20 22 2d 6c 22 20 22 5c 0a 2a 53 77 69 74 63 68 65 73 20 66 6f 72 20 6c 69 73 74 2d 64 69 72 | s."-l"."\.*Switches.for.list-dir |
6f00 | 65 63 74 6f 72 79 20 74 6f 20 70 61 73 73 20 74 6f 20 60 6c 73 27 20 66 6f 72 20 76 65 72 62 6f | ectory.to.pass.to.`ls'.for.verbo |
6f20 | 73 65 20 6c 69 73 74 69 6e 67 2c 22 29 0a 0a 28 64 65 66 75 6e 20 6c 69 73 74 2d 64 69 72 65 63 | se.listing,")..(defun.list-direc |
6f40 | 74 6f 72 79 20 28 64 69 72 6e 61 6d 65 20 26 6f 70 74 69 6f 6e 61 6c 20 76 65 72 62 6f 73 65 29 | tory.(dirname.&optional.verbose) |
6f60 | 20 22 5c 0a 44 69 73 70 6c 61 79 20 61 20 6c 69 73 74 20 6f 66 20 66 69 6c 65 73 20 69 6e 20 6f | ."\.Display.a.list.of.files.in.o |
6f80 | 72 20 6d 61 74 63 68 69 6e 67 20 44 49 52 4e 41 4d 45 2c 20 61 20 6c 61 20 60 6c 73 27 2e 0a 44 | r.matching.DIRNAME,.a.la.`ls'..D |
6fa0 | 49 52 4e 41 4d 45 20 69 73 20 67 6c 6f 62 62 65 64 20 62 79 20 74 68 65 20 73 68 65 6c 6c 20 69 | IRNAME.is.globbed.by.the.shell.i |
6fc0 | 66 20 6e 65 63 65 73 73 61 72 79 2e 0a 50 72 65 66 69 78 20 61 72 67 20 28 73 65 63 6f 6e 64 20 | f.necessary..Prefix.arg.(second. |
6fe0 | 61 72 67 20 69 66 20 6e 6f 6e 69 6e 74 65 72 61 63 74 69 76 65 29 20 6d 65 61 6e 73 20 73 75 70 | arg.if.noninteractive).means.sup |
7000 | 70 6c 79 20 2d 6c 20 73 77 69 74 63 68 20 74 6f 20 60 6c 73 27 2e 0a 41 63 74 69 6f 6e 73 20 63 | ply.-l.switch.to.`ls'..Actions.c |
7020 | 6f 6e 74 72 6f 6c 6c 65 64 20 62 79 20 76 61 72 69 61 62 6c 65 73 20 6c 69 73 74 2d 64 69 72 65 | ontrolled.by.variables.list-dire |
7040 | 63 74 6f 72 79 2d 62 72 69 65 66 2d 73 77 69 74 63 68 65 73 0a 20 61 6e 64 20 6c 69 73 74 2d 64 | ctory-brief-switches..and.list-d |
7060 | 69 72 65 63 74 6f 72 79 2d 76 65 72 62 6f 73 65 2d 73 77 69 74 63 68 65 73 2e 22 20 28 69 6e 74 | irectory-verbose-switches.".(int |
7080 | 65 72 61 63 74 69 76 65 20 28 62 79 74 65 2d 63 6f 64 65 20 22 09 18 c4 08 83 0b 00 c5 82 0c 00 | eractive.(byte-code."........... |
70a0 | c6 c2 0b c2 24 08 44 29 87 22 20 5b 70 66 78 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 | ....$.D).".[pfx.current-prefix-a |
70c0 | 72 67 20 6e 69 6c 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 72 65 61 64 2d 66 69 | rg.nil.default-directory.read-fi |
70e0 | 6c 65 2d 6e 61 6d 65 20 22 4c 69 73 74 20 64 69 72 65 63 74 6f 72 79 20 28 76 65 72 62 6f 73 65 | le-name."List.directory.(verbose |
7100 | 29 3a 20 22 20 22 4c 69 73 74 20 64 69 72 65 63 74 6f 72 79 20 28 62 72 69 65 66 29 3a 20 22 5d | ):."."List.directory.(brief):."] |
7120 | 20 35 29 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 0d 83 0b 00 0e 06 82 0d 00 0e 07 c2 1e | .5)).(byte-code."............... |
7140 | 08 1c 0e 09 86 1a 00 0b 89 16 09 88 cd 0e 09 21 85 36 00 ca 89 16 08 88 ce cf 0e 09 5c 22 86 36 | ...............!.6..........\".6 |
7160 | 00 0e 09 d0 50 89 16 09 88 d1 0e 09 21 89 16 09 88 d2 90 d3 0e 0b 21 88 d4 d5 21 88 d4 0e 09 21 | ....P.......!.........!...!....! |
7180 | 88 d6 20 88 0e 08 83 65 00 d7 d8 c2 0e 0b c2 0c 0e 09 26 06 82 7d 00 d9 0e 09 21 1b d7 0e 0c c2 | .......e..........&..}....!..... |
71a0 | 0e 0b c2 da db 0c dc dd 0e 09 21 52 26 06 29 91 2a 87 22 20 5b 70 66 78 20 63 75 72 72 65 6e 74 | ..........!R&.).*.".[pfx.current |
71c0 | 2d 70 72 65 66 69 78 2d 61 72 67 20 6e 69 6c 20 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 | -prefix-arg.nil.default-director |
71e0 | 79 20 73 77 69 74 63 68 65 73 20 76 65 72 62 6f 73 65 20 6c 69 73 74 2d 64 69 72 65 63 74 6f 72 | y.switches.verbose.list-director |
7200 | 79 2d 76 65 72 62 6f 73 65 2d 73 77 69 74 63 68 65 73 20 6c 69 73 74 2d 64 69 72 65 63 74 6f 72 | y-verbose-switches.list-director |
7220 | 79 2d 62 72 69 65 66 2d 73 77 69 74 63 68 65 73 20 66 75 6c 6c 2d 64 69 72 2d 70 20 64 69 72 6e | y-brief-switches.full-dir-p.dirn |
7240 | 61 6d 65 20 74 20 73 74 61 6e 64 61 72 64 2d 6f 75 74 70 75 74 20 73 68 65 6c 6c 2d 66 69 6c 65 | ame.t.standard-output.shell-file |
7260 | 2d 6e 61 6d 65 20 66 69 6c 65 2d 64 69 72 65 63 74 6f 72 79 2d 70 20 73 74 72 69 6e 67 2d 6d 61 | -name.file-directory-p.string-ma |
7280 | 74 63 68 20 22 2f 24 22 20 22 2f 22 20 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 2a | tch."/$"."/".expand-file-name."* |
72a0 | 44 69 72 65 63 74 6f 72 79 2a 22 20 62 75 66 66 65 72 2d 66 6c 75 73 68 2d 75 6e 64 6f 20 70 72 | Directory*".buffer-flush-undo.pr |
72c0 | 69 6e 63 20 22 44 69 72 65 63 74 6f 72 79 20 22 20 74 65 72 70 72 69 20 63 61 6c 6c 2d 70 72 6f | inc."Directory.".terpri.call-pro |
72e0 | 63 65 73 73 20 22 6c 73 22 20 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 74 6f 72 79 20 22 2d | cess."ls".file-name-directory."- |
7300 | 63 22 20 22 65 78 65 63 20 6c 73 20 22 20 22 20 22 20 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 | c"."exec.ls.".".".file-name-nond |
7320 | 69 72 65 63 74 6f 72 79 5d 20 32 31 29 29 0a 0a 28 64 65 66 75 6e 20 73 61 76 65 2d 62 75 66 66 | irectory].21))..(defun.save-buff |
7340 | 65 72 73 2d 6b 69 6c 6c 2d 65 6d 61 63 73 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 | ers-kill-emacs.(&optional.arg)." |
7360 | 5c 0a 4f 66 66 65 72 20 74 6f 20 73 61 76 65 20 65 61 63 68 20 62 75 66 66 65 72 2c 20 74 68 65 | \.Offer.to.save.each.buffer,.the |
7380 | 6e 20 6b 69 6c 6c 20 74 68 69 73 20 45 6d 61 63 73 20 66 6f 72 6b 2e 0a 57 69 74 68 20 70 72 65 | n.kill.this.Emacs.fork..With.pre |
73a0 | 66 69 78 20 61 72 67 2c 20 73 69 6c 65 6e 74 6c 79 20 73 61 76 65 20 61 6c 6c 20 66 69 6c 65 2d | fix.arg,.silently.save.all.file- |
73c0 | 76 69 73 69 74 69 6e 67 20 62 75 66 66 65 72 73 2c 20 74 68 65 6e 20 6b 69 6c 6c 2e 22 20 28 69 | visiting.buffers,.then.kill.".(i |
73e0 | 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c5 88 c6 08 | nteractive."P").(byte-code.".... |
7400 | c1 5c 22 88 c1 c7 c8 c9 20 5c 22 3e 3f 86 15 00 ca cb 21 85 5c 5c 00 cc cd 21 3f 86 57 00 cd 20 | .\"......\">?.....!.\\...!?.W... |
7420 | c5 1b 1a 0a 85 4d 00 ce 0a 40 21 cf 3e 85 44 00 d0 0a 40 21 1c d0 0a 40 0c 5c 22 88 0c 29 85 44 | .....M...@!.>.D...@!...@.\"..).D |
7440 | 00 c1 89 13 88 0a 41 89 12 88 82 24 00 88 0b 3f 86 56 00 ca d1 21 2a 85 5c 5c 00 d2 20 87 22 20 | ......A....$...?.V...!*.\\....". |
7460 | 5b 61 72 67 20 74 20 70 72 6f 63 65 73 73 65 73 20 61 63 74 69 76 65 20 76 61 6c 20 6e 69 6c 20 | [arg.t.processes.active.val.nil. |
7480 | 73 61 76 65 2d 73 6f 6d 65 2d 62 75 66 66 65 72 73 20 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 | save-some-buffers.mapcar.(lambda |
74a0 | 20 28 62 75 66 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21 85 09 00 c2 08 21 87 22 20 5b | .(buf).(byte-code."..!.....!.".[ |
74c0 | 62 75 66 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 2d 6d 6f 64 69 | buf.buffer-file-name.buffer-modi |
74e0 | 66 69 65 64 2d 70 5d 20 33 29 29 20 62 75 66 66 65 72 2d 6c 69 73 74 20 79 65 73 2d 6f 72 2d 6e | fied-p].3)).buffer-list.yes-or-n |
7500 | 6f 2d 70 20 22 4d 6f 64 69 66 69 65 64 20 62 75 66 66 65 72 73 20 65 78 69 73 74 3b 20 65 78 69 | o-p."Modified.buffers.exist;.exi |
7520 | 74 20 61 6e 79 77 61 79 3f 20 22 20 66 62 6f 75 6e 64 70 20 70 72 6f 63 65 73 73 2d 6c 69 73 74 | t.anyway?.".fboundp.process-list |
7540 | 20 70 72 6f 63 65 73 73 2d 73 74 61 74 75 73 20 28 72 75 6e 20 73 74 6f 70 20 6f 70 65 6e 29 20 | .process-status.(run.stop.open). |
7560 | 70 72 6f 63 65 73 73 2d 6b 69 6c 6c 2d 77 69 74 68 6f 75 74 2d 71 75 65 72 79 20 22 41 63 74 69 | process-kill-without-query."Acti |
7580 | 76 65 20 70 72 6f 63 65 73 73 65 73 20 65 78 69 73 74 3b 20 6b 69 6c 6c 20 74 68 65 6d 20 61 6e | ve.processes.exist;.kill.them.an |
75a0 | 64 20 65 78 69 74 20 61 6e 79 77 61 79 3f 20 22 20 6b 69 6c 6c 2d 65 6d 61 63 73 5d 20 31 32 29 | d.exit.anyway?.".kill-emacs].12) |
75c0 | 29 0a 0a 28 64 65 66 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 6d 61 70 20 22 06 22 20 28 71 75 | )..(define-key.ctl-x-map.".".(qu |
75e0 | 6f 74 65 20 66 69 6e 64 2d 66 69 6c 65 29 29 0a 0a 28 64 65 66 69 6e 65 2d 6b 65 79 20 63 74 6c | ote.find-file))..(define-key.ctl |
7600 | 2d 78 2d 6d 61 70 20 22 11 22 20 28 71 75 6f 74 65 20 74 6f 67 67 6c 65 2d 72 65 61 64 2d 6f 6e | -x-map.".".(quote.toggle-read-on |
7620 | 6c 79 29 29 0a 0a 28 64 65 66 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 6d 61 70 20 22 12 22 20 | ly))..(define-key.ctl-x-map.".". |
7640 | 28 71 75 6f 74 65 20 66 69 6e 64 2d 66 69 6c 65 2d 72 65 61 64 2d 6f 6e 6c 79 29 29 0a 0a 28 64 | (quote.find-file-read-only))..(d |
7660 | 65 66 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 6d 61 70 20 22 16 22 20 28 71 75 6f 74 65 20 66 | efine-key.ctl-x-map.".".(quote.f |
7680 | 69 6e 64 2d 61 6c 74 65 72 6e 61 74 65 2d 66 69 6c 65 29 29 0a 0a 28 64 65 66 69 6e 65 2d 6b 65 | ind-alternate-file))..(define-ke |
76a0 | 79 20 63 74 6c 2d 78 2d 6d 61 70 20 22 13 22 20 28 71 75 6f 74 65 20 73 61 76 65 2d 62 75 66 66 | y.ctl-x-map.".".(quote.save-buff |
76c0 | 65 72 29 29 0a 0a 28 64 65 66 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 6d 61 70 20 22 73 22 20 | er))..(define-key.ctl-x-map."s". |
76e0 | 28 71 75 6f 74 65 20 73 61 76 65 2d 73 6f 6d 65 2d 62 75 66 66 65 72 73 29 29 0a 0a 28 64 65 66 | (quote.save-some-buffers))..(def |
7700 | 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 6d 61 70 20 22 17 22 20 28 71 75 6f 74 65 20 77 72 69 | ine-key.ctl-x-map.".".(quote.wri |
7720 | 74 65 2d 66 69 6c 65 29 29 0a 0a 28 64 65 66 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 6d 61 70 | te-file))..(define-key.ctl-x-map |
7740 | 20 22 69 22 20 28 71 75 6f 74 65 20 69 6e 73 65 72 74 2d 66 69 6c 65 29 29 0a 0a 28 64 65 66 69 | ."i".(quote.insert-file))..(defi |
7760 | 6e 65 2d 6b 65 79 20 65 73 63 2d 6d 61 70 20 22 7e 22 20 28 71 75 6f 74 65 20 6e 6f 74 2d 6d 6f | ne-key.esc-map."~".(quote.not-mo |
7780 | 64 69 66 69 65 64 29 29 0a 0a 28 64 65 66 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 6d 61 70 20 | dified))..(define-key.ctl-x-map. |
77a0 | 22 04 22 20 28 71 75 6f 74 65 20 6c 69 73 74 2d 64 69 72 65 63 74 6f 72 79 29 29 0a 0a 28 64 65 | ".".(quote.list-directory))..(de |
77c0 | 66 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 6d 61 70 20 22 03 22 20 28 71 75 6f 74 65 20 73 61 | fine-key.ctl-x-map.".".(quote.sa |
77e0 | 76 65 2d 62 75 66 66 65 72 73 2d 6b 69 6c 6c 2d 65 6d 61 63 73 29 29 0a 0a 28 64 65 66 76 61 72 | ve-buffers-kill-emacs))..(defvar |
7800 | 20 63 74 6c 2d 78 2d 34 2d 6d 61 70 20 28 6d 61 6b 65 2d 6b 65 79 6d 61 70 29 20 22 5c 0a 4b 65 | .ctl-x-4-map.(make-keymap)."\.Ke |
7820 | 79 6d 61 70 20 66 6f 72 20 73 75 62 63 6f 6d 6d 61 6e 64 73 20 6f 66 20 43 2d 78 20 34 22 29 0a | ymap.for.subcommands.of.C-x.4"). |
7840 | 0a 28 66 73 65 74 20 28 71 75 6f 74 65 20 63 74 6c 2d 78 2d 34 2d 70 72 65 66 69 78 29 20 63 74 | .(fset.(quote.ctl-x-4-prefix).ct |
7860 | 6c 2d 78 2d 34 2d 6d 61 70 29 0a 0a 28 64 65 66 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 6d 61 | l-x-4-map)..(define-key.ctl-x-ma |
7880 | 70 20 22 34 22 20 28 71 75 6f 74 65 20 63 74 6c 2d 78 2d 34 2d 70 72 65 66 69 78 29 29 0a 0a 28 | p."4".(quote.ctl-x-4-prefix))..( |
78a0 | 64 65 66 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 34 2d 6d 61 70 20 22 66 22 20 28 71 75 6f 74 | define-key.ctl-x-4-map."f".(quot |
78c0 | 65 20 66 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 29 29 0a 0a 28 64 65 66 | e.find-file-other-window))..(def |
78e0 | 69 6e 65 2d 6b 65 79 20 63 74 6c 2d 78 2d 34 2d 6d 61 70 20 22 06 22 20 28 71 75 6f 74 65 20 66 | ine-key.ctl-x-4-map.".".(quote.f |
7900 | 69 6e 64 2d 66 69 6c 65 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 29 29 0a 0a 28 64 65 66 69 6e 65 | ind-file-other-window))..(define |
7920 | 2d 6b 65 79 20 63 74 6c 2d 78 2d 34 2d 6d 61 70 20 22 62 22 20 28 71 75 6f 74 65 20 73 77 69 74 | -key.ctl-x-4-map."b".(quote.swit |
7940 | 63 68 2d 74 6f 2d 62 75 66 66 65 72 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 29 29 0a | ch-to-buffer-other-window)). |