diff options
Diffstat (limited to 'guile/starlet/engine.scm')
-rw-r--r-- | guile/starlet/engine.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guile/starlet/engine.scm b/guile/starlet/engine.scm index c63cb9b..28f4321 100644 --- a/guile/starlet/engine.scm +++ b/guile/starlet/engine.scm @@ -125,7 +125,7 @@ (define name (patch-many-real (quote name) stuff ...))))) -(define-method (current-value (fix <fixture>) (attr-name <starlet-attribute>)) +(define (current-value fix attr-name) (let ((v (state-find fix attr-name (current-value-state)))) (if (eq? v 'no-value) (get-attr-home-val fix attr-name) |