ForkMaster/netgen
1
0
Fork 0
mirror of https://github.com/NGSolve/netgen.git synced 2024-12-27 06:10:34 +05:00
Code Issues Packages Projects Releases Wiki Activity

[tcl/tk] Fix surface mesh size dialog

Browse Source
This commit is contained in:
Matthias Hochsteger 2018-10-30 10:47:30 +01:00
parent d67d6bd723
commit 81a577031e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ng/dialog.tcl
View File

@ -2009,7 +2009,7 @@ proc surfacemeshsizedialog { } {
frame $w.face -borderwidth 3 frame $w.face -borderwidth 3
pack $w.face -fill x -padx 5 pack $w.face -fill x -padx 5
ttk::label $w.face.lab -text "face index:" ttk::label $w.face.lab -text "face index:"
ttk::label $w.face.ent -text 1 -padx 4 ttk::label $w.face.ent -text 1
ttk::button $w.face.next -text "next" -command { ttk::button $w.face.next -text "next" -command {
set w .surfacemeshsize_dlg; set w .surfacemeshsize_dlg;
set facenr [$w.face.ent cget -text] set facenr [$w.face.ent cget -text]