diff options
author | Miguel Ángel Moreno <mail@migalmoreno.com> | 2023-07-31 11:32:53 +0200 |
---|---|---|
committer | Miguel Ángel Moreno <mail@migalmoreno.com> | 2023-07-31 11:32:53 +0200 |
commit | b80c19f604252c423f9b1fa7a5e59ce7fc633da8 (patch) | |
tree | 1285d29c581b7b25278ad750e3202ac10d4f32b3 | |
parent | 27c18ebd42bcd5b9da963656087209f31c99d4e3 (diff) |
fix: Remove unneeded slot name transformers
-rw-r--r-- | mosaic.lisp | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/mosaic.lisp b/mosaic.lisp index 0fd7134..7e4beef 100644 --- a/mosaic.lisp +++ b/mosaic.lisp @@ -8,7 +8,6 @@ (:export-class-name-p t) (:export-accessor-names-p t) (:export-slot-names-p t) - (:accessor-name-transformer (class*:make-name-transformer name)) (:metaclass user-class)) (define-class widget () @@ -21,7 +20,6 @@ (:export-class-name-p t) (:export-accessor-names-p t) (:export-slot-names-p t) - (:accessor-name-transformer (class*:make-name-transformer name)) (:metaclass user-class)) (defgeneric display (widget buffer) @@ -37,7 +35,6 @@ (:export-class-name-p t) (:export-accessor-names-p t) (:export-slot-names-p t) - (:accessor-name-transformer (class*:make-name-transformer name)) (:metaclass user-class)) (defmethod display ((widget time-widget) buffer) @@ -77,7 +74,6 @@ (:export-class-name-p t) (:export-accessor-names-p t) (:export-slot-names-p t) - (:accessor-name-transformer (class*:make-name-transformer name)) (:metaclass user-class)) (defmethod display ((widget greeting-widget) buffer) |