PaulHowarth/Blog/2010-04-26

Monday 26th April 2010

Local Packages

  • Updated perl-Compress-Raw-Bzip2, perl-Compress-Raw-Zlib, and perl-IO-Compress to 2.027 (update bundled zlib to 1.2.5, remove autoload code from Zlib.pm in Compress::Zlib - Perl RT#74088)

  • Updated tidyp to 1.00, adding the patch below to fix duplicate metatag insertion and adding a run of the self-tests during the build:

  • --- tidyp-1.00/src/lexer.c.orig 2010-04-25 06:49:19.000000000 +0100
    +++ tidyp-1.00/src/lexer.c      2010-04-26 12:13:55.239099722 +0100
    @@ -1373,7 +1373,7 @@
                         attval = TY_(AttrGetById)(node, TidyAttr_CONTENT);
     
                         if (AttrHasValue(attval) &&
    -                        TY_(tmbstrncasecmp)(attval->value, "HTML Tidy", 9) == 0)
    +                        TY_(tmbstrncasecmp)(attval->value, "tidyp ", 6) == 0)
                         {
                             /* update the existing content to reflect the */
                             /* actual version of Tidy currently being used */
  • Updated perl-HTML-Tidy to build against tidyp 1.00, adding the patch below to fix the broken test suite:

  • diff -ur HTML-Tidy-1.50.orig/t/roundtrip.t HTML-Tidy-1.50/t/roundtrip.t
    --- HTML-Tidy-1.50.orig/t/roundtrip.t   2010-02-16 15:48:40.000000000 +0000
    +++ HTML-Tidy-1.50/t/roundtrip.t        2010-04-26 12:01:59.946110426 +0100
    @@ -27,7 +27,7 @@
     is( scalar @messages, 0, q{The cleaned stuff shouldn't have any errors} );
     diag( 'But they do...', Dumper(\@messages) ) if @messages;
     
    -$clean =~ s/"HTML Tidy.+w3\.org"/"Tidy"/;
    +$clean =~ s/"(HTML Tidy|tidyp).+w3\.org"/"Tidy"/;
     
     my $expected = do { local $/ = undef; <DATA> };
     is( $clean, $expected, 'Cleaned up properly' );
    diff -ur HTML-Tidy-1.50.orig/t/unicode.t HTML-Tidy-1.50/t/unicode.t
    --- HTML-Tidy-1.50.orig/t/unicode.t     2010-04-26 11:54:07.607116011 +0100
    +++ HTML-Tidy-1.50/t/unicode.t  2010-04-26 12:02:47.593212175 +0100
    @@ -39,6 +39,7 @@
     ok(utf8::is_utf8($clean), 'cleaned output is also unicode');
     
     $clean =~ s/"HTML Tidy.+w3\.org"/"Tidy"/;
    +$clean =~ s/"(HTML Tidy|tidyp).+w3\.org"/"Tidy"/;
     is($clean, $reference, q{Cleanup didn't break anything});
     
     my @messages = $tidy->messages;
  • Updated perl-Test-Pod to 1.44 (use Module::Build::Compat's "traditional" configuration)


Recent