I am glad you did not use it. There was one major flaw in the script (It did a silent "overwrite" if file with the same name already existed). Now, i have fixed it.
To those who wish to use this script: I have updated it so that you can specify the path yourself and fixed minor problems. 
The script uses the path "8:untitled folder" to save your file which  is unlikely to be present in your system. So replace it. 
If you dont know applescript do this to change the path:
1. Open Script Editor.
2.  type "choose folder"
3. Select the folder,  you want to save your files to and press return 
4. and you will see something this in the results pane below (of Script Editor):
alias "disk0s1:Users:chris:Desktop:"
Just replace "disk0s1:Users:chris:Desktop:" in the script for "8:untitled folder"



using terms from application "Quicksilver"
on process text sometext
set the clipboard to sometext
set theclipboardr to (the clipboard as string)
set someline to the first paragraph of theclipboardr
--change your path here in the following line
set destpath to "8:untitled folder:"
tell application "Finder"
set dpath to (destpath as Unicode text) & (someline as Unicode text) & ".txt"
if item (dpath) exists then
display alert "Document with this name already exists"
else
tell application "TextEdit"


.


--activate
--activate actually opens a new text document if textedit is not already open. So I removed it.
set x to make new document at end of documents
tell x
set its text to theclipboardr


save in file (((destpath as Unicode text) & someline as Unicode text) & ".txt")
end tell
close every document
end tell
end if
end tell
end process text
end using terms from

Attachment: New TextEdit Document 2.scpt
Description: Binary data


Reply via email to