Description
Small utility script — Opens all of the currently open tabs in Google Chrome in Safari.
Alfred Users — You Can Now Download an Extension of This Script Here
The Code
(*
Veritrope.com
Open Chrome Tabs in Safari
Version 1.0
April 18, 2011
// TERMS OF USE:
This work is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 3.0 Unported License.
To view a copy of this license, visit http://creativecommons.org/licenses/by-nc-sa/3.0/ or send a letter to Creative Commons, 444 Castro Street, Suite 900, Mountain View, California, 94041, USA.
// LIKE THIS SCRIPT?
If this AppleScript is helpful to you, please show your support here:
http://veritrope.com/support
// SCRIPT INFORMATION AND UPDATE PAGE
http://veritrope.com/code/open-chrome-tabs-in-safari
// REQUIREMENTS
More details on the script information page.
// CHANGELOG
1.0 Initial Release
*)
(*
======================================
// MAIN PROGRAM
======================================
*)
set list_Tabs to {}
tell application "Google Chrome"
set the_Tabs to (tabs of every window)
repeat with the_Tab in the_Tabs
set the_Items to (every item of the_Tab)
repeat with the_Item in the_Items
copy URL of the_Item to end of list_Tabs
end repeat
end repeat
end tell
tell application "Safari"
repeat with list_Tab in list_Tabs
set myTab to make new tab at end of tabs of window 1
set URL of myTab to list_Tab
end repeat
end tell
Veritrope.com
Open Chrome Tabs in Safari
Version 1.0
April 18, 2011
// TERMS OF USE:
This work is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 3.0 Unported License.
To view a copy of this license, visit http://creativecommons.org/licenses/by-nc-sa/3.0/ or send a letter to Creative Commons, 444 Castro Street, Suite 900, Mountain View, California, 94041, USA.
// LIKE THIS SCRIPT?
If this AppleScript is helpful to you, please show your support here:
http://veritrope.com/support
// SCRIPT INFORMATION AND UPDATE PAGE
http://veritrope.com/code/open-chrome-tabs-in-safari
// REQUIREMENTS
More details on the script information page.
// CHANGELOG
1.0 Initial Release
*)
(*
======================================
// MAIN PROGRAM
======================================
*)
set list_Tabs to {}
tell application "Google Chrome"
set the_Tabs to (tabs of every window)
repeat with the_Tab in the_Tabs
set the_Items to (every item of the_Tab)
repeat with the_Item in the_Items
copy URL of the_Item to end of list_Tabs
end repeat
end repeat
end tell
tell application "Safari"
repeat with list_Tab in list_Tabs
set myTab to make new tab at end of tabs of window 1
set URL of myTab to list_Tab
end repeat
end tell
Quick Links
Want to open the script right away?
Click here to open it in your Script Editor
Click here to open it in your Script Editor
Using Snippets to manage your code?
Save this into Snippets
Save this into Snippets
New To AppleScript?
- Here's how to use the AppleScripts you find here and -- to make them even easier to use -- here's how run them with simple keyboard shortcuts!
- Be sure to check out other great AppleScripts in the Veritrope.com Code Library -- and share your own AppleScript projects using the quick submission form!
No Comments / Add Yours!