openChrome.applescript 1.19 KB
Newer Older
1
2
3
4
5
(*
Copyright (c) 2015-present, Facebook, Inc.
All rights reserved.

This source code is licensed under the BSD-style license found in the
6
-- LICENSE file in the root directory of this source tree. An additional grant
7
8
9
of patent rights can be found in the PATENTS file in the same directory.
*)

10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
on run argv
  set theURL to item 1 of argv

  tell application "Chrome"

    if (count every window) = 0 then
      make new window
    end if

    -- Find a tab currently running the debugger
    set found to false
    set theTabIndex to -1
    repeat with theWindow in every window
      set theTabIndex to 0
      repeat with theTab in every tab of theWindow
        set theTabIndex to theTabIndex + 1
Einar Löve's avatar
Einar Löve committed
26
        if theTab's URL as string contains theURL then
27
28
29
30
31
32
33
34
35
36
37
38
39
40
          set found to true
          exit repeat
        end if
      end repeat

      if found then
        exit repeat
      end if
    end repeat

    if found then
      tell theTab to reload
      set index of theWindow to 1
      set theWindow's active tab index to theTabIndex
Einar Löve's avatar
Einar Löve committed
41
      tell theWindow to activate
42
43
44
45
46
47
48
49
    else
      tell window 1
        activate
        make new tab with properties {URL:theURL}
      end tell
    end if
  end tell
end run