Since upgrading from 10.4.4 to 10.4.5, this script fails: "startup
disk missing value". Any suggestions?
property extension_list : {"AIFF", "MPG3", "WAVE"}
tell application "Finder"
activate
set name_text to ""
set mycount to 1
set this_folder to choose folder with prompt "Choose a folder to list:"
set the folder_items to (every item of this_folder)
repeat with i from 1 to the count of the folder_items
set this_item to (item i of the folder_items)
if (mycount < 31) then
try
if (the file type of this_item is in the extension_list) then
set this_one to this_item as alias
set name_text to name_text & mycount & (ASCII character 9) & the
name of this_item & (ASCII character 9) & (ASCII character 13)
set mycount to mycount + 1
end if
on error error_message number error_number
end try
end if
end repeat
set the clipboard to «class ktxt» of ((the name_text as text) as
record)
end tell