Check-in [1e57938b27]
Overview
Comment:Updated to sort entities on teapot index page
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 1e57938b278c76631ae325def92954bb74d2ab6f
User & Date: rkeene on 2011-03-30 16:41:39
Other Links: manifest | tags
Context
2011-03-30
16:41
Updated to Tcllib 1.13 check-in: 36fbce3da1 user: rkeene tags: trunk
16:41
Updated to sort entities on teapot index page check-in: 1e57938b27 user: rkeene tags: trunk
16:09
Updated ignores check-in: cd241ef70c user: rkeene tags: trunk
Changes

Modified server/teapot_index from [aa6092043f] to [6035bfad78].

423
424
425
426
427
428
429


430
431
432
433
434
435
436

			if {[lsearch -exact $pkglist $currpkgdata] != -1} {
				continue
			}

			lappend pkglist $currpkgdata
		}



		puts $fd [generate_tpm $pkglist]

		puts $fd "    <h1>$pkgnextlevel</h1>"
		puts $fd "    <table>"
		puts $fd "    <tr>"
		foreach dispfield [join [list entity $dispfields]] {







>
>







423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438

			if {[lsearch -exact $pkglist $currpkgdata] != -1} {
				continue
			}

			lappend pkglist $currpkgdata
		}

		set pkglist [lsort -dictionary $pkglist]

		puts $fd [generate_tpm $pkglist]

		puts $fd "    <h1>$pkgnextlevel</h1>"
		puts $fd "    <table>"
		puts $fd "    <tr>"
		foreach dispfield [join [list entity $dispfields]] {