From 5853f9ae585dfe47974358e1d6b9a394284000bf Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?=
 <zmoelnig@users.sourceforge.net>
Date: Wed, 28 Jan 2009 18:57:42 +0000
Subject: avoid double triggering

svn path=/trunk/externals/iem/iemguts/; revision=10668
---
 src/canvasdelete.c | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'src')

diff --git a/src/canvasdelete.c b/src/canvasdelete.c
index f8b38c0..62a9bf6 100644
--- a/src/canvasdelete.c
+++ b/src/canvasdelete.c
@@ -51,6 +51,11 @@ static void canvasdelete_bang(t_canvasdelete *x)
   int x1=0, y1=0, width=0, height=0;
   t_atom alist[2];
 
+  if(x->x_clock) {
+    pd_error(x, "deletion already scheduled");
+    return;
+  }
+
   if(NULL==x->x_glist || NULL==x->x_gobj)return;
 
   x->x_clock=clock_new(x, (t_method)canvasdelete_doit);
-- 
cgit v1.2.1