From: "Dalton Spence" 
@Date: Sat, 11 Jan 2003 00:43:05 -0500
@Sender: semware-owner{at}sawasdi.apana.org.au



Sent: Thursday, January 09, 2003 12:36 PM

> 2.) About the installation procedure; isn't it a bit dangerous to
> make "Edit by TSEPro" the default openning option for any
> unregisterred file type? Just to be safe, I wrote the following
> macro which I added to my AutoLoad list:
>
>  ------------------------------- OpenSafe.s
begins -------------------------------
> proc OnStartup()
>     integer i
>     string DftExt[60]=Query(DefaultExt), ExtToken[3]
>     if (not BrowseMode())
>         BrowseMode(TRUE)
>         for i=1 to NumTokens(DftExt," ")
>             ExtToken = GetToken(DftExt," ",i)
>             if (ExtToken == CurrExt())
>                 BrowseMode(FALSE)
>                 return()
>             endif
>         endfor
>         Message("Openned in Browse Mode by Default")
>     endif
> end
>
> proc WhenLoaded()
>     Hook(_ON_EDITOR_STARTUP_,OnStartup)
> end
>  ------------------------------- OpenSafe.s
ends -------------------------------

Oops! I spoke too soon. It seemed to work okay to start with, but
somewhere along the line it began starting every session in browse
mode, even for the valid extensions. Any ideas as to why?

--
              {at}=================================================={at}
              | Dalton S. Spence, B.Sc.  |
              | Home Page: http://www.hwcn.org/~ag775/home.html  |
              |      Family Motto: Virtute Acquiritur Honos      |
              | Joseph Stalin takes our ukelele and was fondled  |
              |              by the Vatican. FNORD!              |
              {at}=================================================={at}


--
TSEPro mailing list



---
[sawasdi.apana.org.au] (3:800/846.13)