Mercurial > hg > egg-tcls

changeset 564:f85b5c572292

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
feeds: Add configuration setting feeds_cmd_name.
author Matti Hamalainen <ccr@tnsp.org>
date Thu, 09 Jul 2020 22:07:16 +0300
parents 537df683836c
children cd5dd38466cf
files config.feeds.example feeds.tcl
diffstat 2 files changed, 6 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/config.feeds.example	Thu Jul 09 13:41:46 2020 +0300
+++ b/config.feeds.example	Thu Jul 09 22:07:16 2020 +0300
@@ -26,6 +26,10 @@
 }
 
 
+# Name of the command used for help texts
+set feeds_cmd_name "!feeds"
+
+
 # Initialization proc called only by feeds.tcl
 proc feeds_init { } {
   # Bind commands
--- a/feeds.tcl	Thu Jul 09 13:41:46 2020 +0300
+++ b/feeds.tcl	Thu Jul 09 22:07:16 2020 +0300
@@ -54,8 +54,8 @@
 
 
 proc feeds_smsg {apublic anick achan amsg {aargs {}}} {
-  global feeds_preferredmsg
-  set amsg [string map [list "@cmd@" "!feeds"] $amsg]
+  global feeds_preferredmsg feeds_cmd_name
+  set amsg [string map [list "@cmd@" $feeds_cmd_name] $amsg]
   utl_msg_args $feeds_preferredmsg $apublic $anick $achan $amsg $aargs
 }