aboutsummaryrefslogtreecommitdiffstats
path: root/lib/system.ml
diff options
context:
space:
mode:
authorEstevan Castilho <tevo@riajuu.net>2026-05-23 01:07:14 +0000
committerEstevan Castilho <tevo@riajuu.net>2026-05-23 01:07:14 +0000
commitdb3198d7c5ad7bc60bd24bd1bb2c7b122a6dfbd0 (patch)
tree0671ce12b98db653af87de99a443b9f83a623cb5 /lib/system.ml
parent2190193397596663c4de4f51f8355300c1833997 (diff)
downloadSakura-db3198d7c5ad7bc60bd24bd1bb2c7b122a6dfbd0.tar.gz
Sakura-db3198d7c5ad7bc60bd24bd1bb2c7b122a6dfbd0.zip
Include messages on on all conditions
Diffstat (limited to 'lib/system.ml')
-rw-r--r--lib/system.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/system.ml b/lib/system.ml
index 831cf74..56a5440 100644
--- a/lib/system.ml
+++ b/lib/system.ml
@@ -19,7 +19,7 @@ type registry = {
module Error = struct
open Condition
- let unknown_backend component tag = condition "unknown-backend"
+ let unknown_backend component tag = condition "unknown-backend" "Unknown backend for component"
("component" |=| (of_string component) &
"tag" |=| (of_string tag))
end