diff --git a/var/mongoose/cgi-bin/channel.jim b/var/mongoose/cgi-bin/channel.jim
index 05b99e3..7fe42b3 100755
--- a/var/mongoose/cgi-bin/channel.jim
+++ b/var/mongoose/cgi-bin/channel.jim
@@ -32,17 +32,19 @@ puts "
Frequency |
Signal Strength |
Signal Quality |
+ Network |
Mux |
Channels |
>799 |
"
foreach tw [$db query {
- select tsIdx, usTsID, ulFrequency, ucLevel, ucQuality
- from TBL_TS
+ select tsIdx, szNetName, usTsID, ulFrequency, ucLevel, ucQuality
+ from TBL_TS join TBL_NET using (netIdx)
order by ulFrequency
}] {
- lassign $tw x tsIdx x usTsID x ulFrequency x ucLevel x ucQuality
+ lassign $tw \
+ x tsIdx x netName x usTsID x ulFrequency x ucLevel x ucQuality
altrow
puts "
@@ -51,6 +53,7 @@ foreach tw [$db query {
"
puts "[progressbar $ucLevel] | "
puts "[progressbar $ucQuality] | "
+ puts "[string range $netName 3 end] | "
set channels [$db query {
select usLcn, szSvcName, szPrvName, aucDefaultAuthority