Fully initialize the custom_operations struct

[ocaml-augeas.git] / augeas.ml

diff --git a/augeas.ml b/augeas.ml
index 8d6ac6d..a2d345d 100644 (file)
--- a/augeas.ml
+++ b/augeas.ml
@@ -78,6 +78,8 @@ external set : t -> path -> value option -> unit
   = "ocaml_augeas_set"
 external transform : t -> string -> string -> transform_mode -> unit
   = "ocaml_augeas_transform"
+external source : t -> path -> path option
+  = "ocaml_augeas_source"
 
 let () =
   Callback.register_exception "Augeas.Error" (Error (AugErrInternal, "", "", ""))