Commits

Anonymous committed 618066c

Added the leading path at the top.

Comments (0)

Files changed (3)

-* Add the "Leading Components Path" to the Top of the Page.
+* Add the missing stub pages. (that appear in the site flow, but were not created
+yet).
 
 * Write a message in the News file:
 
     3. Mozilla Navigation Links.
     4. Uber-Kitchy Leading Path of Components.
 
+* Add links to the appropriate resources from the bio.
+
+* Add information about contributing to Subversion, GIMP and Perl.
+
     border-style : double;
     padding : 0.5em;
 }
+/* This is for the leading path at the top. */
+.leading_path
+{
+    background-color : #80d000;
+}
+.leading_path a:visited
+{
+    color : #FFFF00;
+}
+.leading_path a:hover
+{
+    background-color : orange;
+}
 
 $nav_html = $rendered_results->{html};
 
+my $leading_path = $rendered_results->{leading_path};
+
+my $render_leading_path_component = sub {
+    my $component = shift;
+    return "<a href=\"" . CGI::escapeHTML($component->direct_url()) .
+    "\" title=\"" . $component->title() . "\">" .
+    $component->label() . "</a>";
+};
+
+use vars qw($leading_path_string);
+
+$leading_path_string =
+    join(" &rarr; ",
+        (map
+        { $render_leading_path_component->($_) }
+        @$leading_path
+        ));
+
 }:>
 
 
 <define-tag start_table>
 <table summary="Layout Table: The first cell contains a navigation bar, the second the main page" border="0" width="99%">
 <tr>
+<td colspan="2" class="leading_path">
+<:{ print $leading_path_string ; }:>
+</td>
+</tr>
+<tr>
 <td valign="top" class="navbar" style="width:20%">
 
 <if "<software_patents />"