Bug 9811: Remove useless orderby management

[koha_fer] / xt / tt_valid.t

diff --git a/xt/tt_valid.t b/xt/tt_valid.t
index 97725ee..e33b760 100755 (executable)
--- a/xt/tt_valid.t
+++ b/xt/tt_valid.t
@@ -38,7 +38,7 @@ my @files_with_directive_in_tag = do {
         while ( my $token = $parser->next_token ) {
             my $attr = $token->{_attr};
             next unless $attr;
-            push @lines, $token->{_lc} if $attr->{'[%'};
+            push @lines, $token->{_lc} if $attr->{'[%'} or $attr->{'[%-'};
         }
         ($dir) = $dir =~ /koha-tmpl\/(.*)$/;
         push @files, { name => "$dir/$name", lines => \@lines } if @lines;
@@ -57,7 +57,8 @@ ok( !@files_with_directive_in_tag, "TT syntax: not using TT directive within HTM
        );
 
 my $testtoken = 0;
-C4::TTParser::unshift_token($testtoken);
+my $ttparser = C4::TTParser->new();
+$ttparser->unshift_token($testtoken);
 my $testtokenagain = C4::TTParser::next_token();
 is( $testtoken, $testtokenagain, "Token received same as original put on stack");