Implement support for ATK_STATE_HAS_TOOLTIP

https://bugzilla.gnome.org/show_bug.cgi?id=738982

3 files changed, 112 insertions, 0 deletions

diff --git a/testsuite/a11y/Makefile.am b/testsuite/a11y/Makefile.am
index e8ab6068a3..1d9fc055bc 100644
--- a/testsuite/a11y/Makefile.am
+++ b/testsuite/a11y/Makefile.am
@@ -84,6 +84,7 @@ testdata = \
 	headerbar.ui headerbar.txt \
 	tree.ui tree.txt \
 	actionbar.ui actionbar.txt \
+	tooltips.ui tooltips.txt \
 	$(NULL)
 
 test_in_files = \
diff --git a/testsuite/a11y/tooltips.txt b/testsuite/a11y/tooltips.txt
new file mode 100644
index 0000000000..e1bc6b8ab4
--- /dev/null
+++ b/testsuite/a11y/tooltips.txt
@@ -0,0 +1,78 @@
+window1
+  "frame"
+  index: 0
+  state: enabled resizable sensitive showing visible
+  toolkit: gtk
+  <AtkComponent>
+  layer: window
+  alpha: 1
+  box1
+    "filler"
+    parent: window1
+    index: 0
+    state: enabled horizontal sensitive showing visible
+    toolkit: gtk
+    <AtkComponent>
+    layer: widget
+    alpha: 1
+    button-with-tooltip-text
+      "push button"
+      parent: box1
+      index: 0
+      description: Tooltip1
+      state: enabled focusable sensitive showing visible has-tooltip
+      toolkit: gtk
+      <AtkComponent>
+      layer: widget
+      alpha: 1
+      <AtkImage>
+      image size: -1 x -1
+      image description: (null)
+      <AtkAction>
+      action 0 name: click
+      action 0 description: Clicks the button
+    button-with-has-tooltip-true
+      "push button"
+      parent: box1
+      index: 1
+      state: enabled focusable sensitive showing visible has-tooltip
+      toolkit: gtk
+      <AtkComponent>
+      layer: widget
+      alpha: 1
+      <AtkImage>
+      image size: -1 x -1
+      image description: (null)
+      <AtkAction>
+      action 0 name: click
+      action 0 description: Clicks the button
+    button-without-tooltip
+      "push button"
+      parent: box1
+      index: 2
+      state: enabled focusable sensitive showing visible
+      toolkit: gtk
+      <AtkComponent>
+      layer: widget
+      alpha: 1
+      <AtkImage>
+      image size: -1 x -1
+      image description: (null)
+      <AtkAction>
+      action 0 name: click
+      action 0 description: Clicks the button
+    button-with-has-tooltip-false
+      "push button"
+      parent: box1
+      index: 3
+      state: enabled focusable sensitive showing visible
+      toolkit: gtk
+      <AtkComponent>
+      layer: widget
+      alpha: 1
+      <AtkImage>
+      image size: -1 x -1
+      image description: (null)
+      <AtkAction>
+      action 0 name: click
+      action 0 description: Clicks the button
diff --git a/testsuite/a11y/tooltips.ui b/testsuite/a11y/tooltips.ui
new file mode 100644
index 0000000000..4c5145cbe9
--- /dev/null
+++ b/testsuite/a11y/tooltips.ui
@@ -0,0 +1,33 @@
+<interface>
+  <object class='GtkWindow' id='window1'>
+    <property name='visible'>True</property>
+    <child>
+      <object class='GtkBox' id='box1'>
+        <property name='visible'>True</property>
+        <child>
+          <object class='GtkButton' id='button-with-tooltip-text'>
+            <property name='visible'>True</property>
+            <property name="tooltip_text">Tooltip1</property>
+          </object>
+        </child>
+        <child>
+          <object class='GtkButton' id='button-with-has-tooltip-true'>
+            <property name='visible'>True</property>
+            <property name="has_tooltip">True</property>
+          </object>
+         </child>
+        <child>
+          <object class='GtkButton' id='button-without-tooltip'>
+            <property name='visible'>True</property>
+          </object>
+         </child>
+        <child>
+          <object class='GtkButton' id='button-with-has-tooltip-false'>
+            <property name='visible'>True</property>
+            <property name="has_tooltip">False</property>
+          </object>
+         </child>
+      </object>
+    </child>
+  </object>
+</interface>