aboutsummaryrefslogtreecommitdiffstats
path: root/lib/system.ml
diff options
context:
space:
mode:
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