diff options
| -rw-r--r-- | module/vcomponent/describe.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/module/vcomponent/describe.scm b/module/vcomponent/describe.scm index fbdcf206..af0f9433 100644 --- a/module/vcomponent/describe.scm +++ b/module/vcomponent/describe.scm @@ -32,7 +32,10 @@ (if (list? values) (for-each out values) (out values)))) - (properties vcomponent)) + (sort* (properties vcomponent) + string<? + ;; TODO is key always a symbol? + (compose symbol->string car))) (for child in (children vcomponent) |