-- Create a gist from the specified text or the contents of the selected file
--
-- Author: Brian Smith <bsmith@swig505.com>
 
using terms from application "Quicksilver"
 
	on process text str
		my growlRegister()
		do shell script "echo '" & str & "' | /usr/local/bin/gist"
		growlNotify("Gist Created!", "URL has been copied to clipboard")
	end process text
 
	on open _file
		my growlRegister()
		set _path to quoted form of the POSIX path of _file
		do shell script "cat " & _path & " | /usr/local/bin/gist"
		growlNotify("Gist created!", "URL has been copied to clipboard")
	end open
 
end using terms from
 
using terms from application "GrowlHelperApp"
 
	on growlRegister()
		tell application "GrowlHelperApp"
			register as application "Gist" all notifications {"Alert"} default notifications {"Alert"}
		end tell
	end growlRegister
 
	on growlNotify(grrTitle, grrDescription)
		tell application "GrowlHelperApp"
			notify with name "Alert" title grrTitle description grrDescription application name "Gist" icon of file path to me
		end tell
	end growlNotify
 
end using terms from