RE: [MacPerl] beginner's q...

[Don Arbow <donarb@nwlink.com>]

On 8/5/99 at 9:00 AM, Creede Lambard (Volt Computer) wrote:

: Basically, I selected ttxt because everybody (unless they've nuked it off
: their system) has SimpleText. Anytime we create documentation for IE/OE it
: gets saved either as "TEXT/MSIE" (Internet Explorer, for HTML), "TEXT/ttxt"
: (regular SimpleText -- actually, we seldom use this) or "ttro/ttxt"
: (SimpleText read-only, for stuff like readme and license files), because
: almost every Mac out there with Internet Explorer installed will understand
: those file types.
: 
: This can cause problems, though, because if you have a TEXT/ttxt file that
: goes over SimpleText's limit (32K? I forget) you can't open it by just
: double-clicking. Better in that case to give it a creator type of a program
: that's actually on your system that doesn't have a limit, like BBEdit or
: Alpha.
: 


BBEdit ships with a nifty little utility called "SimpleText Redirector",
essentially an AppleScript droplet.  It has SimpleText's creator.  You remove all
copies of SimpleText from your system, then you can open all SimpleText document
with the application of your choosing.  I use TexEdit, since it works like
SimpleText (embedded PICTs), yet has no 32K restriction.

Below is the script:

property target : application "BBEdit"
property stayOpen : true

on run
    set target to application ((choose file with prompt "Select a new SimpleText
replacement" of type {"APPL"}) as text)
    set stayOpen to button returned of (display dialog "Stay open?" buttons
{"Yes", "No"} default button 1) is "Yes"
    if not stayOpen then quit me
end run

on open names
    tell target
        activate
        open names
    end tell
    if not stayOpen then quit me
end open

Don



===== Want to unsubscribe from this list?
===== Send mail with body "unsubscribe" to macperl-request@macperl.org