CotEditor Preview for HTML

Live Preview.scpt

(*
A kinda hacky preview for CotEditor when working with HTML. Requires that you save your file before opening, and only supports using Safari for the preview at this time.
Designed by CtrliPhones in Script Editor
*)

tell application "CotEditor"
	set currentFile to file of front document
end tell

if currentFile is missing value then
	tell application "CotEditor" to display alert "Save document" message "Please save this file to an accessible directory first." as warning
end if

set fileLocation to (currentFile's POSIX path)
set fullURL to "file://" & fileLocation

tell application "Safari"
	open location fullURL
	activate
end tell