~steering/at-eggdrop-scripts.git/remind.tcl, branch main
fireonlive's eggdrop scripts for ArchiveTeam
https://cgit.space/~steering/at-eggdrop-scripts.git/atom/remind.tcl?h=main
2026-06-06T19:10:09Z
Fix remind-to-tell, pretend the tell came from the bot
2026-06-06T19:10:09Z
steering7253
2026-06-06T19:10:09Z
urn:sha1:972409448864b49d57615e90c3db1680ef903a6f
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
###################################
remind - error out if any of the fields are empty, not just the first
2026-01-18T13:31:10Z
steering7253
2026-01-18T13:31:10Z
urn:sha1:cc25693c227b701865245ba32e4bff1f5da3e931
convert reminder to tell if theyre gone
2025-11-27T00:10:21Z
steering7253
2025-11-27T00:10:21Z
urn:sha1:28a28fb1ea412b2a3bb95c1e96b9d3d81eff176a
space2tab
2025-11-26T23:05:37Z
steering7253
2025-11-26T23:05:37Z
urn:sha1:260aab1fd3a5c70f5b6085946978681dc2ed347e
init
2024-10-23T06:39:49Z
fireonlive
2024-08-09T19:04:10Z
urn:sha1:985dcb2901d2527b79976df787035425294200b9