Index: server/teapot_index ================================================================== --- server/teapot_index +++ server/teapot_index @@ -85,11 +85,17 @@ } "META" { set var [string tolower [lindex $line 1]] set val [lrange $line 2 end] - lappend currpkginfo($var) $val + if {![info exists currpkginfo($var)]} { + set currpkginfo($var) "" + } + + if {[lsearch -exact $currpkginfo($var) $val] == -1} { + lappend currpkginfo($var) $val + } } } } set pkginfo([list $currpkginfo(name) $currpkginfo(vers) $currpkginfo(platform)]) [array get currpkginfo]