diff --git a/ng/dialog.tcl b/ng/dialog.tcl index 4e9fc913..8a7be16e 100644 --- a/ng/dialog.tcl +++ b/ng/dialog.tcl @@ -1602,7 +1602,7 @@ proc clippingdialog { } { -validatecommand "my_validatespinbox %W %P 0" \ -invalidcommand "my_invalidspinbox %W" - ttk::label $w.donotclipdomainlabel -text "Clip only domain" + ttk::label $w.donotclipdomainlabel -text "Do not clip domain" ttk::spinbox $w.donotclipdomainspinb -from 0 -to 500 -increment 1 -width 3 \ -textvariable viewoptions.clipping.notdomain -validate focus \ -command "clipplanecommand" \ diff --git a/ng/menustat.tcl b/ng/menustat.tcl index 4c5a8dd5..b51cf1db 100644 --- a/ng/menustat.tcl +++ b/ng/menustat.tcl @@ -942,7 +942,7 @@ ttk::frame .statbar -relief flat # -bd 2 pack .statbar -side bottom -fill x -ttk::label .statbar.ptslabel -text "Points: " +ttk::label .statbar.ptslabel -text " Points: " ttk::label .statbar.ptsval -textvariable status_np ttk::label .statbar.elslabel -text " Elements: " ttk::label .statbar.elsval -textvariable status_ne