1 (* Webmin module for Augeas
2 Author: Free Ekanayaka <free@64studio.com>
12 (************************************************************************
14 *************************************************************************)
17 let comment = Util.comment
18 let empty = Util.empty
20 let sep_eq = del /=/ "="
22 let sto_to_eol = store /([^ \t\n].*[^ \t\n]|[^ \t\n])/
24 let word = /[A-Za-z0-9_.-]+/
26 (************************************************************************
28 *************************************************************************)
30 let entry = [ key word
35 (************************************************************************
37 *************************************************************************)
39 let lns = (comment|empty|entry) *
41 let wm_incl (n:string)
42 = (incl ("/etc/webmin/" . n))
43 let filter = wm_incl "miniserv.conf"
44 . wm_incl "ldap-useradmin/config"
46 let xfm = transform lns filter