src/chrome/browser/ui/cocoa/applescript/examples/bookmark_current_tabs.applescript

   1 -- Copyright (c) 2010 The Chromium Authors. All rights reserved.
   2 -- Use of this source code is governed by a BSD-style license that can be
   3 -- found in the LICENSE file.
   4
   5 -- This script bookmarks the currently open tabs of a window.
   6 tell application "Chromium"
   7         set url_list to {}
   8         set title_list to {}
   9         tell window 1
  10                 repeat with i from 1 to (count tabs)
  11                         set end of url_list to (URL of tab i)
  12                         set end of title_list to (title of tab i)
  13                 end repeat
  14         end tell
  15         tell bookmarks bar
  16                 set var to make new bookmark folder with properties {title:"New"}
  17                 tell var
  18                         repeat with i from 1 to (count url_list)
  19                                 make new bookmark item with properties {URL:(item i of url_list), title:(item i of title_list)}
  20                         end repeat
  21                 end tell
  22         end tell
  23 end tell