Google
 

Trailing-Edge - PDP-10 Archives - mit_emacs_170_teco_1220 - emacs/mini.elib
There are no other files named mini.elib in the archive.
(W
[0+8+FQ(+4)[1
0FO10F"G+Q1'
+FQ()+4U1
FQ1"L0'
,Q1:M(Q1+4(]1]0))
   @aLCXb
lDtXD}d,'6#=n& Kill MINI Library& Setup MINI Library^R Mini-Find Tag^R Mini-Visit Tag~DIRECTORY~~DOC~ & Kill MINI Library~DOC~ & Setup MINI Library~DOC~ ^R Mini-Find Tag~DOC~ ^R Mini-Visit Tag~DOC~ ~Filename~~Filename~
~INVERT~=m.m^R Mini-Find Tagu..,
m.m^R Mini-Visit Tagu...,
V1,m.m^R Mini-Find Tag-q..,"e0u..,'
1,m.m^R Mini-Visit Tag-q...,"e0u...,'
"1,(f):m(m.m^R Mini-Find Tag)
[0[1[2[3[4[5[6[7[8[9[B
qModeu0
:i*fo..QLast 0 Mini-Tagu1
1:<o0>
:i*USM	Unsupported Mode: 0fserr
!Schlap!
!Midas!>
:i3

:i4:
oDo-It
!Teco!>
:i3

!
:i4:!
oDo-It
!Scheme!
!Lisp!>
:i3
(DEF
(SET
:i4
oDo-It
!Do-It!
qBuffer NameuB
.u7.u9
fnqBm(m.mSelect Buffer)q7j
ff&1"n
q1u2
:i*No more such tagsu8
oArg-Given'
"#j
:i*No such tagu8'
ff&2"e
1,fFind 0 Def (1): u2'
"#
1,fVisit 0 Def (1): u2'
fq2"l0'
fq2"eq1u2'
"#q2m.vLast 0 Mini-Tag'
!Arg-Given!
<:s3"e
q7j:i*8: 2fserr'
fq4"eoInside'
:fb4"l!Inside!
0l:fb2"lfkc
fq4@;
:fb4:;''>
0lq7:w.u7
ff&2"n
[Last 0 Mini-Tag
[Editor Type
qEditor Type[0
fq0"g:i0, 0'
:iEditor Type20
1fsmodech
q9u7'
0MINI:PseduoiTagsrHack forfpeople who don't like tags tables(& Set things up for our neat library& Kill our library 3^R Get recursive edit on tag in current buffer.
Defaults are kept per-mode. The following modes are permitted:
Lisp, Scheme, Teco, Midas, Schlap T& Setup MINI Library
& Kill MINI Library
^R Mini-Visit Tag
^R Mini-Find Tag
T+8+fq(+4)[20[3
<%3,-q2f2u3q3&1@;q3"l0'>
f[BBindq3-1*5,q3*5g2q:..o(0)+q2