From 0f85420767b00ce706fd6646ff812b169962ac60 Mon Sep 17 00:00:00 2001
From: Code WvS <code-wvs@quantentunnel.de>
Date: Sat, 28 Mar 2015 09:43:59 +0100
Subject: extend clear block to remove only a sprite's own trails

---
 objects.js | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

(limited to 'objects.js')

diff --git a/objects.js b/objects.js
index cf56086..b48cc6b 100644
--- a/objects.js
+++ b/objects.js
@@ -535,7 +535,7 @@ SpriteMorph.prototype.initBlocks = function () {
         clear: {
             type: 'command',
             category: 'pen',
-            spec: 'clear'
+            spec: 'clear %clearmode'
         },
         down: {
             only: SpriteMorph,
@@ -3106,8 +3106,15 @@ SpriteMorph.prototype.doStamp = function () {
     }
 };
 
-SpriteMorph.prototype.clear = function () {
-    this.parent.clearPenTrails();
+SpriteMorph.prototype.clear = function (mode) {
+    if (mode == 'my pen trails') {
+        window.penTrails.removeLayer(this.penShapes);
+        window.penTrails.removeLayer(this.penLines);
+        this.penShapes = L.layerGroup().addTo(window.penTrails);
+        this.penLines = L.layerGroup().addTo(window.penTrails);
+    } else {
+        this.parent.clearPenTrails();
+    }
 };
 
 // SpriteMorph pen size
-- 
cgit v1.3.1