From 2cf20fd24d3c1f605e29ef1a2a2c64a3dd669cc4 Mon Sep 17 00:00:00 2001
From: Jon Doe <john@bugmenot.com>
Date: Fri, 25 Sep 2020 21:15:38 +0200
Subject: [PATCH] try to fix this

---
 stolen-treasure.tcl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/stolen-treasure.tcl b/stolen-treasure.tcl
index 9b6b317..a113c6f 100644
--- a/stolen-treasure.tcl
+++ b/stolen-treasure.tcl
@@ -6228,7 +6228,11 @@ proc inspect args {
 	if {[llength [info commands [escape_glob $proc]]] == 1} {
 		src $proc
 	} elseif {[llength $procs] == 0} {
+		if [llength [set handler [apply unknown:handler_for $args]]] {
+		  src [lindex $handler 0]
+		} else {
 		  error "\"$proc\" isn't a procedure"
+		}
 	} elseif {[llength $procs] == 1} {
 		src [first $procs]
 	} else {