ambrevar/ffprobe: Export accessors, set nickname to ffprobe.

.local/share/common-lisp/source/ambrevar/ffprobe.lisp

@@ -1,4 +1,5 @@
 (uiop:define-package ambrevar/ffprobe
+  (:nicknames #:ffprobe)
   (:documentation "FFprobe abstraction.")
   (:use #:common-lisp)
   (:use #:trivia)
@@ -30,7 +31,7 @@
      (attached-pic 0)
      (timed-thumbnails 0))
     (:accessor-name-transformer #'name-identity)
-    (:export-slot-names-p t)
+    (:export-accessor-names-p t)
     (:export-class-name-p t))
 
 (defclass* media-stream ()              ; REVIEW: `stream' is reserved by CL.
@@ -93,7 +94,7 @@
      (side-data-list '())
      (tags '()))
     (:accessor-name-transformer #'name-identity)
-    (:export-slot-names-p t)
+    (:export-accessor-names-p t)
     (:export-class-name-p t))
 
 (defclass* media-format ()              ; REVIEW: `format' is reserved by CL.
@@ -109,7 +110,7 @@
      (probe-score 0)
      (tags '()))
     (:accessor-name-transformer #'name-identity)
-    (:export-slot-names-p t)
+    (:export-accessor-names-p t)
     (:export-class-name-p t))
 
 (defun normalize-cl-json-keywords (sym)