[perl-Gtk2/stable-1-22] When testing, don't assume the default IM context is in use

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

commit 2c05a00d5d1b696ed5b9b0c6653533194be9fd19
Author: Torsten Schönfeld <kaffeetisch gmx de>
Date:   Sun May 30 13:55:26 2010 +0200

    When testing, don't assume the default IM context is in use

 t/GtkIMContext.t |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/t/GtkIMContext.t b/t/GtkIMContext.t
index 890757a..a3156ca 100644
--- a/t/GtkIMContext.t
+++ b/t/GtkIMContext.t
@@ -68,5 +68,5 @@ SKIP: {
 
 	# Get a default context
 	$context->focus_in ();
-	is ($context->get_context_id, 'gtk-im-context-simple', 'Simple context');
+	ok (defined $context->get_context_id, 'Context ID');
 }