aboutsummaryrefslogtreecommitdiff
path: root/module/text/numbers.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/text/numbers.scm')
-rw-r--r--module/text/numbers.scm8
1 files changed, 7 insertions, 1 deletions
diff --git a/module/text/numbers.scm b/module/text/numbers.scm
index c45016bc..7909573b 100644
--- a/module/text/numbers.scm
+++ b/module/text/numbers.scm
@@ -2,10 +2,16 @@
:use-module (srfi srfi-88)
:export (number->string-cardinal
number->string-ordinal
+ resolve-language
each-string))
(define (get mod-symb proc-symb)
- (module-ref (resolve-interface `(text numbers ,mod-symb))
+ (module-ref (catch 'misc-error
+ (lambda () (resolve-interface `(text numbers ,mod-symb)))
+ (lambda (err proc fmt args data)
+ ;; Possibly check if the err message starts with
+ ;; "no code for module"
+ (resolve-interface '(text numbers en))))
proc-symb))
;; "sv_SE.UTF-8"