Evaluated proc t+agenda {who args} { set w [string tolower $who]; if {[info exists ::agenda($w)] != 1} {set ::agenda($who) {}}; set ::agenda($who) [uniq [lappend ::agenda($who) [args]]]; . Added $args to $who}
This commit is contained in:
parent
11229e5c17
commit
b955c7a57d
@ -3,6 +3,7 @@ NASA_GRADE_ENCRYPTION 1fccf5ef813a75a09b00b9e2e2bd2a72a162fa6d
|
|||||||
NASA_GRADE_ENCRYPTION' facc3d7d8888cd922098694ce61fda1e33c879b8
|
NASA_GRADE_ENCRYPTION' facc3d7d8888cd922098694ce61fda1e33c879b8
|
||||||
_incogagenda:event_old 6620f95d7dde25913cb3b010cb101bf3db16f371
|
_incogagenda:event_old 6620f95d7dde25913cb3b010cb101bf3db16f371
|
||||||
fart' f82f87b4bb1f1de348aea420ff40c4697f8cc41f
|
fart' f82f87b4bb1f1de348aea420ff40c4697f8cc41f
|
||||||
|
t+agenda d4e6465d2349a1dae8720f217433fc0e71c3bd0f
|
||||||
test234535 2d931b665420e63cb8ef8b9ce33f1e0ff66c109a
|
test234535 2d931b665420e63cb8ef8b9ce33f1e0ff66c109a
|
||||||
testo444 b97b92d30ce8f6c872670f177fa384e61df3b004
|
testo444 b97b92d30ce8f6c872670f177fa384e61df3b004
|
||||||
testo4444 5a40678c150205d31ffbd01d683d1508fdb8bbd5
|
testo4444 5a40678c150205d31ffbd01d683d1508fdb8bbd5
|
||||||
|
1
procs/d4e6465d2349a1dae8720f217433fc0e71c3bd0f
Normal file
1
procs/d4e6465d2349a1dae8720f217433fc0e71c3bd0f
Normal file
@ -0,0 +1 @@
|
|||||||
|
{who args} { set w [string tolower $who]; if {[info exists ::agenda($w)] != 1} {set ::agenda($who) {}}; set ::agenda($who) [uniq [lappend ::agenda($who) [args]]]; . Added $args to $who}
|
Loading…
x
Reference in New Issue
Block a user