aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMiguel Ángel Moreno <mail@migalmoreno.com>2023-07-31 11:32:53 +0200
committerMiguel Ángel Moreno <mail@migalmoreno.com>2023-07-31 11:32:53 +0200
commitb80c19f604252c423f9b1fa7a5e59ce7fc633da8 (patch)
tree1285d29c581b7b25278ad750e3202ac10d4f32b3
parent27c18ebd42bcd5b9da963656087209f31c99d4e3 (diff)
fix: Remove unneeded slot name transformers
-rw-r--r--mosaic.lisp4
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)