anchor.diff:             (reply-to message "You must supply a location."))
             ((and fuckingp dogep)
              (display-doge-weather module message metricp location
  -                                 '("fucking" "goddamn" "stupid" "wtf" "damned")))
  +                                 '((:a "fucking" "goddamn" "crappy")
  +                                   (:v "crappy" "crap" "fucking" "wtf")
  +                                   (:n "fucking" "goddamn" "crappy" "stupid")
  +                                   (:m "stupid" "wtf" "goddamn" "fucking"))
  +                                 #("omg" "fuck" "crap" "dammit")))
             (fuckingp
              (display-fucking-weather module message metricp location))
             (dogep
              (display-doge-weather module message metricp location
  -                                 '("such" "much" "so" "very" "wow")))
  +                                 '((:a "much" "many" "such")
  +                                   (:v "much" "many" "so" "such" "very")
  +                                   (:n "much" "so" "such" "very")
  +                                   (:m "many" "so" "such" "very"))
  +                                 #("wow" "amaze" "excite")))
             (t
              (display-weather module message metricp location))))))
  
positive.code:                        :if-exists :supersede
                         :if-does-not-exist :create)
      (maphash (lambda (api-key throttle)
                 (write 
                  (list api-key
                        :minute-queries (minute-queries-of throttle)
                        :day-queries (day-queries-of throttle)
  
negative.code:   (setf (locations-of module)
          (load-location-db (data-path "weather-locations.lisp")))
    (load-weather-config (data-path "weather-throttle.lisp"))
  
    (when (null (api-key-of module))
      (log:log-message :warning "WARNING: Missing API key for WEATHER module~%")))
  
  