Close Safari Download Window.scpt

on adding folder items to this_folder after receiving added_items
	tell application "Safari"
		repeat with w in windows
			if name of w is "Downloads" then
				set isdocument to true
				try
					set d to document of w
					set the result to d
				on error
					set isdocument to false
				end try
				
				if (not isdocument) then
					tell w to close
				end if
			end if
		end repeat
	end tell
end adding folder items to