From: Adam Dickmeiss Date: Tue, 26 Mar 1996 16:27:03 +0000 (+0000) Subject: Fix. X-Git-Url: http://lists.indexdata.dk/?a=commitdiff_plain;h=ed480f4a8f1c83bc5ba9b2afb1407b5df7f84611;p=egate.git Fix. --- diff --git a/www/z39util.tcl b/www/z39util.tcl index b71172d..e893729 100644 --- a/www/z39util.tcl +++ b/www/z39util.tcl @@ -1,5 +1,5 @@ # -# $Id: z39util.tcl,v 1.42 1996/03/15 14:43:45 adam Exp $ +# $Id: z39util.tcl,v 1.43 1996/03/26 16:27:03 adam Exp $ # proc saveState {} { uplevel #0 { @@ -162,7 +162,7 @@ proc display-medium {zset no setNo targetNo} { html "No Title" } html { } - if {[scan $score %d nscore]} { + if {[scan $score %d nscore] == 1} { html "; Score " $nscore } } else {