From 1da5a277188a954d881316cb605962ee66053285 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Thu, 17 Mar 2022 22:14:18 +0100 Subject: Normalize errors. --- module/vcomponent/formats/common/types.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'module/vcomponent/formats/common') diff --git a/module/vcomponent/formats/common/types.scm b/module/vcomponent/formats/common/types.scm index efe17f36..97980e1a 100644 --- a/module/vcomponent/formats/common/types.scm +++ b/module/vcomponent/formats/common/types.scm @@ -136,4 +136,5 @@ (define-public (get-parser type) (or (hashq-ref type-parsers type #f) - (error "No parser for type" type))) + (scm-error 'misc-error "get-parser" "No parser for type ~a" + (list type) #f))) -- cgit v1.2.3