From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 12 Jun 2012 15:48:10 +0000 (+0100)
Subject: fix respawn error handling
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-tcl-applet.git;a=commitdiff_plain;h=2ad3f13ef50c105ebedbaff56992df7b23c0136c;ds=inline

fix respawn error handling
---

diff --git a/applet.tcl b/applet.tcl
index c3c4c4e..133eb13 100644
--- a/applet.tcl
+++ b/applet.tcl
@@ -338,7 +338,7 @@ proc run-child {} {
 	set ratelimit [lrange $ratelimit 1 end]
     }
     if {[llength $ratelimit] > 10} {
-	debug stderr "crashing repeatedly, quitting $ratelimit"
+	puts stderr "crashing repeatedly, quitting $ratelimit"
 	exit 127
     }