Kevin Funderburg kevin-funderburg

## close-document-without-saving.applescript
tell application "System Events" to set frontapp to name of first process whose frontmost is true

tell application frontapp
	tell front document
		close saving no
	end tell
end tell

## mail-make-message-url.applescript
use scripting additions
tell application "Mail"
	set selectedMessages to selection
	set theMessage to item 1 of selectedMessages
	set messageid to message id of theMessage
	set urlText to "message://" & "%3c" & messageid & "%3e"
	set the clipboard to urlText
end tell

## safari-duplicate-tab.applescript
tell application "Safari"
	tell front window
		set theURL to URL of current tab
		set current tab to make new tab with properties {URL:theURL}
	end tell
end tell

## monthly-cleanups.applescript
(*
===============================================================================
                                Monthly Cleanup
===============================================================================

Version: 1.10                                    Updated: 05/15/19 21:48:10 CST
By: Kevin Funderburg

PURPOSE:

## insert-dynamic-handler-description.applescript
(*
===============================================================================
                    Insert Dynamic Handler Description
===============================================================================

Version: 1.0                                     Updated: 05/16/19 19:31:26 CST
By: Kevin Funderburg

PURPOSE:

## init.coffee
# initialization file (not found)
	tell application "System Events" to set frontapp to name of first process whose frontmost is true

	tell application frontapp
	tell front document
	close saving no
	end tell
	end tell
	use scripting additions
	tell application "Mail"
	set selectedMessages to selection
	set theMessage to item 1 of selectedMessages
	set messageid to message id of theMessage
	set urlText to "message://" & "%3c" & messageid & "%3e"
	set the clipboard to urlText
	end tell
	tell application "Safari"
	tell front window
	set theURL to URL of current tab
	set current tab to make new tab with properties {URL:theURL}
	end tell
	end tell
	(*
	===============================================================================
	Monthly Cleanup
	===============================================================================

	Version: 1.10 Updated: 05/15/19 21:48:10 CST
	By: Kevin Funderburg

	PURPOSE: