From 617f57d6adeddc1187c2e7d095788c59e66a6cb6 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 11 Apr 2014 17:11:01 +0100
Subject: [PATCH] topicedit: handle bgerror by crashing

---
 topicedit.tcl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/topicedit.tcl b/topicedit.tcl
index cc33c13..43ec29f 100755
--- a/topicedit.tcl
+++ b/topicedit.tcl
@@ -9,6 +9,12 @@ manyset $argv host port nick ident ownfullname channel topicinfo
 
 set done 0
 
+proc bgerror {msg} {
+    global errorInfo errorCode
+    puts stderr "$msg\n$errorCode\n$errorInfo\n"
+    exit 16
+}
+
 proc connected {} {
     global channel
     sendout JOIN $channel
-- 
2.30.2