Micheus,
Thanks for the additional information. That helps...
Unfortunately finding the right code to fix the problem with "toplevel" isn't as easy as I thought it would be. I have tried several things but can't get it right.
The code which includes "toplevel" is listed below. No hurry in you looking at this, since I probably won't be able to get back to it till next week...
Thanks,
oort
Thanks for the additional information. That helps...
Unfortunately finding the right code to fix the problem with "toplevel" isn't as easy as I thought it would be. I have tried several things but can't get it right.
The code which includes "toplevel" is listed below. No hurry in you looking at this, since I probably won't be able to get back to it till next week...
Thanks,
oort
Quote:%% wings.erl missing stuff added start 2-28-17
new_viewer(St) ->
{Pos,{W,H}} = wings_wm:win_rect(desktop),
Size = {W div 2-40,H div 2-40},
N = free_viewer_num(2),
Active = wings_wm:this(),
Props = wings_wm:get_props(Active),
ToolbarHidden = wings_wm:is_hidden({toolbar,Active}),
Name = {geom,N},
new_viewer(Name, Pos, Size, Props, ToolbarHidden, St).
new_viewer(Name, {X,Y}, Size, Props, ToolbarHidden, St) ->
%% Op = wings:main_loop_noredraw(St),
Title = geom_title(Name),
wings_wm:toplevel(Name, Title, {X,Y,highest}, Size,
[resizable,closable,{anchor,nw},
{toolbar,fun(A, B, C) ->
wings_toolbar:create(A, B, C)
end},
menubar,
%% {properties,Props}],
{properties,Props}]
),
%% Op),
wings_wm:menubar(Name, get(wings_menu_template)),
wings_wmend({menubar,Name}, {current_state,St}),
wings_wmend({toolbar,Name}, {current_state,St}),
wingset_drag_filter(Name),
if
ToolbarHidden -> wings_wm:hide({toolbar,Name});
true -> ok
end,
Name.
%% wings.erl missing stuff added end 2-28-17