<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>how quit ?</TITLE>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<STYLE type=text/css>BLOCKQUOTE {
        PADDING-BOTTOM: 0px; PADDING-TOP: 0px
}
DL {
        PADDING-BOTTOM: 0px; PADDING-TOP: 0px
}
UL {
        PADDING-BOTTOM: 0px; PADDING-TOP: 0px
}
OL {
        PADDING-BOTTOM: 0px; PADDING-TOP: 0px
}
LI {
        PADDING-BOTTOM: 0px; PADDING-TOP: 0px
}
</STYLE>

<META content="MSHTML 6.00.2715.400" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff>
<DIV>Yves,</DIV>
<DIV> </DIV>
<DIV>Any reason you can't do:</DIV>
<DIV> </DIV>
<DIV>on doquit</DIV>
<DIV>  quit</DIV>
<DIV>end doquit</DIV>
<DIV> </DIV>
<DIV>???</DIV>
<DIV> </DIV>
<DIV>Ken Ray<BR>Sons of Thunder Software<BR>Email: <A 
href="mailto:kray@sonsothunder.com">kray@sonsothunder.com</A><BR>Web Site: <A 
href="http://www.sonsothunder.com/">http://www.sonsothunder.com/</A></DIV>
<DIV> </DIV>
<BLOCKQUOTE dir=ltr 
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
  <DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
  <DIV 
  style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B> 
  <A title=yvescoppe@skynet.be href="mailto:yvescoppe@skynet.be">yves COPPE</A> 
  </DIV>
  <DIV style="FONT: 10pt arial"><B>To:</B> <A 
  title=use-revolution@lists.runrev.com 
  href="mailto:use-revolution@lists.runrev.com">use-revolution@lists.runrev.com</A> 
  </DIV>
  <DIV style="FONT: 10pt arial"><B>Sent:</B> Wednesday, April 17, 2002 9:44 
  AM</DIV>
  <DIV style="FONT: 10pt arial"><B>Subject:</B> how quit ?</DIV>
  <DIV><BR></DIV>
  <DIV>Hi,</DIV>
  <DIV><BR></DIV>
  <DIV>I've a mainstack with many substacks (on Mac)</DIV>
  <DIV>to quit, I've written the following code (called by a menupick handler) 
  :</DIV>
  <DIV><BR></DIV>
  <DIV><FONT face=Geneva color=#000000 size=+2>on doquit<BR>  put the 
  openStacks into tstacks<BR>  put the number of lines of tstacks into 
  totLines<BR>  repeat with x = totLines down to 1<BR>    
  put line x of tstacks into tLine<BR>    if tLine contains "Rev" 
  then<BR>      delete line x of 
  tStacks<BR>    end if<BR>  end repeat<BR>  filter 
  tStacks with "*?"<BR>  repeat for each line L in 
  tStacks<BR>    save stack L<BR>    close stack 
  L<BR>  end repeat<BR>end doquit</FONT></DIV>
  <DIV><BR></DIV>
  <DIV>In rev, it works fine</DIV>
  <DIV>in a standalone, nothing happens. I can't quit. Why ?</DIV><X-SIGSEP><PRE>-- 
</PRE></BLOCKQUOTE></X-SIGSEP></BODY></HTML>