revert from tclgetboolvar to tclgetvar for edit_symbol_prop_new_sel, …

…as this is not a boolean
StefanSchippers · Oct 3, 2023 · 02086d7 · 02086d7
1 parent 5c7abfa
commit 02086d7
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/callback.c b/src/callback.c
@@ -2727,9 +2727,9 @@ int rstate; /* (reduced state, without ShiftMask) */
      } else if(tcleval("winfo exists .dialog.txt")[0] == '1') { /* proc enter_text */
        tcleval(".dialog.buttons.ok invoke");
        break;
-     } else if(button==Button1 && state==0 && tclgetboolvar("edit_symbol_prop_new_sel")) {
+     } else 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 */
-     } else if(button==Button1 && (state & ShiftMask) && tclgetboolvar("edit_symbol_prop_new_sel")) {
+     } else if(button==Button1 && (state & ShiftMask) && tclgetvar("edit_symbol_prop_new_sel")[0]) {
        select_object(xctx->mousex, xctx->mousey, SELECTED, 0);
        rebuild_selected_array();
      }

diff --git a/src/editprop.c b/src/editprop.c
@@ -1789,7 +1789,7 @@ void edit_property(int x)
  {
   case ELEMENT:
    modified |= edit_symbol_property(x, j);
-   while( x == 0 && tclgetboolvar("edit_symbol_prop_new_sel")) {
+   while( x == 0 && tclgetvar("edit_symbol_prop_new_sel")[0] == '1') {
      unselect_all(1);
      select_object(xctx->mousex, xctx->mousey, SELECTED, 0);
      rebuild_selected_array();