Ignore:
Timestamp:
01/27/12 04:41:45 (4 months ago)
Author:
PaulHarvey
Message:

Item11456: Finally, sync Fn_SEARCH

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/UnitTestContrib/test/unit/Fn_SEARCH.pm

    r13833 r13834  
    426426} 
    427427 
     428sub _expect_with_deps { 
     429    my ( $this, $default, %expectations ) = @_; 
     430    my @deps = sort( keys %expectations ); 
     431    my $expected; 
     432    my $checking = 1; 
     433 
     434    while ( $checking && scalar(@deps) ) { 
     435        my $dep = shift(@deps); 
     436 
     437        if ( $this->check_dependency($dep) ) { 
     438            $expected = $expectations{$dep}; 
     439            $checking = 0; 
     440        } 
     441    } 
     442    if ($checking) { 
     443        $expected = $default; 
     444    } 
     445 
     446    return $expected; 
     447} 
     448 
    428449# Verify that the default result orering is independent of the web= and 
    429450# topic= parameters 
    … …  
    440461        }%' 
    441462    ); 
    442     my $expected; 
    443     if ( $this->check_dependency('Foswiki,<,1.2') ) { 
    444         $expected = <<'EXPECT'; 
     463    my $expected = $this->_expect_with_deps( 
     464        <<'FOSWIKI12', 
     465Main.WebHome 
     466Main.WebPreferences 
     467Main.WebSearch 
     468Sandbox.WebHome 
     469Sandbox.WebPreferences 
     470Sandbox.WebSearch 
     471System.WebHome 
     472System.WebPreferences 
     473System.WebSearch 
     474FOSWIKI12 
     475        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
    445476System.WebHome 
    446477System.WebPreferences 
    … …  
    452483Sandbox.WebPreferences 
    453484Sandbox.WebSearch 
    454 EXPECT 
    455     } 
    456     else { 
    457         $expected = <<'EXPECT'; 
    458 Main.WebHome 
    459 Main.WebPreferences 
    460 Main.WebSearch 
    461 Sandbox.WebHome 
    462 Sandbox.WebPreferences 
    463 Sandbox.WebSearch 
    464 System.WebHome 
    465 System.WebPreferences 
    466 System.WebSearch 
    467 EXPECT 
    468     } 
     485FOSWIKI11 
    469486    $expected =~ s/\n$//s; 
    470487    $this->assert_str_equals( $expected, $result ); 
    … …  
    485502        }%' 
    486503    ); 
    487     my $expected; 
    488     if ( $this->check_dependency('Foswiki,<,1.2') ) { 
    489         $expected = <<'EXPECT'; 
     504    my $expected = $this->_expect_with_deps( 
     505        <<'FOSWIKI12', 
     506Main.WebHome 
     507Main.WebPreferences 
     508Main.WebSearch 
     509Sandbox.WebHome 
     510Sandbox.WebPreferences 
     511Sandbox.WebSearch 
     512System.WebHome 
     513System.WebPreferences 
     514System.WebSearch 
     515FOSWIKI12 
     516        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
    490517System.WebHome 
    491518System.WebPreferences 
    … …  
    497524Sandbox.WebPreferences 
    498525Sandbox.WebSearch 
    499 EXPECT 
    500     } 
    501     else { 
    502         $expected = <<'EXPECT'; 
    503 Main.WebHome 
    504 Main.WebPreferences 
    505 Main.WebSearch 
    506 Sandbox.WebHome 
    507 Sandbox.WebPreferences 
    508 Sandbox.WebSearch 
    509 System.WebHome 
    510 System.WebPreferences 
    511 System.WebSearch 
    512 EXPECT 
    513     } 
     526FOSWIKI11 
    514527    $expected =~ s/\n$//s; 
    515528    $this->assert_str_equals( $expected, $result ); 
    … …  
    16241637      $this->{test_topicObject} 
    16251638      ->expandMacros( '%SEARCH{"TestForm"' . $stdCrap ); 
    1626     if ( $this->check_dependency('Foswiki,<,1.2') ) { 
    1627         $this->assert_str_equals( 'QueryTopic', $result ); 
    1628     } 
    1629     else { 
    1630         $this->assert_str_equals( '', $result ); 
    1631     } 
     1639    my $expected = 
     1640      $this->_expect_with_deps( '', 'Foswiki,<,1.2' => 'QueryTopic' ); 
     1641 
     1642    $this->assert_str_equals( $expected, $result ); 
    16321643 
    16331644    return; 
    … …  
    21332144    my ( $this, $web, $options, $sadness, $default_expected, %expected_list ) = 
    21342145      @_; 
    2135     my $expected; 
     2146    my $expected = 
     2147      $this->_expect_with_deps( $default_expected, %expected_list ); 
    21362148 
    21372149    #    my $options = { 
    … …  
    21422154    #    }; 
    21432155 
    2144     foreach my $dep_str ( sort( keys %expected_list ) ) { 
    2145         if ( !$expected && $this->check_dependency($dep_str) ) { 
    2146             $expected = $expected_list{$dep_str}; 
    2147         } 
    2148     } 
    2149     if ( !$expected ) { 
    2150         $expected = $default_expected; 
    2151         $this->assert_str_equals( 'ARRAY', ref($expected) ); 
    2152     } 
     2156    $this->assert_str_equals( 'ARRAY', ref($expected) ); 
    21532157    my $webObject = Foswiki::Meta->new( $this->{session}, $web ); 
    21542158 
    … …  
    25642568#need summary, and multiple 
    25652569sub _multiWebSeptic { 
    2566     my ( $this, $head, $foot, $sep, $results, $expected, $format ) = @_; 
     2570    my ( $this, $head, $foot, $sep, $results, $format, $default, %expectations ) 
     2571      = @_; 
    25672572    my $str = $results ? '*Preferences' : 'Septic'; 
    25682573    $head = $head        ? 'header="HEAD($web)"'            : ''; 
    … …  
    25702575    $sep  = defined $sep ? "separator=\"$sep\""             : ''; 
    25712576    $format = '$topic' unless ( defined($format) ); 
     2577    my $expected = $this->_expect_with_deps( $default, %expectations ); 
    25722578 
    25732579    my $result = $this->{test_topicObject}->expandMacros( 
    … …  
    25912597sub test_multiWeb_no_header_no_footer_no_separator_with_results { 
    25922598    my $this = shift; 
    2593     $this->_multiWebSeptic( 0, 0, undef, 1, <<'EXPECT'); 
     2599    $this->_multiWebSeptic( 
     2600        0, 0, undef, 1, undef, <<'FOSWIKI12', 
    25942601SitePreferences 
    25952602WebPreferences 
    25962603DefaultPreferences 
    25972604WebPreferences 
    2598 EXPECT 
     2605FOSWIKI12 
     2606        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2607DefaultPreferences 
     2608WebPreferences 
     2609SitePreferences 
     2610WebPreferences 
     2611FOSWIKI11 
    25992612 
    26002613    return; 
    … …  
    26032616sub test_multiWeb_no_header_no_footer_no_separator_with_results_counters { 
    26042617    my $this = shift; 
    2605     $this->_multiWebSeptic( 0, 0, undef, 1, 
    2606         <<'EXPECT', '$nhits, $ntopics, $index, $topic' ); 
     2618    $this->_multiWebSeptic( 
     2619        0,                                  0, undef, 1, 
     2620        '$nhits, $ntopics, $index, $topic', <<'FOSWIKI12', 
    260726211, 1, 1, SitePreferences 
    260826222, 2, 2, WebPreferences 
    260926231, 1, 3, DefaultPreferences 
    261026242, 2, 4, WebPreferences 
    2611 EXPECT 
     2625FOSWIKI12 
     2626        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     26271, 1, 1, DefaultPreferences 
     26282, 2, 2, WebPreferences 
     26291, 1, 3, SitePreferences 
     26302, 2, 4, WebPreferences 
     2631FOSWIKI11 
    26122632 
    26132633    return; 
    … …  
    26162636sub test_multiWeb_no_header_no_footer_no_separator_no_results { 
    26172637    my $this = shift; 
    2618     $this->_multiWebSeptic( 0, 0, undef, 0, <<'EXPECT'); 
    2619 EXPECT 
     2638    $this->_multiWebSeptic( 0, 0, undef, 0, undef, <<'FOSWIKI12'); 
     2639FOSWIKI12 
    26202640 
    26212641    return; 
    … …  
    26242644sub test_multiWeb_no_header_no_footer_empty_separator_with_results { 
    26252645    my $this = shift; 
    2626     $this->_multiWebSeptic( 0, 0, "", 1, <<'EXPECT'); 
     2646    $this->_multiWebSeptic( 
     2647        0, 0, "", 1, undef, <<'FOSWIKI12', 
    26272648SitePreferencesWebPreferencesDefaultPreferencesWebPreferences 
    2628 EXPECT 
     2649FOSWIKI12 
     2650        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2651DefaultPreferencesWebPreferencesSitePreferencesWebPreferences 
     2652FOSWIKI11 
    26292653 
    26302654    return; 
    … …  
    26332657sub test_multiWeb_no_header_no_footer_empty_separator_no_results { 
    26342658    my $this = shift; 
    2635     $this->_multiWebSeptic( 0, 0, "", 0, <<'EXPECT'); 
    2636 EXPECT 
     2659    $this->_multiWebSeptic( 0, 0, "", 0, undef, <<'FOSWIKI12'); 
     2660FOSWIKI12 
    26372661 
    26382662    return; 
    … …  
    26412665sub test_multiWeb_no_header_no_footer_with_separator_with_results { 
    26422666    my $this = shift; 
    2643     $this->_multiWebSeptic( 0, 0, ",", 1, <<'EXPECT'); 
     2667    $this->_multiWebSeptic( 
     2668        0, 0, ",", 1, undef, <<'FOSWIKI12', 
    26442669SitePreferences,WebPreferences,DefaultPreferences,WebPreferences 
    2645 EXPECT 
     2670FOSWIKI12 
     2671        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2672DefaultPreferences,WebPreferences,SitePreferences,WebPreferences 
     2673FOSWIKI11 
    26462674 
    26472675    return; 
    … …  
    26502678sub test_multiWeb_no_header_no_footer_with_separator_no_results { 
    26512679    my $this = shift; 
    2652     $this->_multiWebSeptic( 0, 0, ",", 0, <<'EXPECT'); 
    2653 EXPECT 
     2680    $this->_multiWebSeptic( 0, 0, ",", 0, undef, <<'FOSWIKI12'); 
     2681FOSWIKI12 
    26542682 
    26552683    return; 
    … …  
    26592687sub test_multiWeb_no_header_with_footer_no_separator_with_results { 
    26602688    my $this = shift; 
    2661     $this->_multiWebSeptic( 0, 1, undef, 1, <<'EXPECT'); 
     2689    $this->_multiWebSeptic( 
     2690        0, 1, undef, 1, undef, <<'FOSWIKI12', 
    26622691SitePreferences 
    26632692WebPreferences 
    … …  
    26652694WebPreferences 
    26662695FOOT(2,2) 
    2667 EXPECT 
     2696FOSWIKI12 
     2697        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2698DefaultPreferences 
     2699WebPreferences 
     2700FOOT(2,2)SitePreferences 
     2701WebPreferences 
     2702FOOT(2,2) 
     2703FOSWIKI11 
    26682704 
    26692705    return; 
    … …  
    26722708sub test_multiWeb_no_header_with_footer_no_separator_no_results { 
    26732709    my $this = shift; 
    2674     $this->_multiWebSeptic( 0, 1, undef, 0, <<'EXPECT'); 
    2675 EXPECT 
     2710    $this->_multiWebSeptic( 0, 1, undef, 0, undef, <<'FOSWIKI12'); 
     2711FOSWIKI12 
    26762712 
    26772713    return; 
    … …  
    26802716sub test_multiWeb_no_header_with_footer_empty_separator_with_results { 
    26812717    my $this = shift; 
    2682     $this->_multiWebSeptic( 0, 1, "", 1, <<'EXPECT'); 
     2718    $this->_multiWebSeptic( 
     2719        0, 1, "", 1, undef, <<'FOSWIKI12', 
    26832720SitePreferencesWebPreferencesFOOT(2,2)DefaultPreferencesWebPreferencesFOOT(2,2) 
    2684 EXPECT 
     2721FOSWIKI12 
     2722        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2723DefaultPreferencesWebPreferencesFOOT(2,2)SitePreferencesWebPreferencesFOOT(2,2) 
     2724FOSWIKI11 
    26852725 
    26862726    return; 
    … …  
    26892729sub test_multiWeb_no_header_with_footer_empty_separator_no_results { 
    26902730    my $this = shift; 
    2691     $this->_multiWebSeptic( 0, 1, "", 0, <<'EXPECT'); 
    2692 EXPECT 
     2731    $this->_multiWebSeptic( 0, 1, "", 0, undef, <<'FOSWIKI12'); 
     2732FOSWIKI12 
    26932733 
    26942734    return; 
    … …  
    26972737sub test_multiWeb_no_header_with_footer_with_separator_with_results { 
    26982738    my $this = shift; 
    2699     $this->_multiWebSeptic( 0, 1, ",", 1, <<'EXPECT'); 
     2739    $this->_multiWebSeptic( 
     2740        0, 1, ",", 1, undef, <<'FOSWIKI12', 
    27002741SitePreferences,WebPreferencesFOOT(2,2)DefaultPreferences,WebPreferencesFOOT(2,2) 
    2701 EXPECT 
     2742FOSWIKI12 
     2743        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2744DefaultPreferences,WebPreferencesFOOT(2,2)SitePreferences,WebPreferencesFOOT(2,2) 
     2745FOSWIKI11 
    27022746 
    27032747    return; 
    … …  
    27082752sub test_multiWeb_with_header_with_footer_no_separator_with_results { 
    27092753    my $this = shift; 
    2710     $this->_multiWebSeptic( 1, 1, undef, 1, <<'EXPECT'); 
     2754    $this->_multiWebSeptic( 
     2755        1, 1, undef, 1, undef, <<'FOSWIKI12', 
    27112756HEAD(Main) 
    27122757SitePreferences 
    … …  
    27162761WebPreferences 
    27172762FOOT(2,2) 
    2718 EXPECT 
     2763FOSWIKI12 
     2764        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2765HEAD(System) 
     2766DefaultPreferences 
     2767WebPreferences 
     2768FOOT(2,2)HEAD(Main) 
     2769SitePreferences 
     2770WebPreferences 
     2771FOOT(2,2) 
     2772FOSWIKI11 
    27192773 
    27202774    return; 
    … …  
    27232777sub test_multiWeb_with_header_with_footer_no_separator_no_results { 
    27242778    my $this = shift; 
    2725     $this->_multiWebSeptic( 1, 1, undef, 0, <<'EXPECT'); 
    2726 EXPECT 
     2779    $this->_multiWebSeptic( 1, 1, undef, 0, undef, <<'FOSWIKI12'); 
     2780FOSWIKI12 
    27272781 
    27282782    return; 
    … …  
    27312785sub test_multiWeb_with_header_with_footer_empty_separator_with_results { 
    27322786    my $this = shift; 
    2733     $this->_multiWebSeptic( 1, 1, "", 1, <<'EXPECT'); 
     2787    $this->_multiWebSeptic( 
     2788        1, 1, "", 1, undef, <<'FOSWIKI12', 
    27342789HEAD(Main)SitePreferencesWebPreferencesFOOT(2,2)HEAD(System)DefaultPreferencesWebPreferencesFOOT(2,2) 
    2735 EXPECT 
     2790FOSWIKI12 
     2791        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2792HEAD(System)DefaultPreferencesWebPreferencesFOOT(2,2)HEAD(Main)SitePreferencesWebPreferencesFOOT(2,2) 
     2793FOSWIKI11 
    27362794 
    27372795    return; 
    … …  
    27402798sub test_multiWeb_with_header_with_footer_empty_separator_no_results { 
    27412799    my $this = shift; 
    2742     $this->_multiWebSeptic( 1, 1, "", 0, <<'EXPECT'); 
    2743 EXPECT 
     2800    $this->_multiWebSeptic( 1, 1, "", 0, undef, <<'FOSWIKI12'); 
     2801FOSWIKI12 
    27442802 
    27452803    return; 
    … …  
    27482806sub test_multiWeb_with_header_with_footer_with_separator_with_results { 
    27492807    my $this = shift; 
    2750     $this->_multiWebSeptic( 1, 1, ",", 1, <<'EXPECT'); 
     2808    $this->_multiWebSeptic( 
     2809        1, 1, ",", 1, undef, <<'FOSWIKI12', 
    27512810HEAD(Main)SitePreferences,WebPreferencesFOOT(2,2)HEAD(System)DefaultPreferences,WebPreferencesFOOT(2,2) 
    2752 EXPECT 
     2811FOSWIKI12 
     2812        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2813HEAD(System)DefaultPreferences,WebPreferencesFOOT(2,2)HEAD(Main)SitePreferences,WebPreferencesFOOT(2,2) 
     2814FOSWIKI11 
    27532815 
    27542816    return; 
    … …  
    27572819sub test_multiWeb_with_header_with_footer_with_separator_no_results { 
    27582820    my $this = shift; 
    2759     $this->_multiWebSeptic( 1, 1, ",", 0, <<'EXPECT'); 
    2760 EXPECT 
     2821    $this->_multiWebSeptic( 1, 1, ",", 0, undef, <<'FOSWIKI12'); 
     2822FOSWIKI12 
    27612823 
    27622824    return; 
    … …  
    27672829sub test_multiWeb_with_header_no_footer_no_separator_with_results { 
    27682830    my $this = shift; 
    2769     $this->_multiWebSeptic( 1, 0, undef, 1, <<'EXPECT'); 
     2831    $this->_multiWebSeptic( 
     2832        1, 0, undef, 1, undef, <<'FOSWIKI12', 
    27702833HEAD(Main) 
    27712834SitePreferences 
    … …  
    27742837DefaultPreferences 
    27752838WebPreferences 
    2776 EXPECT 
     2839FOSWIKI12 
     2840        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2841HEAD(System) 
     2842DefaultPreferences 
     2843WebPreferences 
     2844HEAD(Main) 
     2845SitePreferences 
     2846WebPreferences 
     2847FOSWIKI11 
    27772848 
    27782849    return; 
    … …  
    27812852sub test_multiWeb_with_header_no_footer_no_separator_no_results { 
    27822853    my $this = shift; 
    2783     $this->_multiWebSeptic( 1, 0, undef, 0, <<'EXPECT'); 
    2784 EXPECT 
     2854    $this->_multiWebSeptic( 1, 0, undef, 0, undef, <<'FOSWIKI12'); 
     2855FOSWIKI12 
    27852856 
    27862857    return; 
    … …  
    27892860sub test_multiWeb_with_header_no_footer_empty_separator_with_results { 
    27902861    my $this = shift; 
    2791     $this->_multiWebSeptic( 1, 0, "", 1, <<'EXPECT'); 
     2862    $this->_multiWebSeptic( 
     2863        1, 0, "", 1, undef, <<'FOSWIKI12', 
    27922864HEAD(Main)SitePreferencesWebPreferencesHEAD(System)DefaultPreferencesWebPreferences 
    2793 EXPECT 
     2865FOSWIKI12 
     2866        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2867HEAD(System)DefaultPreferencesWebPreferencesHEAD(Main)SitePreferencesWebPreferences 
     2868FOSWIKI11 
    27942869 
    27952870    return; 
    … …  
    27982873sub test_multiWeb_with_header_no_footer_empty_separator_no_results { 
    27992874    my $this = shift; 
    2800     $this->_multiWebSeptic( 1, 0, "", 0, <<'EXPECT'); 
    2801 EXPECT 
     2875    $this->_multiWebSeptic( 1, 0, "", 0, undef, <<'FOSWIKI12'); 
     2876FOSWIKI12 
    28022877 
    28032878    return; 
    … …  
    28062881sub test_multiWeb_with_header_no_footer_with_separator_with_results { 
    28072882    my $this = shift; 
    2808     $this->_multiWebSeptic( 1, 0, ",", 1, <<'EXPECT'); 
     2883    $this->_multiWebSeptic( 
     2884        1, 0, ",", 1, undef, <<'FOSWIKI12', 
    28092885HEAD(Main)SitePreferences,WebPreferencesHEAD(System)DefaultPreferences,WebPreferences 
    2810 EXPECT 
     2886FOSWIKI12 
     2887        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2888HEAD(System)DefaultPreferences,WebPreferencesHEAD(Main)SitePreferences,WebPreferences 
     2889FOSWIKI11 
    28112890 
    28122891    return; 
    … …  
    28152894sub test_multiWeb_with_header_no_footer_with_separator_no_results { 
    28162895    my $this = shift; 
    2817     $this->_multiWebSeptic( 1, 0, ",", 0, <<'EXPECT'); 
    2818 EXPECT 
     2896    $this->_multiWebSeptic( 1, 0, ",", 0, undef, <<'FOSWIKI12'); 
     2897FOSWIKI12 
    28192898 
    28202899    return; 
    … …  
    28362915        }%' 
    28372916    ); 
    2838     my $expected = <<'EXPECT'; 
     2917    my $expected = $this->_expect_with_deps( 
     2918        <<'FOSWIKI12', 
    28392919Main.WebHome 
    28402920Main.WebPreferences 
    … …  
    28442924System.WebPreferences 
    28452925FOOT(2,2) 
    2846 EXPECT 
     2926FOSWIKI12 
     2927        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2928System.WebHome 
     2929System.WebPreferences 
     2930FOOT(2,2)Main.WebHome 
     2931Main.WebPreferences 
     2932FOOT(2,2)Sandbox.WebHome 
     2933Sandbox.WebPreferences 
     2934FOOT(2,2) 
     2935FOSWIKI11 
    28472936    $expected =~ s/\n$//s; 
    28482937    $this->assert_str_equals( $expected, $result ); 
    … …  
    28702959    ); 
    28712960 
    2872     my $expected = <<'EXPECT'; 
     2961    my $expected = $this->_expect_with_deps( 
     2962        <<'FOSWIKI12', 
    28732963Main.WebChanges 
    28742964Main.WebHome 
    … …  
    28772967FOOT(4,4)Sandbox.WebChanges 
    28782968FOOT(1,1) 
    2879 EXPECT 
     2969FOSWIKI12 
     2970        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     2971System.WebChanges 
     2972System.WebHome 
     2973System.WebIndex 
     2974System.WebPreferences 
     2975FOOT(4,4)Main.WebChanges 
     2976FOOT(1,1) 
     2977FOSWIKI11 
    28802978    $expected =~ s/\n$//s; 
    28812979    $this->assert_str_equals( $expected, $result ); 
    … …  
    29023000    ); 
    29033001 
    2904     my $expected = <<'EXPECT'; 
     3002    my $expected = $this->_expect_with_deps( 
     3003        <<'FOSWIKI12', 
    29053004Sandbox.WebHome 
    29063005Sandbox.WebIndex 
    … …  
    29093008System.WebHome 
    29103009FOOT(2,2) 
    2911 EXPECT 
     3010FOSWIKI12 
     3011        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     3012Main.WebHome 
     3013Main.WebIndex 
     3014Main.WebPreferences 
     3015FOOT(3,3)Sandbox.WebChanges 
     3016Sandbox.WebHome 
     3017FOOT(2,2) 
     3018FOSWIKI11 
    29123019    $expected =~ s/\n$//s; 
    29133020    $this->assert_str_equals( $expected, $result ); 
    … …  
    29343041    ); 
    29353042 
    2936     my $expected = <<'EXPECT'; 
     3043    my $expected = $this->_expect_with_deps( 
     3044        <<'FOSWIKI12', 
    29373045System.WebIndex 
    29383046System.WebPreferences 
    29393047FOOT(2,2) 
    2940 EXPECT 
     3048FOSWIKI12 
     3049        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     3050Sandbox.WebIndex 
     3051Sandbox.WebPreferences 
     3052FOOT(2,2) 
     3053FOSWIKI11 
    29413054    $expected =~ s/\n$//s; 
    29423055    $this->assert_str_equals( $expected, $result ); 
    … …  
    30163129}%' 
    30173130    ); 
    3018  
    3019     my $expected; 
    3020     if ( $this->check_dependency('Foswiki,<,1.2') ) { 
    3021         $expected = <<'EXPECT'; 
     3131    my $expected = $this->_expect_with_deps( 
     3132        <<'FOSWIKI12', 
     3133Main.WebPreferences 
     3134FOOT(1,1) 
     3135Sandbox.WebPreferences 
     3136FOOT(1,1) 
     3137System.WebPreferences 
     3138FOOT(1,1) 
     3139FOSWIKI12 
     3140        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
    30223141System.WebPreferences 
    30233142FOOT(1,1) 
    … …  
    30263145Sandbox.WebPreferences 
    30273146FOOT(1,1) 
    3028 EXPECT 
    3029     } 
    3030     else { 
    3031         $expected = <<'EXPECT'; 
    3032 Main.WebPreferences 
    3033 FOOT(1,1) 
    3034 Sandbox.WebPreferences 
    3035 FOOT(1,1) 
    3036 System.WebPreferences 
    3037 FOOT(1,1) 
    3038 EXPECT 
    3039     } 
     3147FOSWIKI11 
     3148 
    30403149    $expected =~ s/\n$//s; 
    30413150    $this->assert_str_equals( $expected, $result ); 
    … …  
    30653174    ); 
    30663175 
    3067     my $expected = <<'EXPECT'; 
     3176    my $expected = $this->_expect_with_deps( 
     3177        <<'FOSWIKI12', 
    30683178Main.WebChanges 
    30693179Main.WebHome 
    30703180Main.WebIndex 
    30713181FOOT(3,3) 
    3072 EXPECT 
     3182FOSWIKI12 
     3183        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     3184System.WebChanges 
     3185System.WebHome 
     3186System.WebIndex 
     3187FOOT(3,3) 
     3188FOSWIKI11 
    30733189    $expected =~ s/\n$//s; 
    30743190    $this->assert_str_equals( $expected, $result ); 
    … …  
    30963212    ); 
    30973213 
    3098     my $expected = <<'EXPECT'; 
     3214    my $expected = $this->_expect_with_deps( 
     3215        <<'FOSWIKI12', 
    30993216Sandbox.WebChanges 
    31003217Sandbox.WebHome 
    31013218Sandbox.WebIndex 
    31023219FOOT(3,3) 
    3103 EXPECT 
     3220FOSWIKI12 
     3221        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     3222Main.WebChanges 
     3223Main.WebHome 
     3224Main.WebIndex 
     3225FOOT(3,3) 
     3226FOSWIKI11 
    31043227    $expected =~ s/\n$//s; 
    31053228    $this->assert_str_equals( $expected, $result ); 
    … …  
    31273250    ); 
    31283251 
    3129     my $expected = <<'EXPECT'; 
     3252    my $expected = $this->_expect_with_deps( 
     3253        <<'FOSWIKI12', 
    31303254System.WebChanges 
    31313255System.WebHome 
    31323256System.WebIndex 
    31333257FOOT(3,3) 
    3134 EXPECT 
     3258FOSWIKI12 
     3259        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     3260Sandbox.WebChanges 
     3261Sandbox.WebHome 
     3262Sandbox.WebIndex 
     3263FOOT(3,3) 
     3264FOSWIKI11 
    31353265    $expected =~ s/\n$//s; 
    31363266    $this->assert_str_equals( $expected, $result ); 
    … …  
    42974427    ); 
    42984428 
    4299     my $expected = <<"EXPECT"; 
     4429    my $expected = $this->_expect_with_deps( 
     4430        <<"FOSWIKI12", 
    43004431Main.WebChanges 
    43014432Main.WebHome 
    … …  
    43064437   Page 1 of 3   [[$viewTopicUrl?SEARCHc6139cf1d63c9614230f742fca2c6a36=2][Next >]] 
    43074438</div> 
    4308 EXPECT 
     4439FOSWIKI12 
     4440        'Foswiki,<,1.2' => <<"FOSWIKI11"); 
     4441System.WebChanges 
     4442System.WebHome 
     4443System.WebIndex 
     4444System.WebPreferences 
     4445FOOT(4,4)Main.WebChanges 
     4446FOOT(1,1)<div class="foswikiSearchResultsPager"> 
     4447   Page 1 of 3   [[$viewTopicUrl?SEARCHc6139cf1d63c9614230f742fca2c6a36=2][Next >]] 
     4448</div> 
     4449FOSWIKI11 
    43094450    $expected =~ s/\n$//s; 
    43104451    $this->assert_str_equals( $expected, $result ); 
    … …  
    43264467    ); 
    43274468 
    4328     $expected = <<"EXPECT"; 
     4469    $expected = $this->_expect_with_deps( 
     4470        <<"FOSWIKI12", 
    43294471Sandbox.WebHome 
    43304472Sandbox.WebIndex 
    … …  
    43354477[[$viewTopicUrl?SEARCH6331ae02a320baf1478c8302e38b7577=1][< Previous]]   Page 2 of 3   [[$viewTopicUrl?SEARCH6331ae02a320baf1478c8302e38b7577=3][Next >]] 
    43364478</div> 
    4337 EXPECT 
     4479FOSWIKI12 
     4480        'Foswiki,<,1.2' => <<"FOSWIKI11"); 
     4481Main.WebHome 
     4482Main.WebIndex 
     4483Main.WebPreferences 
     4484FOOT(3,3)Sandbox.WebChanges 
     4485Sandbox.WebHome 
     4486FOOT(2,2)<div class="foswikiSearchResultsPager"> 
     4487[[$viewTopicUrl?SEARCH6331ae02a320baf1478c8302e38b7577=1][< Previous]]   Page 2 of 3   [[$viewTopicUrl?SEARCH6331ae02a320baf1478c8302e38b7577=3][Next >]] 
     4488</div> 
     4489FOSWIKI11 
    43384490    $expected =~ s/\n$//s; 
    43394491    $this->assert_str_equals( $expected, $result ); 
    … …  
    43664518EXPECT 
    43674519 
    4368     my $expected = <<"EXPECT"; 
     4520    my $expected = $this->_expect_with_deps( 
     4521        <<"FOSWIKI12", 
    43694522Main.WebChanges 
    43704523Main.WebHome 
    … …  
    43744527FOOT(1,1) 
    43754528..prev=0, 1, next=2, numberofpages=3, pagesize=5, prevurl=, nexturl=$viewTopicUrl?SEARCHe9863b5d7ec27abeb8421578b0747c25=2.. 
    4376 EXPECT 
     4529FOSWIKI12 
     4530        'Foswiki,<,1.2' => <<"FOSWIKI11"); 
     4531System.WebChanges 
     4532System.WebHome 
     4533System.WebIndex 
     4534System.WebPreferences 
     4535FOOT(4,4)Main.WebChanges 
     4536FOOT(1,1) 
     4537..prev=0, 1, next=2, numberofpages=3, pagesize=5, prevurl=, nexturl=$viewTopicUrl?SEARCHe9863b5d7ec27abeb8421578b0747c25=2.. 
     4538FOSWIKI11 
    43774539    $this->assert_str_equals( $expected, $result ); 
    43784540 
    … …  
    43954557    ); 
    43964558 
    4397     $expected = <<"EXPECT"; 
     4559    $expected = $this->_expect_with_deps( 
     4560        <<"FOSWIKI12", 
    43984561Sandbox.WebHome 
    43994562Sandbox.WebIndex 
    … …  
    44034566FOOT(2,2) 
    44044567..prev=1, 2, next=3, numberofpages=3, pagesize=5, prevurl=$viewTopicUrl?SEARCHc5ceccfcec96473a9efe986cf3597eb1=1, nexturl=$viewTopicUrl?SEARCHc5ceccfcec96473a9efe986cf3597eb1=3.. 
    4405 EXPECT 
     4568FOSWIKI12 
     4569        'Foswiki,<,1.2' => <<"FOSWIKI11"); 
     4570Main.WebHome 
     4571Main.WebIndex 
     4572Main.WebPreferences 
     4573FOOT(3,3)Sandbox.WebChanges 
     4574Sandbox.WebHome 
     4575FOOT(2,2) 
     4576..prev=1, 2, next=3, numberofpages=3, pagesize=5, prevurl=$viewTopicUrl?SEARCHc5ceccfcec96473a9efe986cf3597eb1=1, nexturl=$viewTopicUrl?SEARCHc5ceccfcec96473a9efe986cf3597eb1=3.. 
     4577FOSWIKI11 
    44064578    $this->assert_str_equals( $expected, $result ); 
    44074579 
    … …  
    44334605    ); 
    44344606 
    4435     my $expected = <<'EXPECT'; 
     4607    my $expected = $this->_expect_with_deps( 
     4608        <<'FOSWIKI12', 
    44364609Main.WebChanges 
    44374610Main.WebHome 
    … …  
    44404613FOOT(4,4)Sandbox.WebChanges 
    44414614FOOT(1,1) 
    4442 EXPECT 
     4615FOSWIKI12 
     4616        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     4617System.WebChanges 
     4618System.WebHome 
     4619System.WebIndex 
     4620System.WebPreferences 
     4621FOOT(4,4)Main.WebChanges 
     4622FOOT(1,1) 
     4623FOSWIKI11 
    44434624    $expected =~ s/\n$//s; 
    44444625    $this->assert_str_equals( $expected, $result ); 
    … …  
    44614642    ); 
    44624643 
    4463     $expected = <<'EXPECT'; 
     4644    $expected = $this->_expect_with_deps( 
     4645        <<'FOSWIKI12', 
    44644646Sandbox.WebHome 
    44654647Sandbox.WebIndex 
    … …  
    44684650System.WebHome 
    44694651FOOT(2,2) 
    4470 EXPECT 
     4652FOSWIKI12 
     4653        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     4654Main.WebHome 
     4655Main.WebIndex 
     4656Main.WebPreferences 
     4657FOOT(3,3)Sandbox.WebChanges 
     4658Sandbox.WebHome 
     4659FOOT(2,2) 
     4660FOSWIKI11 
    44714661    $expected =~ s/\n$//s; 
    44724662    $this->assert_str_equals( $expected, $result ); 
    … …  
    45004690    ); 
    45014691 
    4502     my $expected = <<'EXPECT'; 
     4692    my $expected = $this->_expect_with_deps( 
     4693        <<'FOSWIKI12', 
    45034694HEADER(..prev=0, 1, next=2, numberofpages=3, pagesize=5..) 
    45044695Main.WebChanges 
    … …  
    45094700Sandbox.WebChanges 
    45104701FOOT(1,1)(..prev=0, 1, next=2, numberofpages=3, pagesize=5..) 
    4511 EXPECT 
     4702FOSWIKI12 
     4703        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     4704HEADER(..prev=0, 1, next=2, numberofpages=3, pagesize=5..) 
     4705System.WebChanges 
     4706System.WebHome 
     4707System.WebIndex 
     4708System.WebPreferences 
     4709FOOT(4,4)(..prev=0, 1, next=2, numberofpages=3, pagesize=5..)HEADER(..prev=0, 1, next=2, numberofpages=3, pagesize=5..) 
     4710Main.WebChanges 
     4711FOOT(1,1)(..prev=0, 1, next=2, numberofpages=3, pagesize=5..) 
     4712FOSWIKI11 
    45124713    $expected =~ s/\n$//s; 
    45134714    $this->assert_str_equals( $expected, $result ); 
    … …  
    45314732    ); 
    45324733 
    4533     $expected = <<'EXPECT'; 
     4734    $expected = $this->_expect_with_deps( 
     4735        <<'FOSWIKI12', 
    45344736HEADER(..prev=1, 2, next=3, numberofpages=3, pagesize=5..) 
    45354737Sandbox.WebHome 
    … …  
    45404742System.WebHome 
    45414743FOOT(2,2)(..prev=1, 2, next=3, numberofpages=3, pagesize=5..) 
    4542 EXPECT 
     4744FOSWIKI12 
     4745        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     4746HEADER(..prev=1, 2, next=3, numberofpages=3, pagesize=5..) 
     4747Main.WebHome 
     4748Main.WebIndex 
     4749Main.WebPreferences 
     4750FOOT(3,3)(..prev=1, 2, next=3, numberofpages=3, pagesize=5..)HEADER(..prev=1, 2, next=3, numberofpages=3, pagesize=5..) 
     4751Sandbox.WebChanges 
     4752Sandbox.WebHome 
     4753FOOT(2,2)(..prev=1, 2, next=3, numberofpages=3, pagesize=5..) 
     4754FOSWIKI11 
    45434755    $expected =~ s/\n$//s; 
    45444756    $this->assert_str_equals( $expected, $result ); 
    … …  
    45684780    ); 
    45694781 
    4570     my $expected; 
    4571     if ( $this->check_dependency('Foswiki,<,1.2') ) { 
    4572         $expected = <<'EXPECT'; 
     4782    my $expected = $this->_expect_with_deps( 
     4783        <<'FOSWIKI12', 
     4784HEADER(ntopics=0..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=0 
     4785Sandbox.WebHome (ntopics=1..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=1 
     4786Sandbox.WebIndex (ntopics=2..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=2 
     4787Sandbox.WebPreferences (ntopics=3..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=3 
     4788FOOT(3,3)(ntopics=3..prev=1, 2, next=3, numberofpages=3, pagesize=5..)HEADER(ntopics=0..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=0 
     4789System.WebChanges (ntopics=1..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=1 
     4790System.WebHome (ntopics=2..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=2 
     4791FOOT(2,2)(ntopics=2..prev=1, 2, next=3, numberofpages=3, pagesize=5..) 
     4792FOSWIKI12 
     4793        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
    45734794HEADER(ntopics=0..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=0 
    45744795Main.WebHome (ntopics=1..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=1 
    … …  
    45794800Sandbox.WebHome (ntopics=2..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=2 
    45804801FOOT(2,2)(ntopics=2..prev=1, 2, next=3, numberofpages=3, pagesize=5..) 
    4581 EXPECT 
    4582     } 
    4583     else { 
    4584         $expected = <<'EXPECT'; 
    4585 HEADER(ntopics=0..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=0 
    4586 Sandbox.WebHome (ntopics=1..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=1 
    4587 Sandbox.WebIndex (ntopics=2..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=2 
    4588 Sandbox.WebPreferences (ntopics=3..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=3 
    4589 FOOT(3,3)(ntopics=3..prev=1, 2, next=3, numberofpages=3, pagesize=5..)HEADER(ntopics=0..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=0 
    4590 System.WebChanges (ntopics=1..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=1 
    4591 System.WebHome (ntopics=2..prev=1, 2, next=3, numberofpages=3, pagesize=5..)ntopics=2 
    4592 FOOT(2,2)(ntopics=2..prev=1, 2, next=3, numberofpages=3, pagesize=5..) 
    4593 EXPECT 
    4594     } 
     4802FOSWIKI11 
     4803 
    45954804    $expected =~ s/\n$//s; 
    45964805    $this->assert_str_equals( $expected, $result ); 
    … …  
    46134822' 
    46144823    ); 
    4615     my $expected = <<'HERE'; 
     4824    my $expected = $this->_expect_with_deps( 
     4825        <<'FOSWIKI12', 
    46164826   * !Main.WebHome 
    46174827   * !Main.WebPreferences 
    … …  
    46304840   * !TestCases.WebTopicList 
    46314841<div class="foswikiSearchResultCount">Number of topics: <span>3</span></div> 
    4632 HERE 
     4842FOSWIKI12 
     4843        'Foswiki,<,1.2' => <<'FOSWIKI11'); 
     4844   * !TestCases.WebHome 
     4845   * !TestCases.WebPreferences 
     4846   * !TestCases.WebTopicList 
     4847<div class="foswikiSearchResultCount">Number of topics: <span>3</span></div> 
     4848   * !System.WebHome 
     4849   * !System.WebPreferences 
     4850   * !System.WebTopicList 
     4851<div class="foswikiSearchResultCount">Number of topics: <span>3</span></div> 
     4852   * !Main.WebHome 
     4853   * !Main.WebPreferences 
     4854   * !Main.WebTopicList 
     4855<div class="foswikiSearchResultCount">Number of topics: <span>3</span></div> 
     4856   * !Sandbox.WebHome 
     4857   * !Sandbox.WebPreferences 
     4858   * !Sandbox.WebTopicList 
     4859<div class="foswikiSearchResultCount">Number of topics: <span>3</span></div> 
     4860FOSWIKI11 
    46334861 
    46344862    $this->assert_str_equals( $expected, $actual ); 
Note: See TracChangeset for help on using the changeset viewer.