wrath/shaniqua-smeggdrop
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

bad idea

Browse Source
This commit is contained in:
Jon Doe 2020-09-27 17:21:12 +02:00 committed by Maciej Bonin
parent e9f5f14d0b
commit f443977a35
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
stolen-treasure.tcl
View File

@ -138,7 +138,6 @@ proc steveburger {} {. Someone should make a burger filled with real shit instea
proc swingler_todo {} {. [subst [join [string repeat {[swingler_list_item] } 5] \n]]} proc swingler_todo {} {. [subst [join [string repeat {[swingler_list_item] } 5] \n]]}
proc anagrams_for word {lines [string map {<br> {}} [string trim [lindex [regexp -inline {:\n</b><br>(.*?)<!--} [~http://wordsmith.org/anagram/anagram.cgi?[? anagram $word t 1000 a n]]] end]]]} proc anagrams_for word {lines [string map {<br> {}} [string trim [lindex [regexp -inline {:\n</b><br>(.*?)<!--} [~http://wordsmith.org/anagram/anagram.cgi?[? anagram $word t 1000 a n]]] end]]]}
proc feminism {} {return "yo gurl what kinda feminism u into? i'm all about about the [oxfordjoin [concat [lrange $::feminisms 0 end-1] [list "don't forget the [lindex $::feminisms end] too!"]]]"} proc feminism {} {return "yo gurl what kinda feminism u into? i'm all about about the [oxfordjoin [concat [lrange $::feminisms 0 end-1] [list "don't forget the [lindex $::feminisms end] too!"]]]"}
proc chanlist args { cache::get irc chanlist }
proc v%chanlist {c {flags {}}} { proc v%chanlist {c {flags {}}} {
global botnick global botnick
lsearch -not -all -inline -regexp [subst "\[[concat chanlist ${c} ${flags}]\]"] "(?iq)${botnick}" lsearch -not -all -inline -regexp [subst "\[[concat chanlist ${c} ${flags}]\]"] "(?iq)${botnick}"