Merge branch 'master' into SuperChayan
This commit is contained in:
commit
b9b84727fe
|
|
@ -4837,7 +4837,7 @@ proc get_list_of_dirs_with_symbols {{paths {}} {levels -1} {ext {\.(sch|sym)$}}
|
||||||
|
|
||||||
#### Display preview of selected symbol and start sym placement
|
#### Display preview of selected symbol and start sym placement
|
||||||
proc insert_symbol_preview {} {
|
proc insert_symbol_preview {} {
|
||||||
puts "insert_symbol_preview"
|
# puts "insert_symbol_preview"
|
||||||
global insert_symbol
|
global insert_symbol
|
||||||
xschem preview_window close .ins.center.right {}
|
xschem preview_window close .ins.center.right {}
|
||||||
.ins.center.right configure -bg white
|
.ins.center.right configure -bg white
|
||||||
|
|
@ -4886,7 +4886,7 @@ proc insert_symbol_filelist {paths {maxdepth -1}} {
|
||||||
set insert_symbol(dirindex) $paths
|
set insert_symbol(dirindex) $paths
|
||||||
# puts "set dirindex=$paths"
|
# puts "set dirindex=$paths"
|
||||||
set paths [lindex $insert_symbol(dirs) $paths]
|
set paths [lindex $insert_symbol(dirs) $paths]
|
||||||
puts "insert_symbol_filelist: paths=$paths"
|
# puts "insert_symbol_filelist: paths=$paths"
|
||||||
|
|
||||||
.ins.top2.dir_e configure -state normal
|
.ins.top2.dir_e configure -state normal
|
||||||
.ins.top2.dir_e delete 0 end
|
.ins.top2.dir_e delete 0 end
|
||||||
|
|
@ -4911,7 +4911,7 @@ proc insert_symbol_filelist {paths {maxdepth -1}} {
|
||||||
|
|
||||||
set err [catch {regexp $new_symbol_browser_ext $i} type]
|
set err [catch {regexp $new_symbol_browser_ext $i} type]
|
||||||
if {!$err && $type} {
|
if {!$err && $type} {
|
||||||
set fname [rel_sym_path $i $paths]
|
set fname [file tail $i]
|
||||||
lappend filelist $fname
|
lappend filelist $fname
|
||||||
lappend insert_symbol(fullpathlist) $i
|
lappend insert_symbol(fullpathlist) $i
|
||||||
}
|
}
|
||||||
|
|
@ -4937,7 +4937,7 @@ proc insert_symbol_filelist {paths {maxdepth -1}} {
|
||||||
}
|
}
|
||||||
|
|
||||||
proc insert_symbol_place {} {
|
proc insert_symbol_place {} {
|
||||||
puts insert_symbol_place
|
# puts insert_symbol_place
|
||||||
global insert_symbol
|
global insert_symbol
|
||||||
set sel [.ins.center.left.l curselection]
|
set sel [.ins.center.left.l curselection]
|
||||||
if {$sel eq {}} {
|
if {$sel eq {}} {
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue