diff --git a/pd/src/pd.tk b/pd/src/pd.tk
index 94f826e8f7964c47745953ab856715062cb1be8d..97322d2bf86c853aeb3b878f76a976d1d5b6bf90 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} {