|
||||||
| SUMMARY: CHILDREN | PARAMETER | INSTPROC | INSTFILTER | INSTFORWARD | DETAIL: | INSTPROC | |||||
::xotcl::Object
| Variables | |||
| Name | Default Value | Class | Comment |
AvailableNavLinkState |
::xodocument::NavBar | ||
SelectedNavLinkState |
::xodocument::NavBar | ||
UnavailableNavLinkState |
::xodocument::NavBar | ||
classLink |
::xodocument::NavBar | ||
namespaceLink |
::xodocument::NavBar | ||
overviewLink |
::xodocument::NavBar | ||
| Methods | |
| Name | Comment |
init {}
| |
putsNavBar {file}
| |
selectClass {namespace}
| |
selectNamespace {}
| |
selectOverview {}
| |
| Methods from ::xotcl::Object |
#, ., ?, ?code, ?methods, ?object, abstract, copy, coverageFilter, defaultmethod, extractConfigureArg, filterappend, get#, getClean#, hasclass, init, methodTag, mixinappend, move, profileFilter, self, setParameterDefaults, shell, tclcmd, traceFilter,
|
| Instproc Detail |
::xodocument::NavBar instproc init {} {
::xotcl::my SelectedNavLinkState [ SelectedNavLinkState new ]
::xotcl::my AvailableNavLinkState [ AvailableNavLinkState new ]
::xotcl::my UnavailableNavLinkState [ UnavailableNavLinkState new ]
::xotcl::my overviewLink [ NavLink new Overview overview-summary.html [ ::xotcl::my SelectedNavLinkState ] ]
::xotcl::my namespaceLink [ NavLink new Namespace namespace-summary.html [ ::xotcl::my UnavailableNavLinkState ] ]
::xotcl::my classLink [ NavLink new Class class-summary.html [ ::xotcl::my UnavailableNavLinkState ] ]
}
file ::xodocument::NavBar instproc putsNavBar {file} {
puts $file "
<!-- ========== START OF NAVBAR ========== -->
<A NAME=\"navbar_top\"><!-- --></A>
<TABLE BORDER=\"0\" WIDTH=\"100%\" CELLPADDING=\"1\" CELLSPACING=\"0\">
<TR>
<TD COLSPAN=3 BGCOLOR=\"#EEEEFF\" CLASS=\"NavBarCell1\">
<A NAME=\"navbar_top_firstrow\"><!-- --></A>
<TABLE BORDER=\"0\" CELLPADDING=\"0\" CELLSPACING=\"3\">
<TR ALIGN=\"center\" VALIGN=\"top\">
[ [ ::xotcl::my overviewLink ] getLink ]
[ [ ::xotcl::my namespaceLink ] getLink ]
[ [ ::xotcl::my classLink ] getLink ]
</TR>
</TABLE>
</TD>
<TD ALIGN=\"right\" VALIGN=\"top\" ROWSPAN=3><EM>
</EM>
</TD>
</TR>
<TR>
<td>
</td>
</TR>
<TR>
<TD VALIGN=\"top\" CLASS=\"NavBarCell3\"><FONT SIZE=\"-2\">
SUMMARY: CHILDREN | <A HREF=\"#parameter_summary\">PARAMETER</A> | <A HREF=\"#instproc_summary\">INSTPROC</A> | <A HREF=\"#instfilter_summary\">INSTFILTER</A> | <A HREF=\"#instforward_summary\">INSTFORWARD</A></FONT></TD>
<TD VALIGN=\"top\" CLASS=\"NavBarCell3\"><FONT SIZE=\"-2\">
DETAIL: | <A HREF=\"#instproc_detail\">INSTPROC</A></FONT></TD>
<TD VALIGN=\"top\" CLASS=\"NavBarCell3\"><FONT SIZE=\"-2\">
</TR>
</TABLE>
<!-- =========== END OF NAVBAR =========== -->
"
}
namespace ::xodocument::NavBar instproc selectClass {namespace} {
[ ::xotcl::my overviewLink ] state [ ::xotcl::my AvailableNavLinkState ]
[ ::xotcl::my namespaceLink ] state [ ::xotcl::my AvailableNavLinkState ]
[ ::xotcl::my classLink ] state [ ::xotcl::my SelectedNavLinkState ]
[ ::xotcl::my namespaceLink ] link $namespace
}
::xodocument::NavBar instproc selectNamespace {} {
[ ::xotcl::my overviewLink ] state [ ::xotcl::my AvailableNavLinkState ]
[ ::xotcl::my namespaceLink ] state [ ::xotcl::my SelectedNavLinkState ]
[ ::xotcl::my classLink ] state [ ::xotcl::my UnavailableNavLinkState ]
}
::xodocument::NavBar instproc selectOverview {} {
[ ::xotcl::my overviewLink ] state [ ::xotcl::my SelectedNavLinkState ]
[ ::xotcl::my namespaceLink ] state [ ::xotcl::my UnavailableNavLinkState ]
[ ::xotcl::my classLink ] state [ ::xotcl::my UnavailableNavLinkState ]
}