aboutsummaryrefslogtreecommitdiff
path: root/remind.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'remind.tcl')
-rw-r--r--remind.tcl8
1 files changed, 7 insertions, 1 deletions
diff --git a/remind.tcl b/remind.tcl
index 5593ef9..e27805e 100644
--- a/remind.tcl
+++ b/remind.tcl
@@ -81,7 +81,13 @@ proc printReminder {reminderId {tonick ""} {fire "false"}} {
set what [lindex $reminder 4]
if {$fire} {
- putserv "PRIVMSG $chan :\[remind\] $who: $what"
+ if {[onchan $who $chan]} {
+ putserv "PRIVMSG $chan :\[remind\] $who: $what"
+ } else {
+ putserv "PRIVMSG $chan :!tell $who \[remind\] $what"
+ #tell {nick uhost hand chan text}
+ tell $who "" "" $chan "$who \[remind\] $what"
+ }
} else {
putserv "NOTICE $tonick :\[remind\] $reminderId: for $who at $when: $what"
}