On Jul 6, 2010, at 10:50 AM, J. Landman Gay wrote:
put ".ext" into tExtension -- use yours
set the itemDelimiter to "."
if last item of tFileName <> tExtension
then put tExension after tFilename
A minor correction: the last item of tFileName in this snippet will be
something like "ext" -- not ".ext". So you should do something like
the following:
put "ext" into tExtension -- use yours
-- note the absence of the dot
set the itemDelimiter to "."
if the number of items of tFileName = 1 then
-- no extension provided by user
put "." & tExtension after tFilename
else -- extension provided
if item -1 of tFileName <> tExtension then
-- wrong extension
put tExtension into item -1 of tFilename
end if
end if
-- Peter
Peter M. Brigham
pmb...@gmail.com
http://home.comcast.net/~pmbrig
_______________________________________________
use-revolution mailing list
use-revolution@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
