2ab6f7caa2
git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@1398 2a923420-c742-0410-a762-8d5b09965624
28 lines
472 B
Plaintext
Executable File
28 lines
472 B
Plaintext
Executable File
#!/mod/bin/jimsh
|
|
|
|
package require cgi
|
|
source /mod/webif/lib/setup
|
|
require epg.class
|
|
|
|
header
|
|
|
|
set service [cgi_get service]
|
|
set event [cgi_get event]
|
|
set raw [cgi_get raw]
|
|
|
|
puts "<pre>"
|
|
if { $raw == 0 } {
|
|
puts [epg exec dump -raw 1 -service $service -event $event]
|
|
puts "<a href=$env(REQUEST_URI)?$env(QUERY_STRING)&raw=1>
|
|
Click here for extended dump</a>"
|
|
} else {
|
|
puts [epg exec dumpraw -raw 1 -service $service -event $event]
|
|
}
|
|
|
|
puts "</pre>"
|
|
|
|
epg cleanup
|
|
|
|
footer
|
|
|