Remove redundant calls
This commit is contained in:
parent
9b8e6763af
commit
5cb9bdd6dd
|
@ -7,7 +7,6 @@ require ts.class
|
||||||
httpheader
|
httpheader
|
||||||
|
|
||||||
set file [cgi_get file]
|
set file [cgi_get file]
|
||||||
set ts [ts fetch $file]
|
|
||||||
if {[set ts [ts fetch $file]] != 0} {
|
if {[set ts [ts fetch $file]] != 0} {
|
||||||
set action enc
|
set action enc
|
||||||
if {[$ts flag "Encrypted"]} { set action unenc }
|
if {[$ts flag "Encrypted"]} { set action unenc }
|
||||||
|
|
|
@ -7,7 +7,6 @@ require ts.class
|
||||||
httpheader
|
httpheader
|
||||||
|
|
||||||
set file [cgi_get file ""]
|
set file [cgi_get file ""]
|
||||||
set ts [ts fetch $file]
|
|
||||||
if {[set ts [ts fetch $file]] != 0} {
|
if {[set ts [ts fetch $file]] != 0} {
|
||||||
set action lock
|
set action lock
|
||||||
if {[$ts flag "Locked"]} { set action unlock }
|
if {[$ts flag "Locked"]} { set action unlock }
|
||||||
|
|
|
@ -7,7 +7,6 @@ require ts.class
|
||||||
httpheader
|
httpheader
|
||||||
|
|
||||||
set file [cgi_get file]
|
set file [cgi_get file]
|
||||||
set ts [ts fetch $file]
|
|
||||||
if {[set ts [ts fetch $file]] != 0} {
|
if {[set ts [ts fetch $file]] != 0} {
|
||||||
set action new
|
set action new
|
||||||
if {[$ts flag "New"]} { set action watched }
|
if {[$ts flag "New"]} { set action watched }
|
||||||
|
|
Loading…
Reference in New Issue