# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1403114566 -10800
# Node ID 28ee3578a6d1ebb6dad732b87d2c2e619202041e
# Parent  92f4a489b7ef6bc9a8205a7f7f3e5b4914b88b34
Weather: Add support for usage messages without default prefix.

diff -r 92f4a489b7ef -r 28ee3578a6d1 weather.tcl
--- a/weather.tcl	Wed Jun 18 20:46:15 2014 +0300
+++ b/weather.tcl	Wed Jun 18 21:02:46 2014 +0300
@@ -102,7 +102,9 @@
   global weather_msg_usage_prefix_1 weather_msg_usage_prefix_2
   set nline 0
   foreach aline [split $amsg "\n"] {
-    if {$nline == 0} {
+    if {[string range $aline 0 1] == ":"} {
+      weather_msg_do $apublic $anick $achan $aline
+    } elseif {$nline == 0} {
       weather_msg_do $apublic $anick $achan "$weather_msg_usage_prefix_1$aline"
     } else {
       weather_msg_do $apublic $anick $achan "$weather_msg_usage_prefix_2$aline"