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} {