diff --git a/dev-tcltk/tcllib/files/tcllib-2.0-test.patch b/dev-tcltk/tcllib/files/tcllib-2.0-test.patch
index a811948370cf5..affa1043073b7 100644
--- a/dev-tcltk/tcllib/files/tcllib-2.0-test.patch
+++ b/dev-tcltk/tcllib/files/tcllib-2.0-test.patch
@@ -89,3 +89,23 @@
wsResetHandler
wsResetSleep
wsExpectHandler $expectNum
+--- a/modules/hook/hook.test 2026-03-06 16:11:41.444445375 +0100
++++ b/modules/hook/hook.test 2026-03-06 16:13:38.776027335 +0100
+@@ -450,7 +450,7 @@
+ } -cleanup {
+ cleanup
+ } -result [tcltest::byConstraint {
+- tcl9plus {{{S1
{} O1} {simulated error} {-code 1 -level 0 -errorstack {INNER {returnImm {simulated error} {}} UP 1 CALL {::hook::call S1 }} -errorcode NONE}}}
++ tcl9plus {{{S1 {} O1} {simulated error} {-code 1 -level 0 -errorstack {INNER {error {simulated error}} UP 1 CALL {::hook::call S1 }} -errorcode NONE}}}
+ tcl8.6.10plus {{{S1 {} O1} {simulated error} {-code 1 -level 0 -errorstack {INNER {error {simulated error}} UP 1 CALL {::hook::call S1 }} -errorcode NONE}}}
+ tcl8.6not10 {{{S1 {} O1} {simulated error} {-code 1 -level 0 -errorstack {INNER {error {simulated error}} UP 1 CALL {call S1 }} -errorcode NONE}}}
+ tcl8.5only {{{S1 {} O1} {simulated error} {-code 1 -level 0 -errorcode NONE}}}
+@@ -467,7 +467,7 @@
+ } -cleanup {
+ cleanup
+ } -result [tcltest::byConstraint {
+- tcl9plus {{{S1 O1 {}} {S1 O3 {}}} {{{S1 {} O2} {simulated error} {-code 1 -level 0 -errorstack {INNER {returnImm {simulated error} {}} UP 1 CALL {::hook::call S1 }} -errorcode NONE}}}}
++ tcl9plus {{{S1 O1 {}} {S1 O3 {}}} {{{S1 {} O2} {simulated error} {-code 1 -level 0 -errorstack {INNER {error {simulated error}} UP 1 CALL {::hook::call S1 }} -errorcode NONE}}}}
+ tcl8.6.10plus {{{S1 O1 {}} {S1 O3 {}}} {{{S1 {} O2} {simulated error} {-code 1 -level 0 -errorstack {INNER {error {simulated error}} UP 1 CALL {::hook::call S1 }} -errorcode NONE}}}}
+ tcl8.6not10 {{{S1 O1 {}} {S1 O3 {}}} {{{S1 {} O2} {simulated error} {-code 1 -level 0 -errorstack {INNER {error {simulated error}} UP 1 CALL {call S1 }} -errorcode NONE}}}}
+ tcl8.5only {{{S1 O1 {}} {S1 O3 {}}} {{{S1 {} O2} {simulated error} {-code 1 -level 0 -errorcode NONE}}}}