Re: TIDs case insensitive? [ToLower errata]
Re: TIDs case insensitive? [ToLower errata]
- Subject: Re: TIDs case insensitive? [ToLower errata]
- From: Richard 23 <email@hidden>
- Date: Thu, 8 Mar 2001 00:48:31 -0800
Oops. Left out the ABC and xyz properties in the ToLower hander.
-- ---------------------------------------------------------
-- Preprocessed by Convert Script 1.0d5
-- ---------------------------------------------------------
-- author: Richard 23, date: Wednesday, March 7, 2001
-- ---------------------------------------------------------
property ABC : "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
property xyz : "abcdefghijklmnopqrstuvwxyz"
on ToLower(theStr)
set theStr to theStr as string
repeat with thePos from 1 to 26
if theStr contains ABC's character thePos then
set {AppleScript's text item delimiters} to ==>
{ABC's character thePos}
set {AppleScript's text item delimiters} to ==>
{xyz's character thePos, theStr's text items}
set {AppleScript's text item delimiters, theStr} to ==>
{"", result's end as string}
end if
end repeat
return theStr
end ToLower
-- ---------------------------------------------------------
R23