From a1ec9f35b48fe28370c5f7b16d5dc8a450ba24a0 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Tue, 16 Aug 2011 18:39:28 +0000
Subject: bind only to PatchWindow class since that's the only windows that
 show cords

svn path=/trunk/scripts/guiplugins/simple_examples/; revision=15222
---
 cordarrows-plugin.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cordarrows-plugin.tcl b/cordarrows-plugin.tcl
index abf71ef..1c35a6d 100644
--- a/cordarrows-plugin.tcl
+++ b/cordarrows-plugin.tcl
@@ -13,4 +13,4 @@ proc add_arrows_to_cords {mytoplevel} {
 }
 
 
-bind all <<EditMode>> {+add_arrows_to_cords %W}
+bind PatchWindow <<EditMode>> {+add_arrows_to_cords %W}
-- 
cgit v1.2.1