12 lines
340 B
Text
12 lines
340 B
Text
|
Index: tkcron-2.12.tcl
|
||
|
|
--- tkcron-2.12.tcl.orig
|
||
|
|
+++ tkcron-2.12.tcl
|
||
|
|
@@ -281,6 +281,7 @@ proc getEntryFromGadgets {} {
|
||
|
|
|
||
|
|
# Return the crontab string as a list
|
||
|
|
proc parseCrontabFile {str} {
|
||
|
|
+ set result ""
|
||
|
|
set crontablist [split $str \n]
|
||
|
|
set listlength [llength $crontablist]
|
||
|
|
for {set i 0} {$i < $listlength} {incr i 1} {
|