fix: Remove unneeded slot accessor name transformers

fix

2 files changed, 0 insertions, 5 deletions

diff --git a/instances.lisp b/instances.lisp
index b765038..d82cb96 100644
--- a/instances.lisp
+++ b/instances.lisp
@@ -11,7 +11,6 @@
   (:export-class-name-p t)
   (:export-slot-names-p t)
   (:export-accessor-names-p t)
-  (:accessor-name-transformer (class*:make-name-transformer name))
   (:documentation "An instances builder for an alternative front-end."))
 
 (export-always 'libredirect-instances-source)
diff --git a/router.lisp b/router.lisp
index dffe3f1..cabbc33 100644
--- a/router.lisp
+++ b/router.lisp
@@ -28,7 +28,6 @@ the router's `route'.")
   (:export-class-name-p t)
   (:export-slot-names-p t)
   (:export-accessor-names-p t)
-  (:accessor-name-transformer (class*:make-name-transformer name))
   (:documentation "Customizable request resource handler for routing."))
 
 (defun maybe-list-of-routers-p (list)
@@ -65,7 +64,6 @@ certain scenarios."))
   (:export-class-name-p t)
   (:export-slot-names-p t)
   (:export-accessor-names-p t)
-  (:accessor-name-transformer (class*:make-name-transformer name))
   (:metaclass user-class)
   (:documentation "General-purpose `router' to determine what to block."))
 
@@ -91,7 +89,6 @@ redirect."))
   (:export-class-name-p t)
   (:export-slot-names-p t)
   (:export-accessor-names-p t)
-  (:accessor-name-transformer (class*:make-name-transformer name))
   (:metaclass user-class)
   (:documentation "General-purpose redirect `router'."))
 
@@ -106,7 +103,6 @@ the current URL as argument, and can be given in a `format'-like syntax."))
   (:export-class-name-p t)
   (:export-slot-names-p t)
   (:export-accessor-names-p t)
-  (:accessor-name-transformer (class*:make-name-transformer name))
   (:metaclass user-class)
   (:documentation "`router' that instructs resources to be opened externally."))