anchor.diff:  (defparameter *default-host-list*
     (make-instance 'hostlist
                    :url "https://raw.githubusercontent.com/StevenBlack/hosts/master/hosts"
  -                 :path (xdg-data-home "hostlist-stevenblack")))
  +                 :path "hostlist-stevenblack"))
   
   (define-mode blocker-mode ()
       "Enable blocking of blacklisted hosts."
  
positive.code:                     :initform (* 60 60 24)
                      :documentation "If URL is provided, update the list after
  this amount of seconds.")))
  
  @export
  (defun make-hostlist (&rest args)
  
negative.code:    (path :accessor path :initarg :path
           :initform nil
           :documentation "Where to find the list locally.
  If nil, the list won't be persisted.
  If path is relative, it will be set to (xdg-data-home path).")
     (hosts :accessor hosts :initarg :hosts
            :initform '()
            :documentation "The list of domain name.")
  