change account script fails in 5.6.1

[MB]

Wayne Brisettes old script ChangeAccount fails in 5.6.1. I get error
-1783 "PowerMail got an error: Some data was the wrong type.". Expected
type is "item".

Any ideas why this is so suddenly and how to make this work again? I
assume Apple or CTM changed the syntax, objects or something.

Here's his script:

-- Begin AppleScript

tell application "PowerMail"
        set AllAccounts to name of accounts
        set MyMessage to current messages
        repeat with i in MyMessage
                set EMailAccount to (choose from list AllAccounts) as string
                set account of i to EMailAccount --  <----------I get the error 
here
        end repeat
end tell

-- End AppleScript

Mikael

Technoids:
PM 5.6.1 build 4499 sv / SpamSieve 2.6.6 sv | OS X 10.4.8 | Powerbook
G4/400 | 1GB / 80GB