Lines Matching refs:selectPath

257     if {![info exists data(selectPath)]} {
259 	set data(selectPath) [pwd]
284 	    set data(selectPath) [lindex [glob $data(-initialdir)] 0]
286 	    set data(selectPath) [pwd]
292 	cd $data(selectPath)
293 	set data(selectPath) [pwd]
517 	$data(fEnt) insert 0 [::tk::dialog::file::JoinFile $data(selectPath) \
520 	return [list $data(selectPath) $data(filter)]
552             [::tk::dialog::file::JoinFile $data(selectPath) $data(filter)]
554     $data(sEnt) insert 0 [::tk::dialog::file::JoinFile $data(selectPath) \
578     if {[catch {cd $data(selectPath)}]} {
651 	    set newSpec [::tk::dialog::file::JoinFile $data(selectPath) $data(filter)]
654 	    set newSpec [::tk::dialog::file::JoinFile [file dirname $data(selectPath)] \
659 		    $data(selectPath) $subdir] $data(filter)]
693 	    set newDir $data(selectPath)
696 	    set newDir [file dirname $data(selectPath)]
699 	    set newDir [::tk::dialog::file::JoinFile $data(selectPath) $subdir]
703     set data(selectPath) $newDir
741     $data(fEnt) insert 0 [::tk::dialog::file::JoinFile $data(selectPath) \
751 	$data(sEnt) insert 0 [::tk::dialog::file::JoinFile $data(selectPath) \
798     set data(selectPath) [lindex $list 0]
833 	set data(selectPath) [lindex [glob $selectFilePath] 0]
842 	    set item [file join $data(selectPath) $item]
885     set Priv(selectPath)     [file dirname [lindex $newFileList 0]]
906     set Priv(selectPath)     ""