From cbf23a55067bbe8864cca33873b1fbf30aa6cbce Mon Sep 17 00:00:00 2001
From: Walter Bender <walter.bender@gmail.com>
Date: Sat, 21 Jul 2012 12:57:48 +0000
Subject: Update labels on named boxes when running in debug mode

---
(limited to 'TurtleArt/tabasics.py')

diff --git a/TurtleArt/tabasics.py b/TurtleArt/tabasics.py
index 84363c4..59d482b 100644
--- a/TurtleArt/tabasics.py
+++ b/TurtleArt/tabasics.py
@@ -927,6 +927,7 @@ variable'))
                           prim_name='box',
                           default=_('my box'),
                           logo_command='box',
+                          value_block=True,
                           help_string=_('named variable (numeric value)'))
         self.tw.lc.def_prim('box', 1,
                              lambda self, x: primitive_dictionary['box'](x))
@@ -1087,10 +1088,11 @@ variable'))
                 if int(float(x)) == x:
                     x = int(x)
             self.tw.lc.boxes[name + str(x)] = val
+            self.tw.lc.update_label_value('box', val, label=x)
             return
-
-        self.tw.lc.boxes[name] = val
-        self.tw.lc.update_label_value(name, val)
+        else:
+            self.tw.lc.boxes[name] = val
+            self.tw.lc.update_label_value(name, val)            
 
     def _prim_stack(self, x):
         """ Process a named stack """
--
cgit v0.9.1