Changeset 368


Ignore:
Timestamp:
Dec 9, 2006, 3:25:44 PM (13 years ago)
Author:
ivorw
Message:

r1332@slazula: ivor | 2006-12-09 15:24:24 +0100
0.12 Fix failing tests


Location:
wiki-toolkit-plugin-diff/trunk
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • wiki-toolkit-plugin-diff/trunk/Changes

    r342 r368  
    11Revision history for Perl extension Wiki::Toolkit::Plugin::Diff.
     2
     30.12  Sat Dec  9 2006
     4    - Fix tests for VCS::Lite 0.08 or later
    25
    360.11  Sat Aug 12 20006
  • wiki-toolkit-plugin-diff/trunk/Makefile.PL

    r286 r368  
    88                            Wiki::Toolkit => 0,
    99                            Module::Optional => 0,
     10                            Params::Validate => 0,
    1011                            }, # e.g., Module::Name => 1.1
    1112    ($] >= 5.005 ?    ## Add these new keywords supported since 5.005
  • wiki-toolkit-plugin-diff/trunk/lib/Wiki/Toolkit/Plugin/Diff.pm

    r342 r368  
    44use warnings;
    55
    6 our $VERSION = '0.11';
     6our $VERSION = '0.12';
    77
    88use base 'Wiki::Toolkit::Plugin';
  • wiki-toolkit-plugin-diff/trunk/t/02_diff.t

    r342 r368  
    22use Wiki::Toolkit::TestLib;
    33use Test::More;
    4 
     4use VCS::Lite;
     5
     6my $newlite = (VCS::Lite->VERSION >= 0.08);
    57my $iterator = Wiki::Toolkit::TestLib->new_wiki_maker;
    68plan tests => ( 1 + $iterator->number * 18 );
     
    137139                        right => "== Line 1 ==\n"},
    138140                "First element is line number on right");
    139       TODO: {
    140           local $TODO = "Ivor tells me he needs to fix these but it's a bug in the test";
    141       is_deeply( $bodydiff{diff}[1], {
     141               
     142      is_deeply( $bodydiff{diff}[1], $newlite ? {
     143                        left => '<span class="diff1">Pub </span>'.
     144                                'in Clerkenwell with St Peter\'s beer.'.
     145                                "<br />",
     146                        right => '<span class="diff2">Tiny pub </span>'.
     147                                'in Clerkenwell with St Peter\'s beer.'.
     148                                '<span class="diff2"><br />'.
     149                                "\nNear Farringdon station</span>".
     150                                "<br />",
     151                                } : {
    142152                        left => '<span class="diff1">Pub </span>'.
    143153                                'in Clerkenwell with St Peter\'s beer.'.
     
    161171                        right => "== Line 2 ==\n"},
    162172                "First element is line number on right");
    163       is_deeply( $metadiff{diff}[1], {
     173      is_deeply( $metadiff{diff}[1], $newlite ? {
     174                        left => "\ncategory='Pubs'\nlocale='Farringdon'",
     175                        right => "\ncategory='Pubs'\n".
     176                                '<span class="diff2">category=\'Pubs,Real Ale\'<br />'.
     177                                "\n</span>locale='Farringdon'",
     178                                } : {
    164179                        left => "category='Pubs'",
    165180                        right => "category='Pubs".
     
    178193                        right => "== Line 11 ==\n"},
    179194                "Diff finds the right line number on right");
    180         is_deeply( $bodydiff{diff}[1], {
     195        is_deeply( $bodydiff{diff}[1], $newlite ? {
     196                        left => "\nmetatest='Moo'\nmetatest='Boo'",
     197                        right => "\nmetatest='Moo'\n".
     198                                '<span class="diff2">'.
     199                                "[[IvorW's Test Page]]<br />\n".
     200                                "<br />\n</span>".
     201                                "metatest='Boo'"
     202                                } : {
    181203                        left => "metatest='".
    182204                                '<span class="diff1">Moo</span>\'',
     
    197219                        right => "== Line 13 ==\n"},
    198220                "Diff finds the right line number on right");
    199         is_deeply( $bodydiff{diff}[1], {
     221        is_deeply( $bodydiff{diff}[1], $newlite ? {
     222                        left => "\nmetatest='Boo'\nmetatest='Quack'",
     223                        right => "\nmetatest='Boo'\n".
     224                                '<span class="diff2">'.
     225                                "[[Another Test Page]]<br />\n".
     226                                "<br />\n</span>".
     227                                "metatest='Quack'",
     228                                } : {
    200229                        left => "metatest='".
    201230                                '<span class="diff1">Boo</span>\'',
     
    224253                        right => "== Line 0 ==\n" },
    225254                "Diff finds the right line numbers");
    226         is_deeply( $bodydiff{diff}[1], {
     255        is_deeply( $bodydiff{diff}[1], $newlite ? {
     256                        left => "Tiny pub in Clerkenwell with St Peter's beer".
     257                                ".<br />",
     258                        right => "Tiny pub in Clerkenwell with St Peter's beer".
     259                                ' <span class="diff2">but no food</span>.'.
     260                                "<br />",
     261                                } : {
    227262                        left => "Tiny pub in Clerkenwell with St Peter's beer".
    228263                                ".<br />\n",
     
    238273                        right_version => 2 ) };
    239274        is( $@, "", "differences doesn't die when only difference is a newline");
    240     } # end of TODO
    241275}
Note: See TracChangeset for help on using the changeset viewer.