disallow unschedule active

git-svn-id: file:///root/webif/svn/pkg/webif/trunk@3178 2a923420-c742-0410-a762-8d5b09965624
This commit is contained in:
hummypkg 2016-08-15 20:23:19 +00:00
parent 0d3e33330e
commit daa345cac9
2 changed files with 8 additions and 1 deletions

View File

@ -1,7 +1,7 @@
Package: webif Package: webif
Priority: optional Priority: optional
Section: web Section: web
Version: 1.3.1-4 Version: 1.3.1-5
Architecture: mipsel Architecture: mipsel
Maintainer: af123@hpkg.tv Maintainer: af123@hpkg.tv
Depends: tcpfix,webif-channelicons(>=1.1.24),lighttpd(>=1.4.39-1),jim(>=0.76-2),jim-oo,jim-sqlite3(>=0.76),jim-cgi(>=0.7-1),jim-binary(>=0.76),service-control(>=2.1),busybox(>=1.20.2-1),lsof(>=4.87),epg(>=1.2.3),hmt(>=2.0.10),ssmtp,cron-daemon(>=1.18.3-3),at(>=3.1.18),anacron,trm(>=1.1),openssl-command,nicesplice,id3v2,file,rsvsync(>=1.1.3),webif-charts(>=1.2-1),stripts(>=1.2.5-3),tmenu(>=1.08),ffmpeg,id3v2,multienv(>=1.6),tcpping(>=1.1),e2fsprogs,wireless-tools(>=29-1),dbupdate,recmon(>=2.0.7),hwctl Depends: tcpfix,webif-channelicons(>=1.1.24),lighttpd(>=1.4.39-1),jim(>=0.76-2),jim-oo,jim-sqlite3(>=0.76),jim-cgi(>=0.7-1),jim-binary(>=0.76),service-control(>=2.1),busybox(>=1.20.2-1),lsof(>=4.87),epg(>=1.2.3),hmt(>=2.0.10),ssmtp,cron-daemon(>=1.18.3-3),at(>=3.1.18),anacron,trm(>=1.1),openssl-command,nicesplice,id3v2,file,rsvsync(>=1.1.3),webif-charts(>=1.2-1),stripts(>=1.2.5-3),tmenu(>=1.08),ffmpeg,id3v2,multienv(>=1.6),tcpping(>=1.1),e2fsprogs,wireless-tools(>=29-1),dbupdate,recmon(>=2.0.7),hwctl

View File

@ -303,6 +303,13 @@ rsv method cleanvars {} {
rsv method insert {{table pending} {force 0} {defer 0}} { rsv method insert {{table pending} {force 0} {defer 0}} {
global rsvdb global rsvdb
# In-progress check
set now [clock seconds]
if {$nsttime <= $now && [expr $nsttime + $nduration] >= $now} {
throw 20 "Event already in progress."
return
}
# Duplicate check - all tables # Duplicate check - all tables
if {!$force && $szCRID ne "" && $action == 0} { if {!$force && $szCRID ne "" && $action == 0} {
foreach tab {pending TBL_RESERVATION} { foreach tab {pending TBL_RESERVATION} {