Add files via upload

menu.tcl

@@ -68,7 +68,7 @@ namespace eval menu {
 		$m2 add separator
 		$m2 add command -label Options -command { ::radxide::menu::edit::setup } 
 		set m3 [menu $m.help -tearoff 0]
-		$m3 add command -label About -command { tk_messageBox -title $dan(TITLE) -icon info -message "\n\nRADXIDE ver 1.2.4\n\n\nMIT Licence.\n\n\nCopyright (c) 5 Mode\n\nThis software is provided AS-IS.\n\nAuthors:\n2023-2024 RADXIDE, Daniele Bonini\n2021-2023 Alited, Alex Plotnikov\n2019-2021 Tcler's Wiki\n\nhttps://5mode.com\n\n\n"}
+		$m3 add command -label About -command { tk_messageBox -title $dan(TITLE) -icon info -message "\n\nRADXIDE ver 1.2.5\n\n\nMIT Licence.\n\n\nCopyright (c) 5 Mode\n\nThis software is provided AS-IS.\n\nAuthors:\n2023-2024 RADXIDE, Daniele Bonini\n2021-2023 Alited, Alex Plotnikov\n2019-2021 Tcler's Wiki\n\nhttps://5mode.com\n\n\n"}
     return $m
 	}
 

radxide.tcl

@@ -28,7 +28,7 @@
 #
 ###########################################################
 
-package provide radxide 1.2.4
+package provide radxide 1.2.5
 
 set _ [package require Tk]
 wm withdraw .

tree.tcl

@@ -659,11 +659,13 @@ namespace eval tree {
 	    
 	    set project(CUR_FILE_PATH) $fname
 	    
+	    focus $dan(TEXT)
+	    ::tk::TextSetCursor $dan(TEXT) @0,0
+	    
 	    ::radxide::main::updateAppTitle
 	    		  
 		  # after idle {alited::bar::BAR draw; alited::tree::UpdateFileTree}
 		}
-
 	}