filemon

tell application "System Events" to tell UI element "HipChat" of list 1 of process "Dock"
   perform action "AXShowMenu"
   delay 0.5
   click menu item "Status" of menu 1
   click menu item "Available" of menu 1 of menu item "Status" of menu 1
end tell

filemon

set timeStr to time string of ((current date) + (25 * minutes))

set cmd to "dnd Pomodoro in progress till " & timeStr

tell application "HipChat"
	activate
	tell application "System Events"
		tell process "HipChat"
			set window_name to name of window 1
		end tell

filemon

  # OUTPUT
  service.response do |response|
    response.array :analysisDefinitions do |analysis_definition|
      analysis_definition.string :code
      analysis_definition.string :name
      analysis_definition.string :description
    end
    response.object :links do |links|
      links.string :next
      links.string :prev