diff options
Diffstat (limited to 'src/property.lisp')
-rw-r--r-- | src/property.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/property.lisp b/src/property.lisp index 0a16918..0820810 100644 --- a/src/property.lisp +++ b/src/property.lisp @@ -207,6 +207,6 @@ Called by property subroutines." ;;;; :APPLY subroutines (define-condition failed-change (error) - ((text :initarg :text :reader inapplicable-property-text)) + ((text :initarg :text :reader failed-change-text)) (:report (lambda (condition stream) - (format stream "~A" (inapplicable-property-text condition))))) + (format stream "~A" (failed-change-text condition))))) |