← Back to branch summary

~ubuntu-branches/ubuntu/quantal/libhtml-widgets-navmenu-perl/quantal

« back to all changes in this revision

Viewing changes to t/04nav-menu.t

  • Committer: Bazaar Package Importer
  • Author(s): gregor herrmann
  • Date: 2011-04-23 19:50:53 UTC
  • mfrom: (1.1.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20110423195053-ae3fmok1w4vw8czk
Tags: 1.0600-1
* New upstream release.
* Set Standards-Version to 3.9.2 (no changes).
* Add /me to Uploaders.

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/04nav-menu.t
4
4
 
5
5
use lib './t/lib';
6
6
 
7
 
use Test::More tests => 26;
 
7
use Test::More tests => 28;
8
8
 
9
9
use HTML::Widgets::NavMenu;
10
10
use HTML::Widgets::NavMenu::HeaderRole;
 
11
use HTML::Widgets::NavMenu::JQueryTreeView;
11
12
 
12
13
use HTML::Widgets::NavMenu::Test::Data;
13
14
 
983
984
    test_nav_menu($rendered, $expected_string, 
984
985
        "Nav Menu with an empty header role."); 
985
986
}
 
987
 
 
988
# Test HTML::Widgets::NavMenu::JQueryTreeView .
 
989
{
 
990
    my $nav_menu = HTML::Widgets::NavMenu::JQueryTreeView->new(
 
991
        'path_info' => "/me/bio/test.html",
 
992
        @{$test_data->{'selective_expand'}},
 
993
        'ul_classes' => [ "one", "two", "three" ],
 
994
    );
 
995
 
 
996
    my $rendered =
 
997
        $nav_menu->render();
 
998
 
 
999
    my $expected_string = <<"EOF";
 
1000
<ul class="one">
 
1001
<li>
 
1002
<a href="./../../">Home</a>
 
1003
</li>
 
1004
<li class="open">
 
1005
<a href="./../" title="About Myself">About Me</a>
 
1006
<br />
 
1007
<ul class="two">
 
1008
<li>
 
1009
<a href="./../group-hug/">Group Hug</a>
 
1010
</li>
 
1011
<li>
 
1012
<a href="./../cool-io/">Cool I/O</a>
 
1013
</li>
 
1014
<li>
 
1015
<a href="./../../resume.html">Resume</a>
 
1016
</li>
 
1017
</ul>
 
1018
</li>
 
1019
<li>
 
1020
<a href="./../../halifax/">Halifax</a>
 
1021
</li>
 
1022
<li>
 
1023
<a href="./../../open-source/" title="Open Source Software I Wrote">Software</a>
 
1024
<br />
 
1025
<ul class="two">
 
1026
<li>
 
1027
<a href="./../../open-source/fooware/">Fooware</a>
 
1028
</li>
 
1029
<li>
 
1030
<a href="./../../open-source/condor-man/" title="Kwalitee">Condor-Man</a>
 
1031
</li>
 
1032
</ul>
 
1033
</li>
 
1034
</ul>
 
1035
EOF
 
1036
 
 
1037
    # TEST
 
1038
    test_nav_menu($rendered, $expected_string, "HTML::Widgets::NavMenu::JQueryTreeView #1"); 
 
1039
}
 
1040
 
 
1041
# Test HTML::Widgets::NavMenu::JQueryTreeView with hidden.
 
1042
{
 
1043
    my $nav_menu = HTML::Widgets::NavMenu::JQueryTreeView->new(
 
1044
        'path_info' => "/me/",
 
1045
        @{$test_data->{'hidden_item'}},
 
1046
        'ul_classes' => [ "one", "two", "three" ],
 
1047
    );
 
1048
 
 
1049
    my $rendered =
 
1050
        $nav_menu->render();
 
1051
 
 
1052
    my $expected_string = <<"EOF";
 
1053
<ul class="one">
 
1054
<li>
 
1055
<a href="../">Home</a>
 
1056
</li>
 
1057
<li class="open">
 
1058
<b>About Me</b>
 
1059
<br />
 
1060
<ul class="two">
 
1061
<li>
 
1062
<a href="visible/">Visible</a>
 
1063
</li>
 
1064
<li>
 
1065
<a href="visible-too/">Visible Too</a>
 
1066
</li>
 
1067
</ul>
 
1068
</li>
 
1069
</ul>
 
1070
EOF
 
1071
 
 
1072
    # TEST
 
1073
    test_nav_menu($rendered, $expected_string, "JQTreeView Nav Menu with Hidden Item"); 
 
1074
}