PW[0 +8+fq(+4)[1 0fo10f"g+q1' +fq()+4u1 fq1"l 0' ,q1:m(q1+4(]1]0))=^ 7lvd ]?(V0\8HAU'cFr8W<)60)& Auto Save All Buffers& Auto Save File& Auto Save Setup& Real-time Interrupt& Secretary Macro"& Setup AUTO-SAVE-MODE Library^R Save File~DIRECTORY~!~DOC~ & Auto Save All Buffers~DOC~ & Auto Save File~DOC~ & Auto Save Setup~DOC~ & Real-time Interrupt~DOC~ & Secretary Macro(~DOC~ & Setup AUTO-SAVE-MODE Library~DOC~ ^R Save File~DOC~ ~FILENAME~~FILENAME~~INVERT~AUTO-SAVE-MODEK0fo..qAUTO-SAVE-MODE Loaded-13147547037"n 0m.CAuto-Save-Mode Setup HookIf non-0, called when AUTO-SAVE-MODE is loaded 0m.CBefore Auto Save HookIf non-0 is run just before auto saving 0m.CAfter Auto Save HookIf non-0 is run just after auto saving 0m.CAuto Save Star* If non-0, user wants * in mode line after auto-save 13147547037m.vAUTO-SAVE-MODE Loaded' [1[k m.mKill Variableuk mkMM & Auto Save Setupw mkMM & Auto Save Filew mkMM ^R Save Filew mkMM & Secretary Macrow mkMM & Auto Save All Buffersw mkMM & Real-time Interruptw 0fo..qExit Hookf"ew :i*'u1 @:i*|ff"e m(m.m& Auto Save All Buffers)' 1|m.vExit Hookw qAuto-Save-Mode Setup Hookf"nu1 m1' "#w m.m& Secretary Macrof(u.f)u..f m.m& Real-time InterruptfsClkMacrow fsClkInterval"e 4*60*60fsClkIntervalw' m.m^R Save Fileu:.x()' q0[1 qBuffer Index[2 qBuffer Filenamesf"nf[DFile fsDVersion"e q:.b(q2+12)"e 1u1''' q1u:.b(q2+10) r[1[2[3[4 0f[VB 0f[VZ -qBuffer Index"e qBuffer filenamesu1' "# q:.b(+2)u1' q1"e @ftNo auto save filenames. 0fsEchoActivew ' q1f[DFile fsURead"n e[fne]' 1:< 1,er fsIFileu3 fsIFVersionu4 fsIFCDateu2 ec q2-(0fo..qASav 3 File)"e q4fsDVersionw fsDFileu1 etASAVE OUTPUT' >w qBefore Auto Save Hookf"nu2 m2'w fsUWrite"n e\fne^' ei fsOFCDateu2 hp ef1 fsOFVersionf"gu:.b(+9) 1fsModeChange'w zu:.b(+5+6) fsOFileu1 q2u:.b(+8) q2m.vASav 1 Filew @ftAuto saved: 1 qAfter Auto Save Hookf"nu1 m1'w 0fsXModifiedw qAuto Save Star"e 0fsModifiedw' 0fsEchoActivew -16:"l m(m.m& Auto Save All Buffers)w 1' :i*CfsEchoDis ff"g fsXModified"e @ft(No changes need to be written) 0fsEchoActivew 1' @ft(auto save) qBuffer Indexm(m.m& Auto Save File) 1' [1[2[3[4 f[DFile 0f[VB 0f[VZ qBuffer Filenamesf"ew :i*No filenames to save underfsErr 'u1 et1 q1u2 fsURead"n e[fne]' 1:< 1,er fsIFileu2 fsIFVersionu3 fsIFCDateu4 ec q4-(0fo..qASav 2 File)"e q3fsDVersionw fsDFileu1 etASAVE OUTPUT' q:.b(qBuffer Index+8)u3 q4"n q3"n q4-q3"n ftThis file has been written on disk since you last read or wrote it. Should I write it anyway m(m.m& Yes or No)(f 0u..h)"e 0'''' >w fsXModified"e @ft(No changes need to be written) ' "# fsUWrite"n e\fne^' ei fsOFCDateu3 hp ef1 fsOFVersionf"gu:.b(+9) 1fsModeChange'w zu:.b(qBuffer Index+5+6) fsOFileu2 q3u:.b(qBuffer Index+8) @ftUser saved: 2 0fsXModifiedw' fs^RMDlyfs^RMCntw 0fsModifiedw m(m.mKill Variable)ASav 2 Filew 0fsEchoActivew 1 4qBuffer Index[1 q:.b(q1+4)[..o fsXModified"e 1' q:.b(q1+10)"e 1' :i*CfsEchoDis @ft(auto save) 0fsEchoActivew fs^RMDlyfs^RMCntw q1m(m.m& Auto Save File) 1L0[1 [2 -1[3 [..o < 1f q1+q:.b(q1)u1 q1-(fq.b/5); > ?0fsTyiCount"n 0' m(m.m& Auto Save All Buffers) 0@v 05New version of Auto Save Mode and its associates. S Install hooks, create variables. Runs Auto-Save-Mode Setup Hook, if it is non-0, in which case it must take care of setting keys, fsClkMacro, fsClkInterval, ..F and .F. We set those only when there is no hook. This object file was compressed on 1:52pm Monday, 11 March 1996 by ALDERSON on TOED.XKL.COM from the following source libraries: DXX:AUTO-SAVE-MODE.EMACS.118, 10/27/84 11:37:234S Decide whether to turn on auto saving for file,S Subroutine that may write out an auto save file. NUMARG is Buffer Index of buffer in .B to save. We run Before Auto Save Hook and After Auto Save Hook if non-0.C^R Write out a user-save file if needs it. A user-save file is one written by user decision, and therefore never to be touched by auto saving. E.g. a high-level backup point. Declares this version to be a user-saved file, i.e. NOT an auto saved one. Thus, auto saving will not occur to this version again. Given an explicit NUMARG, we just run & Auto Save File, to ensure that the file is currently safe, if not user-level consistent: thus this will keep the file declared an auto save file. A NUMARG of 16 or greater calls & Auto Save All Buffers.S ..F: Auto save for use in ^R mode editing. The buffer is auto saved after every fs^RMDly characters. Auto saving happens by calling & Auto Save File.|S For each buffer that requires it. I.e. for each that is modified and has auto saving on. & Auto Save File is called.-S Save file after 5 minutes of idle time.& Setup AUTO-SAVE-MODE Library & Auto Save Setup & Auto Save File ^R Save File & Secretary Macro & Auto Save All Buffers & Real-time Interrupt \+8+fq(+4)[2 0[3 < %3,-q2f2u3 q3&1@; q3"l 0' > f[BBind q3-1*5,q3*5g2 q:..o(0)+q2