mirror of
https://github.com/NGSolve/netgen.git
synced 2024-11-11 16:49:16 +05:00
move face mesh size to geometry menu
This commit is contained in:
parent
73f272f80c
commit
2bb63aab47
@ -418,11 +418,6 @@ menu .ngmenu.mesh
|
||||
.ngmenu.mesh add command -label "Meshing Options..." \
|
||||
-command meshingoptionsdialog
|
||||
|
||||
# Philippose - 30/01/2009
|
||||
# Add menu item for local face mesh size definition in the
|
||||
# TCL Gui
|
||||
.ngmenu.mesh add command -label "Edit Face Mesh Size..." \
|
||||
-command { surfacemeshsizedialog }
|
||||
|
||||
.ngmenu.mesh add separator
|
||||
|
||||
@ -567,6 +562,11 @@ menu .ngmenu.geometry
|
||||
.ngmenu.geometry add command -label "IGES/STEP Topology Explorer/Doctor..." \
|
||||
-command { occdialog; }
|
||||
|
||||
# Philippose - 30/01/2009
|
||||
# Add menu item for local face mesh size definition in the
|
||||
# TCL Gui
|
||||
.ngmenu.geometry add command -label "Edit Face Mesh Size..." \
|
||||
-command { surfacemeshsizedialog }
|
||||
|
||||
.ngmenu.geometry add command -label "OCC Construction" \
|
||||
-command { Ng_OCCConstruction; }
|
||||
|
@ -1455,6 +1455,8 @@ namespace netgen
|
||||
Tcl_Interp * interp,
|
||||
int argc, tcl_const char *argv[])
|
||||
{
|
||||
#ifdef OCCGEOMETRY
|
||||
|
||||
static char buf[100];
|
||||
|
||||
if (argc < 2)
|
||||
@ -1537,6 +1539,12 @@ namespace netgen
|
||||
Tcl_SetResult (interp, buf, TCL_STATIC);
|
||||
}
|
||||
return TCL_OK;
|
||||
#else
|
||||
|
||||
Tcl_SetResult (interp, (char *)"Ng_SurfaceMeshSize currently supports only OCC (STEP/IGES) Files", TCL_STATIC);
|
||||
return TCL_ERROR;
|
||||
|
||||
#endif
|
||||
}
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user