diff options
Diffstat (limited to 'module/vcomponent/base.scm')
-rw-r--r-- | module/vcomponent/base.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/vcomponent/base.scm b/module/vcomponent/base.scm index 52bbe0c3..2041e126 100644 --- a/module/vcomponent/base.scm +++ b/module/vcomponent/base.scm @@ -16,8 +16,8 @@ (value get-vline-value set-vline-value!) (parameters get-vline-parameters)) -(define*-public (make-vline value #:optional ht) - (make-vline% value (or ht (make-hash-table)))) +(define*-public (make-vline value #:optional (ht (make-hash-table))) + (make-vline% value ht)) (define-record-type <vcomponent> (make-vcomponent% type children parent attributes) |