Added the "Open Recent" menu.

The "recentlyEditedFolders" option in the configuration file contains a list of recently opened directories.
The procedures for working with this list have also been added.

lib/editor.tcl

@@ -580,6 +580,8 @@ namespace eval Editor {
         if { [set height [llength $findedVars]] > 10 } { set height 10 }
         $win.lBox configure -height $height
 
+        focus $win.lBox
+        
         bind $win <Escape> {
             destroy $Editor::win
             focus -force $Editor::txt.t
@@ -590,7 +592,7 @@ namespace eval Editor {
             focus -force $Editor::txt.t
             break
         }
-        bind VarHelperBind <Control-Return> {
+        bind $win <Control-Return> {
             $Editor::txt delete "insert - 1 chars wordstart" "insert wordend - 1 chars"
             $Editor::txt insert "insert" [.varhelper.lBox get [.varhelper.lBox curselection]]
             # eval [bind VarHelperBind <Escape>]
@@ -617,7 +619,7 @@ namespace eval Editor {
             set y [expr $y - $winGeomY]
         }
 
-        wm geom $win +$x+$y
+        wm geom $win +$x+$y 
     }
     
     proc ReleaseKey {k txt fileType} {