From fefd2f0f19c36651ace162c5d3913c8dd175d4e8 Mon Sep 17 00:00:00 2001
From: Omar Rizwan <omar@omar.website>
Date: Thu, 15 Jun 2023 01:38:12 -0400
Subject: Show better error info for network-eval error

---
 web.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/web.tcl b/web.tcl
index d8d0a030..d2d79c38 100644
--- a/web.tcl
+++ b/web.tcl
@@ -146,7 +146,7 @@ proc handleWS {chan type msg} {
     } elseif {$type eq "text"} {
         if {[catch {::websocket::send $chan text [eval $msg]} err] == 1} {
             if [catch {
-                puts "$::nodename: Error on receipt: $err"
+                puts stderr "$::nodename: Error on receipt: $err\n$::errorInfo"
                 ::websocket::send $chan text $err
             } err2] { puts "$::nodename: $err2" }
         }
-- 
cgit v1.2.3