Open the current Safari page in Google Chrome

Open Page In Chrome.scpt

tell application "Safari"
	set the_url to URL of front document
end tell

tell application "Google Chrome"
	try
		set win to first window
	on error
		set win to make new window
	end try
	tell win
		set test_url to URL of active tab
		if URL of active tab = "chrome://newtab/" then
			set URL of active tab to the_url
		else
			set all_tabs to get tabs of win
			set found_tab to false
			repeat with a_tab in all_tabs
				if URL of a_tab is the_url then
					set found_tab to true
				end if
			end repeat
			if found_tab is false then
				set newTab to make new tab with properties {URL:the_url}
			end if
		end if
	end tell
	activate
end tell