From 3d13d6cc5c2a53ccb1bc9647d4245f85e18caf2c Mon Sep 17 00:00:00 2001
From: radical_honesty on #flashsupport <radical_honesty@IRC-Simple>
Date: Tue, 27 Dec 2022 15:18:01 -0800
Subject: [PATCH] Evaluated proc WORDOFGOD {{when "8 hours ago"}} {set ret "";
 foreach {a b c d e} [split [n_r_r [clock scan $when]] {}] {lappend ret
 [lindex $::english_words [expr [scan "$a$b$c$d$e" %x] % [llength
 $::english_words]]]}; return $ret}

---
 procs/d8a3c1513a7b4e5edf7a3cc4bd3e3e898f6b502e | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/procs/d8a3c1513a7b4e5edf7a3cc4bd3e3e898f6b502e b/procs/d8a3c1513a7b4e5edf7a3cc4bd3e3e898f6b502e
index 668d7f2..eebb22c 100644
--- a/procs/d8a3c1513a7b4e5edf7a3cc4bd3e3e898f6b502e
+++ b/procs/d8a3c1513a7b4e5edf7a3cc4bd3e3e898f6b502e
@@ -1 +1 @@
-{{when {8 hours ago}}} {set ret "";foreach {a b c d e} [split [n_r_r [clock scan "8 hours ago"]] {}] {lappend ret [lindex $::english_words [expr [scan "$a$b$c$d$e$f" %x] % [llength $::english_words]]]}; return $ret}
+{{when {8 hours ago}}} {set ret ""; foreach {a b c d e} [split [n_r_r [clock scan $when]] {}] {lappend ret [lindex $::english_words [expr [scan "$a$b$c$d$e" %x] % [llength $::english_words]]]}; return $ret}