anchor.diff:        (multiple-value-bind (city local-time weather icon humidity wind-dir
                                    temp-f dewpoint-f heat-index-f windchill-f
                                    pressure-in wind-mph wind-gust-mph
  -                                 temp-c)
  +                                 temp-c dewpoint-c heat-index-c windchill-c
  +                                 pressure-mb wind-kph wind-gust-kph
  +                                 forecast high-f low-f high-c low-c alerts)
             (retrieve-cached-weather (api-key-of module) location)
  -        (declare (ignore weather humidity wind-dir
  -                         dewpoint-f heat-index-f windchill-f
  -                         pressure-in wind-mph wind-gust-mph))
  +        (declare (ignore weather humidity wind-dir dewpoint-f
  +                         heat-index-f windchill-f pressure-in wind-mph
  +                         wind-gust-mph dewpoint-c heat-index-c
  +                         windchill-c pressure-mb wind-kph
  +                         wind-gust-kph forecast high-f low-f high-c
  +                         low-c))
   
           (save-weather-config (data-path "weather-throttle.lisp"))
           (setf local-time (ppcre:regex-replace "^Last Updated on " local-time ""))
   
           (let* ((temp-c (read-from-string temp-c)))
  -          (reply-to message "~a... ~a.~a"
  +          (reply-to message "~a... ~a.~:{ ~a.~}~a"
                       city
                       (if metricp temp-c temp-f)
  +                    alerts
                       (doge-weather 4 temp-c icon prefix-flavor amaze-flavor))))
       (weather-error (err)
         (save-weather-config (data-path "weather-throttle.lisp"))
  
positive.code:                                  pressure-in wind-mph wind-gust-mph
                                   temp-c dewpoint-c heat-index-c windchill-c
                                   pressure-mb wind-kph wind-gust-kph
                                   forecast high-f low-f high-c low-c)
            (retrieve-cached-weather (api-key-of module) location)
          (declare (ignore icon))
          (save-weather-config (data-path "weather-throttle.lisp"))
  
negative.code:                      (if (string= windchill-f "NA") nil windchill-f)
                       humidity pressure-in
                       wind-dir wind-mph wind-gust-mph)
             (reply-to message "Forecast: ~a, High: ~aF, Low: ~aF" forecast high-f low-f)
             (reply-to message "~:{~a starting ~a~%~}" alerts))))
      (weather-error (err)
        (save-weather-config (data-path "weather-throttle.lisp"))
        (reply-to message "~a: ~a" (source message) (message-of err)))))
  