Mailsmith
Other Programs
Scripts
Mailsmith.scpt
Archive to sub-mailbox
Check Spelling
Find reply
Change font size
Submit Script to JEM
Fix common spelling errors
Setting SMTP server
URL from Safari
Address from AB
linkMunge
Export to Address Book
Saving attachments
Digest Script
File with same
POP window position
Position of new windows
iCal and Mailsmith
Edit From Line
Modified Thread Script
Reply to Selection
Temporary Text Window
Compact gain
Tracking backups
Edit subject
Googler
Auto-rewrap
MMA
SMTP server
Open, fetch, and close
URL Manager
BrainForest
Thread by Author
Thread by subject
Export Email
Get Selection
Read Addresses
Export Email
Organize Email
Account setup
Mailsmith 2 BBEdit
BBEdit 2 Mailsmith
Search II
Check One
Delete Enclosure
Open, fetch, close
Set Answered
Set Redirected
Empty Trash
List found
Print Several
Del. old. msg.
Delete Enclosures
Accounts
Address Book
Editing
Filters
General
Import/Export
Links
Mailboxes
Memory
Scripting
Speed
send/receive
Tips/Tricks


Temporary Text Window

Author Brennan Young
Last modified 2002-11-22
What is this?
Opens a text window and SAVES it in the 'cleanup at startup' folder, so you don't have to think about where to save it. Such files will get deleted, so only use these for scratch documents, grepping, jotting down quick phone numbers etc.

(* 
Temporary Text window
by Brennan Young
Often you want to open a plain text window in Mailsmith
for some random writing, grepping, a quick phone number or whatever
What bothers me about these is that Mailsmith asks if you want to *save* them
when you close them, prompting for a location, which wastes my time.

This script will open a new text window and will save it 
in the 'cleanup at startup' folder. 
It will be deleted next time the machine boots.
*)

property tempid : 0

set tempid to tempid + 1
set tempName to "Temporary Text Window " & (tempid as string)
set cleanupAtStartup to (path to "flnt")
set fullTempPath to (cleanupAtStartup as string) & tempName

tell application "Mailsmith"
  tell (make new text window with properties {name:tempName})
    save to fullTempPath
  end tell
end tell