anchor.diff:    (:documentation "Transform a gopher line to a reasonable HTML representation."))
   
   (export-always 'gopher-render)
  -(defgeneric gopher-render (line &optional mode)
  +(defgeneric gopher-render (line)
     (:documentation "Produce a Gopher page content string/array given LINE.
   Second return value should be the MIME-type of the content."))
   
  
positive.code:          (contents (cl-gopher:get-line-contents line)))
      (values (cl-gopher:content-array contents) mime)))
  
  (defmethod gopher-render ((line cl-gopher:image) &optional (mode (current-mode 'small-web)))
    (declare (ignore mode))
    (render-binary-content line))
  
  (defmethod gopher-render ((line cl-gopher:binary-file) &optional (mode (current-mode 'small-web)))
    (declare (ignore mode))
    (render-binary-content line))
  
  (defmethod gopher-render ((line cl-gopher:binhex-file) &optional (mode (current-mode 'small-web)))
    (declare (ignore mode))
    (render-binary-content line))
  
  (defmethod gopher-render ((line cl-gopher:dos-file) &optional (mode (current-mode 'small-web)))
    (declare (ignore mode))
    (render-binary-content line))
  
  (defmethod gopher-render ((line cl-gopher:uuencoded-file) &optional (mode (current-mode 'small-web)))
    (declare (ignore mode))
    (render-binary-content line))
  
  (defmethod gopher-render ((line cl-gopher:gif) &optional (mode (current-mode 'small-web)))
    (declare (ignore mode))
    (render-binary-content line "image/gif"))
  
  (defmethod gopher-render ((line cl-gopher:png) &optional (mode (current-mode 'small-web)))
    (declare (ignore mode))
    (render-binary-content line "image/png"))
  
  ;; TODO: :display-isolated-p? Gopher's behavior implies inability to embed it
  ;; into pages of the bigger Web, which is exactly what display-isolated means.
  
negative.code:                            :prompt (format nil "Search query for ~a" url)
                             :sources (list (make-instance 'prompter:raw-source))))
                     (buffer-load (cl-gopher:uri-for-gopher-line line) :buffer buffer))
              (with-current-buffer buffer
                  (nyxt/small-web-mode:gopher-render line))))))
  
  ;;; Gemini rendering.
  
  