Re: Text items
Re: Text items
- Subject: Re: Text items
- From: kai <email@hidden>
- Date: Wed, 17 Jan 2007 01:03:09 +0000
On 17 Jan 2007, at 00:55, kai wrote:
Since there's no need to reset the variable 'names1' in this case,
I meant to say:
Please excuse me, folks. Not feeling too bright tonight. Let's rerun
the whole thing as I intended...
-------------------
to strip_extensions from q to e
script o
property l : q
end script
set tid to text item delimiters
set text item delimiters to "."
considering case
repeat with i from 1 to count o's l
tell text item 1 of o's l's item i to if it ends with e then
set o's l's item i to text 1 thru -3
else
set o's l's item i to it
end if
end repeat
end considering
set text item delimiters to tid
end strip_extensions
set names1 to {"231-001_M.tif", "231-001.tif", "231-001.jpg",
"231-001-a_M.tif", "231-001-a.tif", "231-001-a.jpg"}
strip_extensions from names1 to "_M"
names1 --> {"231-001", "231-001", "231-001", "231-001-a", "231-001-
a", "231-001-a"}
-------------------
---
kai
_______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
Archives: http://lists.apple.com/mailman//archives/applescript-users
This email sent to email@hidden