[perl-Gtk2] Wrap gtk_status_icon_[gs]et_title (new in gtk+ 2.18)

[Torsten Schönfeld <tsch src gnome org>]

commit 3f0a5f12d6a5f190ced078f1894ce0284036a524
Author: Quentin Sculo <squentin free fr>
Date:   Tue Apr 13 19:24:57 2010 +0200

    Wrap gtk_status_icon_[gs]et_title (new in gtk+ 2.18)

 t/GtkStatusIcon.t   |   10 +++++++++-
 xs/GtkStatusIcon.xs |    9 +++++++++
 2 files changed, 18 insertions(+), 1 deletions(-)
---
diff --git a/t/GtkStatusIcon.t b/t/GtkStatusIcon.t
index bb76cf5..672817b 100644
--- a/t/GtkStatusIcon.t
+++ b/t/GtkStatusIcon.t
@@ -4,7 +4,7 @@
 use strict;
 use warnings;
 use Gtk2::TestHelper
-  tests => 36,
+  tests => 37,
   at_least_version => [2, 10, 0, "Gtk2::StatusIcon is new in 2.10"];
 
 # $Id$
@@ -161,6 +161,14 @@ SKIP: {
 
 }
 
+SKIP: {
+  skip 'new 2.18 stuff', 1
+    unless Gtk2->CHECK_VERSION(2, 18, 0);
+
+  $icon->set_title('my statusicon title');
+  is ($icon->get_title, 'my statusicon title', '[gs]et_title');
+
+}
 
 __END__
 
diff --git a/xs/GtkStatusIcon.xs b/xs/GtkStatusIcon.xs
index 5145a0a..f0c26af 100644
--- a/xs/GtkStatusIcon.xs
+++ b/xs/GtkStatusIcon.xs
@@ -153,3 +153,12 @@ void gtk_status_icon_set_tooltip_text (GtkStatusIcon *status_icon,  const gchar_
 void gtk_status_icon_set_tooltip_markup (GtkStatusIcon *status_icon, const gchar_ornull *markup);
 
 #endif /* 2.16 */
+
+#if GTK_CHECK_VERSION (2, 18, 0)
+
+void gtk_status_icon_set_title (GtkStatusIcon *status_icon, const gchar *title);
+
+const gchar * gtk_status_icon_get_title (GtkStatusIcon *status_icon);
+
+#endif /* 2.18 */
+