melomel 0.4.0 → 0.5.0

data/lib/melomel/bridge/messaging.rb

@@ -113,22 +113,10 @@ module Melomel
     #
     ###########################################################################
 
-    # Creates an object proxy from a hash
-    def create_hash(hash)
-      proxy = create_object('Object')
-      hash.each_pair do |k,v|
-        v = create_hash(v) if !v.nil? && v.is_a?(Hash)
-        proxy.set_property(k, v)
-      end
-      return proxy
-    end
-
     # Formats a Ruby value into an XML message
     def format_message_value(xml, value)
-      # Automatically convert simple hashes to objects
-      if(!value.nil? && value.is_a?(Hash))
-        value = create_hash(value)
-      end
+      # Automatically convert simple objects to proxies.
+      value = value.to_object_proxy(self) unless value.nil?
       
       if value.nil?
         xml['dataType'] = 'null'

data/lib/melomel/bridge/ui.rb

@@ -2,6 +2,18 @@
 module Melomel
   class Bridge
     # Finds a list of display objects matching a class and hash of properties.
+    #
+    # class_name - The type of objects to search for.
+    # root       - The object to start searching from. (Defaults to the stage).
+    # properties - A list of properties to match on each object.
+    #
+    # Example:
+    # 
+    #   bridge.find_all('mx.controls.Button', :label => 'Click me')
+    #   # => [<Melomel::ObjectProxy>, <Melomel::ObjectProxy>]
+    #
+    # Returns a list of display objects contained by root that match the
+    # properties and class specified.
     def find_all(class_name, root={}, properties={})
       # Merge hashes if no root is specified
       if root.is_a?(Hash)
@@ -12,8 +24,26 @@ module Melomel
       # Retrieve object
       get_class('melomel.core.UI').findAll(class_name, root, properties)
     end
+    
+    def find_all!(class_name, root={}, properties={})
+      objects = find_all(class_name, root, properties)
+      raise MelomelError.new("No objects found") if objects.empty?
+      return objects
+    end
 
-    # Finds a display object by class and properties.
+    # Finds the first display object matching a class and hash of properties.
+    #
+    # class_name - The type of object to search for.
+    # root       - The object to start searching from. (Defaults to the stage).
+    # properties - A list of properties to match on the object.
+    #
+    # Example:
+    # 
+    #   bridge.find('mx.controls.Button', :label => 'Click me')
+    #   # => <Melomel::ObjectProxy>
+    #
+    # Returns the first display object contained by root that matches the
+    # properties and class specified.
     def find(class_name, root={}, properties={})
       # Merge hashes if no root is specified
       if root.is_a?(Hash)
@@ -25,6 +55,45 @@ module Melomel
       get_class('melomel.core.UI').find(class_name, root, properties)
     end
 
+    def find!(class_name, root={}, properties={})
+      object = find(class_name, root, properties)
+      raise MelomelError.new("No object found") if object.nil?
+      return object
+    end
+
+    # Finds a component based on the label of a nearby component. This works
+    # by first finding a Halo or Spark label component and then recursively
+    # searching the label's parent's children for a component of a given class.
+    #
+    # class_name - The type of object to search for.
+    # label_text - The label text to search for.
+    # root       - The object to start searching from. (Defaults to the stage).
+    # properties - A list of properties to match on the object.
+    #
+    # Example:
+    # 
+    #   bridge.find_labeled('mx.controls.TextInput', 'First Name')
+    #   # => <Melomel::ObjectProxy>
+    #
+    # Returns the first display object which is inside the parent of a given
+    # label.
+    def find_labeled(class_name, label_text, root={}, properties={})
+      # Merge hashes if no root is specified
+      if root.is_a?(Hash)
+        properties.merge!(root)
+        root = nil
+      end
+      
+      # Retrieve object
+      get_class('melomel.core.UI').findLabeled(class_name, label_text, root, properties)
+    end
+
+    def find_labeled!(class_name, label_text, root={}, properties={})
+      object = find_labeled(class_name, label_text, root, properties)
+      raise MelomelError.new("No object found") if object.nil?
+      return object
+    end
+
 
     # Imitates a click on a component
     def click(component, properties={})
@@ -51,5 +120,17 @@ module Melomel
     def key_press(component, char, properties={})
       get_class('melomel.core.UI').keyPress(component, char, properties)
     end
+
+
+    # Generates a list of labels created by a data control or column based on a
+    # data set.
+    #
+    # component - The control or column which has an itemToLabel() method.
+    # data      - The data set to generate labels from.
+    #
+    # Returns a Ruby array of labels.
+    def items_to_labels!(component, data)
+      get_class('melomel.core.UI').itemsToLabels!(component, data)
+    end
   end
 end

data/lib/melomel/cucumber/alert_steps.rb

@@ -0,0 +1,29 @@
+When /^I click the "([^"]*)" button on the alert$/ do |label|
+  classes = Melomel::Flex.get_component_classes('alert')
+  alert = Melomel.find!(classes)
+  button = Melomel::Cucumber.find_by_label!('mx.controls.Button', label, alert)
+  Melomel.click(button)
+end
+
+Then /^I should see an alert$/ do
+  classes = Melomel::Flex.get_component_classes('alert')
+  Melomel.find!(classes)
+end
+
+Then /^I should see an alert with the title: "([^"]*)"$/ do |title|
+  classes = Melomel::Flex.get_component_classes('alert')
+  alert = Melomel.find!(classes)
+  alert.title.should == title
+end
+
+Then /^I should see an alert with the message: "([^"]*)"$/ do |message|
+  classes = Melomel::Flex.get_component_classes('alert')
+  alert = Melomel.find!(classes)
+  alert.text.should == message
+end
+
+Then /^I should see an alert with the following message:$/ do |message|
+  classes = Melomel::Flex.get_component_classes('alert')
+  alert = Melomel.find!(classes)
+  alert.text.should == message
+end

data/lib/melomel/cucumber/button_steps.rb

@@ -0,0 +1,11 @@
+When /^I click the "([^"]*)" (button|check box|radio button)$/ do |name, type|
+  classes = Melomel::Flex.get_component_classes(type)
+  button = Melomel::Cucumber.find_by_label!(classes, name)
+  Melomel.click(button)
+end
+
+Then /^I should see the "([^"]*)" (button|check box|radio button) (not )?selected$/ do |name, type, neg|
+  classes = Melomel::Flex.get_component_classes(type)
+  button = Melomel::Cucumber.find_by_label!(classes, name)
+  button.selected.should == neg.nil?
+end

data/lib/melomel/cucumber/color_picker_steps.rb

@@ -0,0 +1,12 @@
+When /^I set the "([^"]*)" color picker to "#([0-9A-Fa-f]{6})"$/ do |name, color|
+  classes = Melomel::Flex.get_component_classes('color picker')
+  picker = Melomel::Cucumber.find_labeled!(classes, name)
+  picker.selectedColor = color.hex
+end
+
+Then /^I should see the "([^"]*)" color picker set to "#([0-9A-Fa-f]{6})"$/ do |name, color|
+  classes = Melomel::Flex.get_component_classes('color picker')
+  picker = Melomel::Cucumber.find_labeled!(classes, name)
+  sprintf('%06X', picker.selectedColor).should == color
+end
+

data/lib/melomel/cucumber/data_grid_steps.rb

@@ -0,0 +1,62 @@
+When /^I select "([^"]*)" on the "([^"]*)" data grid$/ do |value, name|
+  classes = Melomel::Flex.get_component_classes('data grid')
+  grid = Melomel::Cucumber.find_labeled!(classes, name)
+
+  # Retrieve data and take off header row
+  data = Melomel::Cucumber.get_grid_data(grid)[1..-1]
+  
+  # Loop data and check for matches
+  index = nil
+  data.each_index do |i|
+    row = data[i]
+    row.each do |cell|
+      if cell.strip == value
+        index = i
+        break
+      end
+    end
+    
+    break unless index.nil?
+  end
+  
+  # If we couldn't find a matching cell then throw an error
+  raise "Cannot find '#{value}' on data grid" if index.nil?
+  
+  grid.selectedIndex = index
+end
+
+
+Then /^I should see "([^"]*)" selected on the "([^"]*)" data grid$/ do |value, name|
+  classes = Melomel::Flex.get_component_classes('data grid')
+  grid = Melomel::Cucumber.find_labeled!(classes, name)
+
+  # Retrieve data and take off header row
+  data = Melomel::Cucumber.get_grid_data(grid)[1..-1]
+  
+  # Loop data and check for matches
+  index = nil
+  data.each_index do |i|
+    row = data[i]
+    row.each do |cell|
+      if cell.strip == value
+        index = i
+        break
+      end
+    end
+    
+    break unless index.nil?
+  end
+  
+  grid.selectedIndex.should == index
+end
+
+Then /^I should see the following data in the "([^"]*)" data grid:$/ do |name, table|
+  classes = Melomel::Flex.get_component_classes('data grid')
+  grid = Melomel::Cucumber.find_labeled!(classes, name)
+  data = Melomel::Cucumber.get_grid_data(grid)
+  
+  # Trim whitespace
+  data.each {|row| row.each {|cell| cell.strip!}}
+  
+  table.diff!(data)
+end

data/lib/melomel/cucumber/date_steps.rb

@@ -0,0 +1,16 @@
+When /^I set the "([^"]*)" (date chooser|date field) to "(\d{1,2}\/\d{1,2}\/\d{4})"$/ do |name, type, date_string|
+  classes = Melomel::Flex.get_component_classes(type)
+  component = Melomel::Cucumber.find_labeled!(classes, name)
+  component.selectedDate = Melomel::Date.parse(date_string)
+end
+
+Then /^I should see the "([^"]*)" (date chooser|date field) set to "(\d{1,2}\/\d{1,2}\/\d{4})"$/ do |name, type, date_string|
+  classes = Melomel::Flex.get_component_classes(type)
+  component = Melomel::Cucumber.find_labeled!(classes, name)
+  date = Melomel::Date.parse(date_string)
+
+  component.selectedDate.should_not be_nil
+  date.should_not be_nil
+  component.selectedDate.toLocaleDateString().should == date.toLocaleDateString()
+end
+

data/lib/melomel/cucumber/list_steps.rb

@@ -0,0 +1,24 @@
+When /^I select "([^"]*)" on the "([^"]*)" (combo box|list)$/ do |value, name, type|
+  classes = Melomel::Flex.get_component_classes(type)
+  list = Melomel::Cucumber.find_labeled!(classes, name)
+  labels = Melomel.items_to_labels!(list, list.dataProvider)
+  
+  # Loop over labels and set the selected index when we find a match
+  index = nil
+  labels.length.times do |i|
+    if labels[i] == value
+      index = i
+    end
+  end
+  raise "Cannot find '#{value}' on #{type}" if index.nil?
+  
+  list.selectedIndex = index
+end
+
+Then /^I should see "([^"]*)" selected on the "([^"]*)" (combo box|list)$/ do |value, name, type|
+  classes = Melomel::Flex.get_component_classes(type)
+  list = Melomel::Cucumber.find_labeled!(classes, name)
+  label = list.itemToLabel(list.selectedItem)
+  label.should == value
+end
+

data/lib/melomel/cucumber/slider_steps.rb

@@ -0,0 +1,14 @@
+When /^I set the "([^"]*)" (slider) to "([^"]*)"$/ do |name, type, value|
+  classes = Melomel::Flex.get_component_classes(type)
+  slider = Melomel::Cucumber.find_labeled!(classes, name)
+  value = value.index('.') ? value.to_f : value.to_i
+  slider.value = value
+end
+
+Then /^I should see the "([^"]*)" (slider) set to "([^"]*)"$/ do |name, type, value|
+  classes = Melomel::Flex.get_component_classes(type)
+  slider = Melomel::Cucumber.find_labeled!(classes, name)
+  value = value.index('.') ? value.to_f : value.to_i
+  slider.value.should == value
+end
+

data/lib/melomel/cucumber/text_steps.rb

@@ -0,0 +1,11 @@
+When /^I type "([^"]*)" in the "([^"]*)" (text field|text area)$/ do |text, name, type|
+  classes = Melomel::Flex.get_component_classes(type)
+  component = Melomel::Cucumber.find_labeled!(classes, name)
+  component.text = text
+end
+
+Then /^I should see "([^"]*)" in the "([^"]*)" (text field|text area|label)$/ do |text, name, type|
+  classes = Melomel::Flex.get_component_classes(type)
+  component = Melomel::Cucumber.find_labeled!(classes, name)
+  component.text.should == text
+end

data/lib/melomel/cucumber.rb

@@ -0,0 +1,127 @@
+require 'cucumber'
+require 'melomel'
+Dir.glob(File.dirname(__FILE__) + '/cucumber/*', &method(:require))
+
+# This class holds utility methods for running Cucumber steps.
+module Melomel
+  class Cucumber
+    # Finds a component by id.
+    #
+    # class_name - The class or classes to match on.
+    # id         - The id of the component.
+    # root       - The root component to search from. Defaults to the stage.
+    # properties - Additional properties to search on.
+    #
+    # Returns a component matching the id and the additional properties.
+    def self.find_by_id!(class_name, id, root={}, properties={})
+      properties['id'] = id
+      Melomel.find!(class_name, root, properties)
+    end
+
+    # Finds a component by label. If the first character is a "#" then the
+    # component should be found by id. Otherwise it is found by label.
+    #
+    # class_name - The class or classes to match on.
+    # label      - The label of the component.
+    # root       - The root component to search from. Defaults to the stage.
+    # properties - Additional properties to search on.
+    #
+    # Returns a component matching the label and the additional properties.
+    def self.find_by_label!(class_name, label, root={}, properties={})
+      set_properties_key(properties, 'label', label)
+      Melomel.find!(class_name, root, properties)
+    end
+
+    # Finds a component that shares the same parent as a given label. If the
+    # first character is a "#" then the component should be found by id.
+    # Otherwise it is found by label.
+    #
+    # class_name - The class or classes to match on.
+    # label      - The label text.
+    # root       - The root component to search from. Defaults to the stage.
+    # properties - Additional properties to search on.
+    #
+    # Returns a component labeled by another component.
+    def self.find_labeled!(class_name, label, root={}, properties={})
+      if label.index('#') == 0
+        find_by_id!(class_name, label[1..-1], root, properties)
+      else
+        Melomel.find_labeled!(class_name, label, root, properties)
+      end
+    end
+
+    # Finds a component by title. If the first character is a "#" then the
+    # component should be found by id. Otherwise it is found by title.
+    #
+    # class_name - The class or classes to match on.
+    # title      - The title of the component.
+    # root       - The root component to search from. Defaults to the stage.
+    # properties - Additional properties to search on.
+    #
+    # Returns a component matching the title and the additional properties.
+    def self.find_by_title!(class_name, title, root={}, properties={})
+      set_properties_key(properties, 'title', title)
+      Melomel.find!(class_name, root, properties)
+    end
+
+    # Finds a component by text. If the first character is a "#" then the
+    # component should be found by id. Otherwise it is found by text.
+    #
+    # class_name - The class or classes to match on.
+    # text       - The text property of the component.
+    # root       - The root component to search from. Defaults to the stage.
+    # properties - Additional properties to search on.
+    #
+    # Returns a component matching the text and the additional properties.
+    def self.find_by_text!(class_name, text, root={}, properties={})
+      set_properties_key(properties, 'text', text)
+      Melomel.find!(class_name, root, properties)
+    end
+
+    # Sets the key in the properties hash. If the first character is "#" then
+    # the key is "id". Otherwise it is set to the value of "key".
+    #
+    # properties - The properties hash.
+    # key        - The name of the key to set.
+    # name       - The name of the component.
+    #
+    # Returns nothing.
+    def self.set_properties_key(properties, key, name)
+      if name.index('#') == 0
+        properties['id'] = name[1..-1]
+      else
+        properties[key] = name
+      end
+    end
+
+    # Retrieves grid data as a 2D array of rows of columns. The first row
+    # contains the grid's header.
+    #
+    # grid - The grid to generate the table from.
+    #
+    # Returns a 2D array of rows of columns of data.
+    def self.get_grid_data(grid)
+      # Retrieve as columns of rows
+      data = []
+      grid.columns.length.times do |i|
+        column_data = []
+        column = grid.columns[i]
+        labels = Melomel.items_to_labels!(column, grid.dataProvider)
+
+        # Add column header
+        column_data << column.headerText
+        
+        # Add label data
+        labels.length.times do |j|
+          column_data << labels[j]
+        end
+        
+        # Add column data to data set
+        data << column_data
+      end
+      
+      # Transpose and return
+      return data.transpose()
+    end
+  end
+end

data/lib/melomel/date.rb

@@ -0,0 +1,19 @@
+module Melomel
+  # This class contains helper methods for working with Flash dates.
+  class Date
+    # Parses a date.
+    #
+    # text - The date string to parse.
+    #
+    # Example:
+    #
+    #   Melomel::Date.parse('02/04/2010') # => <Melomel::ObjectProxy>
+    #
+    # Returns a proxy to a date object in Flash.
+    def self.parse(text)
+      date = Melomel.create_object!('Date')
+      date.time = Melomel.get_class!('Date').parse(text)
+      date
+    end
+  end
+end

data/lib/melomel/flex.rb

@@ -0,0 +1,45 @@
+module Melomel
+  # This class contains helper methods for working with Flex components.
+  class Flex
+    # Retrieves a list of classes associated with a commonly named component.
+    #
+    # name - The common name of the component.
+    #
+    # Example:
+    #
+    #   Melomel.get_component_classes('button')
+    #   # => ['mx.controls.Button', 'spark.components.Button']
+    #
+    # Returns a list of classes associated with a component's common name.
+    def self.get_component_classes(name)
+      case name.downcase
+        when 'alert' then ['mx.controls.Alert']
+        when 'button' then ['mx.controls.Button', 'spark.components.supportClasses.ButtonBase']
+        when 'check box' then ['mx.controls.CheckBox', 'spark.components.CheckBox']
+        when 'color picker' then ['mx.controls.ColorPicker']
+        when 'combo box' then ['mx.controls.ComboBox', 'spark.components.ComboBox']
+        when 'data grid' then ['mx.controls.DataGrid']
+        when 'date chooser' then ['mx.controls.DateChooser']
+        when 'date field' then ['mx.controls.DateField']
+        when 'scroll bar' then ['mx.controls.HScrollBar', 'mx.controls.VScrollBar', 'spark.components.HScrollBar', 'spark.components.VScrollBar']
+        when 'slider' then ['mx.controls.HSlider', 'mx.controls.VSlider', 'spark.components.HSlider', 'spark.components.VSlider']
+        when 'image' then ['mx.controls.Image']
+        when 'label' then ['mx.controls.Label', 'spark.components.Label', 'spark.components.RichText']
+        when 'list' then ['mx.controls.List', 'spark.components.List']
+        when 'menu' then ['mx.controls.Menu']
+        when 'menu bar' then ['mx.controls.MenuBar']
+        when 'panel' then ['mx.containers.Panel', 'spark.components.Panel']
+        when 'stepper' then ['mx.controls.NumericStepper', 'spark.components.Spinner']
+        when 'pop up button' then ['mx.controls.PopUpButton']
+        when 'pop up menu button' then ['mx.controls.PopUpMenuButton']
+        when 'progress bar' then ['mx.controls.ProgressBar']
+        when 'radio button' then ['mx.controls.RadioButton', 'spark.components.RadioButton']
+        when 'rich text area' then ['mx.controls.RichTextEditor', 'spark.components.RichEditableText']
+        when 'text field' then ['mx.controls.TextInput', 'spark.components.TextInput']
+        when 'text area' then ['mx.controls.TextArea', 'spark.components.TextArea']
+        when 'tool tip' then ['mx.controls.ToolTip']
+        when 'tree' then ['mx.controls.Tree']
+      end
+    end
+  end
+end

data/lib/melomel/object_proxy.rb

@@ -72,5 +72,23 @@ module Melomel
         end
       end
     end
+
+    # Array accessor.
+    def [](index)
+      if index.is_a?(Fixnum)
+        get_property("[#{index}]")
+      else
+        get_property(index.to_s)
+      end
+    end
+
+    # Array mutator.
+    def []=(index, value)
+      if index.is_a?(Fixnum)
+        set_property("[#{index}]", value)
+      else
+        set_property(index.to_s, value)
+      end
+    end
   end
 end

data/lib/melomel/version.rb

@@ -1,3 +1,3 @@
 module Melomel
-  VERSION = "0.4.0"
+  VERSION = "0.5.0"
 end

data/lib/melomel.rb

@@ -1,9 +1,11 @@
 $:.unshift(File.dirname(__FILE__)) unless $:.index(File.dirname(__FILE__))
 
+require 'object'
 require 'melomel/bridge'
+require 'melomel/date'
 require 'melomel/error'
+require 'melomel/flex'
 require 'melomel/object_proxy'
-require 'melomel/ui'
 require 'melomel/version'
 
 # This class acts as a singleton instance of the bridge. This is typically the
@@ -25,7 +27,7 @@ module Melomel
     end
 
     def method_missing(method, *args)
-      @bridge.send(method.to_sym, *args)
+      @bridge.__send__(method.to_sym, *args)
     end
     
     # Retrieves a reference to a class

data/lib/object.rb

@@ -0,0 +1,30 @@
+class Object
+  # Recursively generates an object proxy for the object if it is a Hash or
+  # and Array.
+  #
+  # bridge - The bridge to use when generating a proxy.
+  #
+  # Returns a Melomel::ObjectProxy if it is a Hash or an Array. Otherwise
+  # returns the object itself.
+  def to_object_proxy(bridge)
+    proxy = self
+
+    # Convert each key/value pair in a Hash
+    if self.is_a?(Hash)
+      proxy = bridge.create_object('Object')
+      each_pair do |k,v|
+        v = v.to_object_proxy(bridge) unless v.nil?
+        proxy.set_property!(k, v)
+      end
+    # Convert each item in an Array.
+    elsif is_a?(Array)
+      proxy = bridge.create_object('Array')
+      each do |item|
+        item = item.to_object_proxy(bridge) unless item.nil?
+        proxy.push!(item)
+      end
+    end
+    
+    return proxy
+  end
+end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: melomel
 version: !ruby/object:Gem::Version 
-  hash: 15
+  hash: 11
   prerelease: false
   segments: 
   - 0
-  - 4
+  - 5
   - 0
-  version: 0.4.0
+  version: 0.5.0
 platform: ruby
 authors: 
 - Ben Johnson
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-09-29 00:00:00 -06:00
+date: 2010-10-08 00:00:00 -06:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -79,11 +79,22 @@ files:
 - lib/melomel/bridge/messaging.rb
 - lib/melomel/bridge/ui.rb
 - lib/melomel/bridge.rb
+- lib/melomel/cucumber/alert_steps.rb
+- lib/melomel/cucumber/button_steps.rb
+- lib/melomel/cucumber/color_picker_steps.rb
+- lib/melomel/cucumber/data_grid_steps.rb
+- lib/melomel/cucumber/date_steps.rb
+- lib/melomel/cucumber/list_steps.rb
+- lib/melomel/cucumber/slider_steps.rb
+- lib/melomel/cucumber/text_steps.rb
+- lib/melomel/cucumber.rb
+- lib/melomel/date.rb
 - lib/melomel/error.rb
+- lib/melomel/flex.rb
 - lib/melomel/object_proxy.rb
-- lib/melomel/ui.rb
 - lib/melomel/version.rb
 - lib/melomel.rb
+- lib/object.rb
 - README.md
 - CHANGELOG.md
 - test/helper.rb

data/lib/melomel/ui.rb

@@ -1,42 +0,0 @@
-# This class provides ease of use utility methods for finding display objects
-# and interacting with them.
-module Melomel
-  class << self
-    # Finds all display objects matching a class and hash of properties.
-    def find_all(class_name, root={}, properties={})
-      Melomel.bridge.find_all(class_name, root, properties)
-    end
-
-    # Finds a display object by class and properties.
-    def find(class_name, root={}, properties={})
-      Melomel.bridge.find(class_name, root, properties)
-    end
-
-
-    # Imitates a click on a component
-    def click(component, properties={})
-      Melomel.bridge.click(component, properties)
-    end
-
-    # Imitates a double click on a component
-    def double_click(component, properties={})
-      Melomel.bridge.double_click(component, properties)
-    end
-
-
-    # Imitates a key down on a component
-    def key_down(component, char, properties={})
-      Melomel.bridge.key_down(component, char, properties)
-    end
-
-    # Imitates a key up on a component
-    def key_up(component, char, properties={})
-      Melomel.bridge.key_up(component, char, properties)
-    end
-
-    # Imitates a key press on a component
-    def key_press(component, char, properties={})
-      Melomel.bridge.key_press(component, char, properties)
-    end
-  end
-end