gruber

set _old_delims to AppleScript's text item delimiters
set AppleScript's text item delimiters to {""}

tell application "System Events"
	set _current_app to name of the first process whose frontmost is true
end tell

tell application "Safari"
	set _urls to {}
	repeat with i from 1 to 6 -- how many Safari windows to show URLs from