<html>
{
-# $Id: search.egw,v 1.11 1995/11/08 16:14:33 adam Exp $
+# $Id: search.egw,v 1.12 1995/11/09 15:24:36 adam Exp $
proc buttons {setNo setMax startPos} {
global sessionId
if {$setMax < [z39.$setNo resultCount]} {
html {<a href="http:} $env(SCRIPT_NAME)
html / $sessionId {/search.egw/} $setNo + [expr $setMax + 1]
- html + [expr $setMax + $hist($setNo,maxPresent)] {"> Next </a>} "| \n"
+ html + [expr $setMax + $hist($setNo,maxPresent)]
+ html {"> Next records </a>} "| \n"
}
if {$startPos != "" && $startPos != "1"} {
html {<a href="http:} $env(SCRIPT_NAME)
html + [expr $startPos - $hist($setNo,maxPresent)]
html + [expr $startPos - 1]
}
- html {"> Prev </a>} "| \n"
+ html {"> Previous records </a>} "| \n"
}
html {<a href="http:} $env(SCRIPT_NAME)
html / $sessionId {/targets.egw"> New target </a>} " | \n"