anchor.diff:    "Echo strings without expanding format directives unlike other `echo' commands."
     (let ((text (str:join " " args)))
       (%echo-status text)
  -    (log:info "~s" text)))
  +    (unless (str:emptyp text)
  +      (log:info "~s" text))))
   
   @export
   (defun echo-warning (&rest args)
  
positive.code: Untrusted content should be given as argument with a format string."
    (handler-case
        (let ((text (apply #'format nil args)))
          (%echo-status text)
          (log:info "~s" text))
      (error ()
        (log:warn "Failed to echo these args: ~s~&Possible improvements:
  - pass multiple arguments and use format strings for untrusted content. Don't pre-construct a single string that could contain tildes.
  
negative.code:   (let ((text (apply #'format nil args)))
      (%echo-status text
                    :message `((:b "Warning:") " " ,text))
      (unless (str:emptyp text)
        (log:warn "~a" text))))
  
  @export
  (defmethod echo-dismiss ()
  