mirror of
https://github.com/NGSolve/netgen.git
synced 2025-04-12 16:17:29 +05:00
remove tcl debug output
This commit is contained in:
parent
0db3dc8c54
commit
beed19330f
@ -15,7 +15,6 @@ set oldmousey 0
|
|||||||
# puts "no OpenGL"
|
# puts "no OpenGL"
|
||||||
# } {
|
# } {
|
||||||
|
|
||||||
puts "********* query toglversion *******"
|
|
||||||
set toglversion [Ng_GetToglVersion]
|
set toglversion [Ng_GetToglVersion]
|
||||||
puts "togl-version : $toglversion"
|
puts "togl-version : $toglversion"
|
||||||
|
|
||||||
@ -39,7 +38,6 @@ if { [Ng_GetToglVersion] == 2 } {
|
|||||||
}
|
}
|
||||||
|
|
||||||
if { $toglok == 1} {
|
if { $toglok == 1} {
|
||||||
puts "***** togl is ok ********"
|
|
||||||
|
|
||||||
#
|
#
|
||||||
pack .ndraw -expand true -fill both -padx 10 -pady 10
|
pack .ndraw -expand true -fill both -padx 10 -pady 10
|
||||||
|
@ -912,7 +912,6 @@ pack .bubar.center .bubar.zoomall -side right
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
puts "bubar selviewmenu"
|
|
||||||
menu .bubar.selviewmenu
|
menu .bubar.selviewmenu
|
||||||
ttk::menubutton .bubar.selview1 -menu .bubar.selviewmenu -text "Geometry"
|
ttk::menubutton .bubar.selview1 -menu .bubar.selviewmenu -text "Geometry"
|
||||||
foreach viewv $viewvals {
|
foreach viewv $viewvals {
|
||||||
|
Loading…
x
Reference in New Issue
Block a user