| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| |
Also maybe fix loading remind.tcl on startup or something i dunno
diff --git a/remind.tcl b/remind.tcl
index d6a4699..fe1d774 100644
--- a/remind.tcl
+++ b/remind.tcl
@@ -85,8 +85,9 @@ proc printReminder {reminderId {tonick ""} {fire "false"}} {
putserv "PRIVMSG $chan :\[remind\] $who: $what"
} else {
putserv "PRIVMSG $chan :!tell $who \[remind\] $what"
+ putlog "PRIVMSG $chan :!tell $who \[remind\] $what"
#tell {nick uhost hand chan text}
- tell $who "" "" $chan "$who \[remind\] $what"
+ tell $::nick "" "" $chan "$who \[remind\] $what"
}
} else {
putserv "NOTICE $tonick :\[remind\] $reminderId: for $who at $when: $what"
@@ -290,7 +291,7 @@ proc pub:inspectReminders {nick host handle chan text} {
putserv "NOTICE $nick :Timers: $timerString"
}
-proc initReminders {} {
+proc initReminders {type} {
global reminders
set reminderString [array get reminders]
@@ -327,7 +328,7 @@ if {$content == ""} {
array set reminders $content
-initReminders
+bind evnt - "loaded" initReminders
###################################
|