Add Augeas.set
[ocaml-augeas.git] / augeas.ml
index ba3626e..974a940 100644 (file)
--- a/augeas.ml
+++ b/augeas.ml
@@ -70,6 +70,8 @@ external save : t -> unit
   = "ocaml_augeas_save"
 external load : t -> unit
   = "ocaml_augeas_load"
+external set : t -> path -> value option -> unit
+  = "ocaml_augeas_set"
 
 let () =
   Callback.register_exception "Augeas.Error" (Error (AugErrInternal, "", "", ""))