# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1611735884 -7200
# Node ID 03d3ec856e4d532a36423f61fe6cf2f9769347e9
# Parent  23f2c71fdb9058b60266f0840d47229b7b62a81f
Add @nick@ token to messages.

diff -r 23f2c71fdb90 -r 03d3ec856e4d feeds.tcl
--- a/feeds.tcl	Sun Jan 24 23:13:41 2021 +0200
+++ b/feeds.tcl	Wed Jan 27 10:24:44 2021 +0200
@@ -56,6 +56,7 @@
 proc feeds_smsg {apublic anick achan amsg {aargs {}}} {
   global feeds_preferredmsg feeds_cmd_name
   set amsg [string map [list "@cmd@" $feeds_cmd_name] $amsg]
+  set amsg [string map [list "@nick@" $anick] $amsg]
   utl_msg_args $feeds_preferredmsg $apublic $anick $achan $amsg $aargs
 }
 
diff -r 23f2c71fdb90 -r 03d3ec856e4d quotedb.tcl
--- a/quotedb.tcl	Sun Jan 24 23:13:41 2021 +0200
+++ b/quotedb.tcl	Wed Jan 27 10:24:44 2021 +0200
@@ -60,6 +60,7 @@
 
   # Map constant tokens
   set amsg [string map [list "@cmd@" $acmd] $amsg]
+  set amsg [string map [list "@nick@" $anick] $amsg]
   set amsg [string map [list "@name@" $aname] $amsg]
 
   utl_msg_args $qdb_preferredmsg $apublic $anick $achan $amsg $aargs
diff -r 23f2c71fdb90 -r 03d3ec856e4d weather.tcl
--- a/weather.tcl	Sun Jan 24 23:13:41 2021 +0200
+++ b/weather.tcl	Wed Jan 27 10:24:44 2021 +0200
@@ -52,6 +52,7 @@
 proc weather_smsg {apublic anick achan amsg {aargs {}}} {
   global weather_preferredmsg weather_cmd_name
   set amsg [string map [list "@cmd@" $weather_cmd_name] $amsg]
+  set amsg [string map [list "@nick@" $anick] $amsg]
   utl_msg_args $weather_preferredmsg $apublic $anick $achan $amsg $aargs
 }