[perl-Gtk2] Test the GTK_ENTRY_BUFFER_MAX_SIZE wrapper
- From: Torsten Schönfeld <tsch src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [perl-Gtk2] Test the GTK_ENTRY_BUFFER_MAX_SIZE wrapper
- Date: Wed, 29 Dec 2010 23:27:56 +0000 (UTC)
commit 72a2b838c36e71e177faa853ca444465ff4b5c7e
Author: Torsten Schönfeld <kaffeetisch gmx de>
Date: Thu Dec 30 00:27:42 2010 +0100
Test the GTK_ENTRY_BUFFER_MAX_SIZE wrapper
t/GtkEntryBuffer.t | 6 +++++-
1 files changed, 5 insertions(+), 1 deletions(-)
---
diff --git a/t/GtkEntryBuffer.t b/t/GtkEntryBuffer.t
index fc0aad7..0c03df8 100644
--- a/t/GtkEntryBuffer.t
+++ b/t/GtkEntryBuffer.t
@@ -1,7 +1,8 @@
#!/usr/bin/perl -w
# vim: set filetype=perl expandtab shiftwidth=2 softtabstop=2 :
use utf8;
-use Gtk2::TestHelper tests => 18, at_least_version => [ 2, 18, 0 ];
+use Gtk2 qw/GTK_ENTRY_BUFFER_MAX_SIZE/;
+use Gtk2::TestHelper tests => 20, at_least_version => [ 2, 18, 0 ];
my $buffer = Gtk2::EntryBuffer->new();
isa_ok( $buffer, 'Gtk2::EntryBuffer' );
@@ -44,3 +45,6 @@ is( $buffer->get_max_length(), 23 );
$buffer->emit_inserted_text(0, 'Lorem', 5);
$buffer->emit_deleted_text(0, 5);
+
+ok( defined Gtk2::GTK_ENTRY_BUFFER_MAX_SIZE() );
+ok( defined GTK_ENTRY_BUFFER_MAX_SIZE() );
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]