anchor.diff:                              ;; TODO: What about having multiple functions?  And what about moving this to modes?
                               :initarg :resource-query-function
                               :initform #'resource-query-default)
  -   (callbacks :accessor callbacks
  -              :initform (make-hash-table :test #'equal))
      (default-new-buffer-url :accessor default-new-buffer-url :initform "https://next.atlas.engineer/start"
                              :documentation "The URL set to a new blank buffer opened by Next.")
      (scroll-distance :accessor scroll-distance :initform 50 :type number
  
positive.code:    (status-buffer-height :accessor status-buffer-height :initform 24
                           :type integer
                           :documentation "The height of the status buffer in pixels.")
     (minibuffer-callbacks :accessor minibuffer-callbacks
                           :initform (make-hash-table :test #'equal))
     (minibuffer-open-height :accessor minibuffer-open-height :initform 256
                             :type integer
                             :documentation "The height of the minibuffer when open.")
  
negative.code:        ;; Display the most recent inactive buffer.
         (first (sort diff #'local-time:timestamp> :key #'last-access))))))
  
  (defun buffer-did-commit-navigation (buffer-id url)
      (let ((buffer (gethash buffer-id (buffers *interface*))))
        (did-commit-navigation buffer url))
  