Script to fix Mail.app font problem

Currently there is a documented issue with Mail.app’s inability to properly cast the font face within the HTML tags. When sending an email with Mail’s default font, it sends the following:

(FONT class=“Apple-style-span” size=“3”)

When the tag should be:

(FONT class=“Apple-style-span” face=“Arial” size=“3”)

There is a workaround for this - change the default font to something you don’t typically use, then change the font each time you write a new email. This sets the font face correctly.

I would like to write an AppleScript which does something like this (in plain text, please excuse my lack of scripting knowledge):

tell application “Mail”
on new mail window (whenever I open a new mail window)
select message area (move down and select the message text area)
set font to “X” (change the font to my desired default)
select address field (return to the default field)
end tell

My feeling is that this way, it would quickly make the changes on each email. This is something that I’m positive would be useful for anyone currently using Mail.app.

Thanks in advance for any help you can give.

Model: MacBook Pro 17" Intel Core Duo 2.16GHz
Browser: Firefox 1.5.0.6
Operating System: Mac OS X (10.4)