Script to save mail and attachment(s) as pdf to DT


it would really help my workflow to get a script working which would be able to save an selected email and safe it and it’s attachment(s) as pdf document to DT.
For the browser such kind of script exists (“Add PDF Document to DEVONthink”). What I found while searching the internet is the following very useful script: … achments/#
However in LION this script no longer works.
Any ideas?

It’s still working over here after enabling System Preferences > Universal Access > Enable access for assistive devices.