anchor.diff:                       (:li "Synopsis: " (ospm:synopsis package))
                        (when (typep package 'ospm:guix-package)
                          (:li "Description: " (ospm:description package)))))))))))
  +
  +(define-command-global describe-os-package (&key (packages (prompt
  +                                                            :sources '(os-package-source)
  +                                                            :prompt "Describe OS package(s)")))
  +  "Show description of PACKAGES."
  +  (set-current-buffer
  +   (buffer-load (nyxt-url 'describe-os-package
  +                          :packages (nyxt::ensure-inspected-id (alex:ensure-list packages)))
  +                :buffer (ensure-internal-page-buffer 'describe-os-package))))
   
   (defun viewable-file-type-p (path)
     (let ((path-suffix (string-downcase (uiop:native-namestring path))))
  
positive.code:                 (:li "Total size: " (sera:format-file-size-human-readable
                                       nil
                                       (reduce #'+ (mapcar #'ospm:size outputs)))))))))
      (let ((packages (inspected-value package-list-id)))
        (spinneret:with-html-string
          (:style (style buffer))
          (:h1 "Packages")
          (:ul (dolist (package packages)
                 (:li (ospm:name package) " " (ospm:version package)
  
negative.code:                (:button :onclick (ps:ps (nyxt/ps:lisp-eval
                                           (:title "describe-os-package")
                                           (describe-os-package
                                            :packages
                                            (ospm:find-os-packages input))))
                          input))))
           (format-outputs (outputs)
  