From 238b835330194b7c7f2e44e82ef93042d8404724 Mon Sep 17 00:00:00 2001 From: Jon Doe Date: Fri, 25 Sep 2020 21:26:58 +0200 Subject: [PATCH] add this --- stolen-treasure.tcl | 1 + 1 file changed, 1 insertion(+) diff --git a/stolen-treasure.tcl b/stolen-treasure.tcl index 665595f..0a5f5ad 100644 --- a/stolen-treasure.tcl +++ b/stolen-treasure.tcl @@ -11116,3 +11116,4 @@ proc addgoon str {lappend ::goon_dict $str; return ""} proc okeyloot {} {return "The [color blue]Okeys[color] left a chest! You open the chest. Inside was [articleize [choose [blackitem] [mroach_item] [ww_item] [faglame] [rumored_apple_product] [cooking_appliance] [sexpart] [food_word] [drink] [weapon] [niggerword] [name] [al_man_word] [ethnic_group] [sex_fluid] [drug_word] [marginalize] [shsc_word] [animal_word] [furry_noun] [dndname] [undesirables]]]!"} proc liberalagenda:event {} { subst [lindex_random $::liberalagenda] } proc classism {} {. [british_person] would never be caught dead eating [food_word] at 5 PM} +proc yield args { uplevel 2 [list apply [list let [uplevel block]] $args] }