From 0170789bbff3e9bdb30fadd1981ca4e6cd39f349 Mon Sep 17 00:00:00 2001
From: Matthias Hochsteger <mhochsteger@cerbsim.com>
Date: Thu, 6 Oct 2022 15:10:11 +0200
Subject: [PATCH] fix spaces function names

---
 ng/ngvisual.tcl | 2 +-
 ng/onetcl.cpp   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/ng/ngvisual.tcl b/ng/ngvisual.tcl
index 99441f57..7da7eca6 100644
--- a/ng/ngvisual.tcl
+++ b/ng/ngvisual.tcl
@@ -1480,7 +1480,7 @@ proc visual_dialog { } {
         global visoptions.scalfunction
         foreach { name textval } $scalentries {
             $f.m add command -label "$textval" -command \
-                "$f.b configure -text \"$textval\" ; set visoptions.scalfunction $name ; Ng_Vis_Set parameters ; redraw ; "
+                "$f.b configure -text \"$textval\" ; set visoptions.scalfunction \"$name\" ; Ng_Vis_Set parameters ; redraw ; "
         }
         
         pack $f.b $f.l -side right
diff --git a/ng/onetcl.cpp b/ng/onetcl.cpp
index 4b999a6f..d25549e4 100644
--- a/ng/onetcl.cpp
+++ b/ng/onetcl.cpp
@@ -5325,7 +5325,7 @@ DLL_HEADER const char * ngscript[] = {""
 ,"global visoptions.scalfunction\n"
 ,"foreach { name textval } $scalentries {\n"
 ,"$f.m add command -label \"$textval\" -command \\\n"
-,"\"$f.b configure -text \\\"$textval\\\" ; set visoptions.scalfunction $name ; Ng_Vis_Set parameters ; redraw ; \"\n"
+,"\"$f.b configure -text \\\"$textval\\\" ; set visoptions.scalfunction \\\"$name\\\" ; Ng_Vis_Set parameters ; redraw ; \"\n"
 ,"}\n"
 ,"pack $f.b $f.l -side right\n"
 ,"foreach { name textval } $scalentries {\n"