Apple

Here's a problem which originated on the Carbon list.

"Get Mail's unread message count so it matches the number on its icon badge in the dock."

What is needed is something fast which works on all kinds of setups.

Can anyone verify #4?

1. Too slow

tell application "Mail" to count (every message of every mailbox whose read status is false)

2. Doesn't work on all setups:

set sum to 0

tell application "Mail" to set res to unread count of mailboxes

repeat with i in res

set sum to sum + i

end repeat

sum

3. Doesn't work on all setups:

tell application "Mail"

set msgCount to {}

repeat with thisAccount in (every account whose enabled is true)

set end of msgCount to (unread count of every mailbox of thisAccount)

end repeat

msgCount

end tell

4. Latest version of #2. Can't verify if it works on all setups:

set sum to 0

tell application "Mail"

set alist to every account whose enabled is true

repeat with a from 1 to count of alist

set res to unread count of every mailbox

repeat with i in res

set sum to sum + i

end repeat

sum

end tell

Thanks!

Philip Aker