From 82779d9de0d2001a00ae736107a897cc5ec8f7e0 Mon Sep 17 00:00:00 2001
From: Ivica Ico Bukvic <ico@vt.edu>
Date: Fri, 29 Aug 2014 12:17:18 -0400
Subject: [PATCH] *added check for canvas scroll to make sure window exists
(fixes stderr errors)
---
pd/src/pd.tk | 1 +
1 file changed, 1 insertion(+)
diff --git a/pd/src/pd.tk b/pd/src/pd.tk
index 94f826e8f..97322d2bf 100644
--- a/pd/src/pd.tk
+++ b/pd/src/pd.tk
@@ -4296,6 +4296,7 @@ proc pdtk_find_highest_widget_withtag {canvas name} {
#}
proc pdtk_canvas_getscroll {name} {
+ if {![winfo exists $name]} {return}
set parentname [winfo parent $name]
if {$::scroll($parentname) == 0} {return}
# if {$::editmode($parentname) == 0} {
--
GitLab