[perl-Gtk2] When testing, don't assume the default IM context is in use
- From: Torsten Schönfeld <tsch src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [perl-Gtk2] When testing, don't assume the default IM context is in use
- Date: Sun, 30 May 2010 11:58:17 +0000 (UTC)
commit 18889b3f36d348721c34e3d5a5aff07e5d3c3a80
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 | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
---
diff --git a/t/GtkIMContext.t b/t/GtkIMContext.t
index 3b63650..ed63823 100644
--- a/t/GtkIMContext.t
+++ b/t/GtkIMContext.t
@@ -68,6 +68,7 @@ SKIP: {
# Get a default context
$context->focus_in ();
- is (my $id = $context->get_context_id, 'gtk-im-context-simple', 'Simple context');
+ my $id = $context->get_context_id;
+ ok (defined $id, 'Context ID');
$context->set_context_id ($id);
}
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]