im_maybe_insert_link previous_page next_page { divider " - " }What it does:
Formats prev and next linksDefined in: /web/philip/tcl/intranet-defs.tcl
Source code:
set link ""
if { ![empty_string_p $previous_page] } {
append link "$previous_page"
}
if { ![empty_string_p $next_page] } {
if { ![empty_string_p $link] } {
append link $divider
}
append link "$next_page"
}
return $link