aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/create.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/vcomponent/create.scm')
-rw-r--r--module/vcomponent/create.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/module/vcomponent/create.scm b/module/vcomponent/create.scm
index 27ea6996..355839f0 100644
--- a/module/vcomponent/create.scm
+++ b/module/vcomponent/create.scm
@@ -24,13 +24,13 @@
(define (keyword->key keyword)
(-> keyword
keyword->string
- string-upcase
+ string-upcase ; NOCOV
string->symbol))
(define (symbol-upcase symbol)
(-> symbol
symbol->string
- string-upcase
+ string-upcase ; NOCOV
string->symbol))
;; Upcase the keys in an association list. Keys must be symbols.