--- ray/src/util/gethelp3.6.tcl 1994/10/30 09:05:09 2.6 +++ ray/src/util/gethelp3.6.tcl 1994/12/01 12:47:47 2.7 @@ -248,6 +248,7 @@ proc helpupdate {} { # update help text window set curhelp(next) "$cat $top" .helpwin.but.next configure -state normal } else { + set curhelp(next) {} .helpwin.but.next configure -state disabled } .helpwin.txt configure -state disabled