From 6cd74547b67c97ea22ff2a8a4f391c05e9fda2d0 Mon Sep 17 00:00:00 2001
From: Walter Bender <walter.bender@gmail.com>
Date: Wed, 25 Jul 2012 20:26:55 +0000
Subject: don't clone storein blocks

---
diff --git a/TurtleArt/tablock.py b/TurtleArt/tablock.py
index dd19d68..53c3e5c 100644
--- a/TurtleArt/tablock.py
+++ b/TurtleArt/tablock.py
@@ -244,7 +244,9 @@ class Block:
             return False
         if self.name in block_styles['box-style']:
             return False
-        if self.name in ['box', 'sandwichtop', 'sandwichtop_no_label']:
+        if self.name in ['storein', 'box',
+                         # Deprecated blocks
+                         'sandwichtop', 'sandwichtop_no_label']:
             return False
         return True
 
--
cgit v0.9.1