Add Whentools library, test, documentation.

[whenjobs.git] / lib / whenfile.ml

diff --git a/lib/whenfile.ml b/lib/whenfile.ml
index b109e66..1617c29 100644 (file)
--- a/lib/whenfile.ml
+++ b/lib/whenfile.ml
@@ -36,4 +36,7 @@ let add_every_job _loc name e sh =
               job_cond = Every_job e; job_script = sh } in
   state := Whenstate.add_job !state job
 
+let set_variable name value =
+  state := Whenstate.set_variable !state name value
+
 let get_state () = !state