allow adding (with shift-q) other elements while edit property dialog open
This commit is contained in:
parent
9570439e16
commit
2aed232e04
|
|
@ -1443,6 +1443,9 @@ int callback(int event, int mx, int my, KeySym key,
|
||||||
else if(semaphore >= 2) { /* button1 click to select another instance while edit prop dialog open */
|
else if(semaphore >= 2) { /* button1 click to select another instance while edit prop dialog open */
|
||||||
if(button==Button1 && state==0 && tclgetvar("edit_symbol_prop_new_sel")[0]) {
|
if(button==Button1 && state==0 && tclgetvar("edit_symbol_prop_new_sel")[0]) {
|
||||||
tcleval("set edit_symbol_prop_new_sel 1; .dialog.f1.b1 invoke"); /* invoke 'OK' of edit prop dialog */
|
tcleval("set edit_symbol_prop_new_sel 1; .dialog.f1.b1 invoke"); /* invoke 'OK' of edit prop dialog */
|
||||||
|
} else if(button==Button1 && (state & ShiftMask) && tclgetvar("edit_symbol_prop_new_sel")[0]) {
|
||||||
|
select_object(mousex, mousey, SELECTED, 0);
|
||||||
|
rebuild_selected_array();
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue