On Mon, 10 Dec 2007 11:31:17 +0000, Mark Smith wrote:
> This is great! I couldn't find this anywhere. So here's a function
> that uses it - maybe someone has better code for converting the path
> to applescript.
Well you can have AppleScript do it for you using "as POSIX file":
function thePackages pFolder
put "tell application" && quote & "Finder" & quote & cr & \
"packages of folder (" && quote & pFolder & quote & \
"as POSIX file)" & cr & "end tell" into tScr
do tScr as applescript
put the result into tList
replace comma with cr in tList
repeat for each line L in tList
get wordoffset("file", L)
put word it + 1 of L & cr after tPackages
end repeat
replace quote with empty in tPackages
return char 1 to -2 of tPackages
end thePackages
Either way works...
Ken Ray
Sons of Thunder Software, Inc.
Email: [EMAIL PROTECTED]
Web Site: http://www.sonsothunder.com/
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
