Mercurial > hg > egg-tcls
comparison feeds.tcl @ 526:eb9921ae5c7a
feeds: Add feeds_logmsg setting.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Tue, 07 Jul 2020 14:19:59 +0300 |
parents | 89aaf279c12b |
children | 7512889f7b72 |
comparison
equal
deleted
inserted
replaced
525:a179d0a35d28 | 526:eb9921ae5c7a |
---|---|
42 global feeds_preferredmsg | 42 global feeds_preferredmsg |
43 putserv "$feeds_preferredmsg $uchan :$umsg" | 43 putserv "$feeds_preferredmsg $uchan :$umsg" |
44 } | 44 } |
45 | 45 |
46 proc feeds_log {umsg} { | 46 proc feeds_log {umsg} { |
47 global feeds_name | 47 global feeds_logmsg feeds_name |
48 putlog "$feeds_name: $umsg" | 48 if {$feeds_logmsg != 0} { |
49 putlog "$feeds_name: $umsg" | |
50 } | |
49 } | 51 } |
50 | 52 |
51 proc feeds_msg {utime ufeed uurl utitle} { | 53 proc feeds_msg {utime ufeed uurl utitle} { |
52 global feeds_channels | 54 global feeds_channels |
53 foreach {uchan ufilter} [array get feeds_channels] { | 55 foreach {uchan ufilter} [array get feeds_channels] { |