rudyrichter

using terms from application "iChat"
    on message received message from theBuddy for textChat
        set whoDidIt to full name of theBuddy
        set buddyIcon to image of theBuddy
        tell application "System Events"
            set frontApp to name of first application process whose frontmost is true
        end tell
        tell application frontApp
            set window_name to name of front window
        end tell

rudyrichter

property _timeMachineDiskName : "Backup of Babs"
property _diskNamesToTryToEject : {"MaryMedia", "MaryBackup+", "ShirleyClone", "ShirleyLion", "bzzt"}

property _growlApplication : "Go home"
property _growlNotification : "Status"


on _notify(_title, _description)
	tell application id "com.Growl.GrowlHelperApp" to notify with name _growlNotification title _title description _description application name _growlApplication identifier _growlNotification
end _notify