[libtext-mecab-perl] 15/17: completely remove test

[Taku YASUI]

This is an automated email from the git hooks/post-receive script.

tach pushed a commit to branch master
in repository libtext-mecab-perl.

commit 23580c5deb73f85b5493c3aed949e7eef4a27509
Author: Taku YASUI <tach at debian.org>
Date:   Fri Mar 30 18:03:05 2012 +0000

    completely remove test
---
 debian/patches/900_skip_failed_tests |   24 ++++++++++++++----------
 1 file changed, 14 insertions(+), 10 deletions(-)

diff --git a/debian/patches/900_skip_failed_tests b/debian/patches/900_skip_failed_tests
index 9832972..dc49f9c 100644
--- a/debian/patches/900_skip_failed_tests
+++ b/debian/patches/900_skip_failed_tests
@@ -1,21 +1,25 @@
 --- a/t/01-sanity.t
 +++ b/t/01-sanity.t
-@@ -7,12 +7,14 @@
-     use_ok("Text::MeCab", ':all');
+@@ -1,6 +1,6 @@
+ #!perl
+ use strict;
+-use Test::More (tests => 42);
++use Test::More (tests => 38);
+ 
+ BEGIN
+ {
+@@ -8,10 +8,6 @@
  }
  
-+TODO: {
  if (&Text::MeCab::MECAB_VERSION >= 0.90) {
-     ok(eval { my $v = MECAB_NOR_NODE; 1 } && !$@, "MECAB_NOR_NODE ok");
-     ok(eval { my $v = MECAB_UNK_NODE; 1 } && !$@, "MECAB_UNK_NODE ok");
-     ok(eval { my $v = MECAB_BOS_NODE; 1 } && !$@, "MECAB_BOS_NODE ok");
-     ok(eval { my $v = MECAB_EOS_NODE; 1 } && !$@, "MECAB_EOS_NODE ok");
+-    ok(eval { my $v = MECAB_NOR_NODE; 1 } && !$@, "MECAB_NOR_NODE ok");
+-    ok(eval { my $v = MECAB_UNK_NODE; 1 } && !$@, "MECAB_UNK_NODE ok");
+-    ok(eval { my $v = MECAB_BOS_NODE; 1 } && !$@, "MECAB_BOS_NODE ok");
+-    ok(eval { my $v = MECAB_EOS_NODE; 1 } && !$@, "MECAB_EOS_NODE ok");
  }
-+}
  
  can_ok("Text::MeCab", qw(new parse));
- 
-@@ -28,4 +30,4 @@
+@@ -28,4 +24,4 @@
      can_ok("Text::MeCab::Node::Cloned", $method);
  }
  

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libtext-mecab-perl.git