[augeas-devel] [PATCH] Merged ldap.aug in spacevars.aug and added havp.config to the list of supported configuration files

[Free Ekanayaka]

# HG changeset patch
# User Free Ekanayaka <free at 64studio.com>
# Date 1220706462 -7200
# Node ID 57a2a968ed195b7d5cfc33d4bb19e695d55bdc16
# Parent  b6948438f552e227788110984a1733cb25f2f021
Merged ldap.aug in spacevars.aug and added havp.config to the list of supported configuration files

diff -r b6948438f552 -r 57a2a968ed19 lenses/ldap.aug
--- a/lenses/ldap.aug	Fri Sep 05 22:51:41 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,16 +0,0 @@
-(* Ldap module for Augeas
- Author: Free Ekanayaka <free at 64studio.com>
-*)
-
-module Ldap =
-  autoload xfm
-
-  (* plain spacevars lens *)
-  let entry = Spacevars.entry Spacevars.entry_re
-  let lns   = Spacevars.lns entry
-
-  let filter = Util.stdexcl .
-      incl "/etc/ldap.conf" .
-      incl "/etc/ldap/ldap.conf"
-
-  let xfm = transform lns filter
diff -r b6948438f552 -r 57a2a968ed19 lenses/spacevars.aug
--- a/lenses/spacevars.aug	Fri Sep 05 22:51:41 2008 +0200
+++ b/lenses/spacevars.aug	Sat Sep 06 15:07:42 2008 +0200
@@ -8,6 +8,7 @@
 *)
 
 module Spacevars =
+  autoload xfm
 
 (************************************************************************
  *                           USEFUL PRIMITIVES
@@ -34,3 +35,11 @@ let entry_re   = /[A-Za-z0-9\._-]+(\[[0-
  *************************************************************************)
 
 let lns (entry:lens) = (comment|empty|entry) *
+
+(* configuration files that can be parsed without customizing the lens *)
+let filter = Util.stdexcl
+           . incl "/etc/havp/havp.config"
+           . incl "/etc/ldap.conf"
+           . incl "/etc/ldap/ldap.conf"
+
+let xfm = transform (lns (entry (entry_re))) filter