anchor.diff:        (parse-args '((:metric . boolean)
                       (:set . boolean)
                       (:fucking . boolean)
  -                    (:doge . boolean))
  +                    (:doge . boolean)
  +                    (:ishappening . boolean))
                     raw-args)
       (values
        (getf opts :metric)
        (getf opts :set)
        (getf opts :fucking)
        (getf opts :doge)
  +     (getf opts :ishappening)
        (cond
          (args
           (join-to-string " " args))
  
positive.code:                                  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 icon humidity wind-dir dewpoint-f
                           pressure-in wind-mph
                           wind-gust-mph dewpoint-c heat-index-c
                           windchill-c pressure-mb wind-kph
  
negative.code:                          low-c))
  
          (save-weather-config (data-path "weather-throttle.lisp"))
  
          (let* ((temp-c (read-from-string temp-c)))
            (reply-to message "~a... ~a.~:{ ~a.~}~a"
  