[augeas-devel] [PATCH 1 of 2] Allow indent in comments

[David Lutterkort]

On Tue, 2008-08-12 at 18:25 +0200, Raphael Pinson wrote:
> # HG changeset patch
> # User Raphael Pinson <raphink at gmail.com>
> # Date 1218557850 -7200
> # Node ID df9cfa106307e533defb0159902375a7927c0d8a
> # Parent  fd042181dc27a4d50e81954e6313ba6dd44036e5
> Allow indent in comments
> 
> diff -r fd042181dc27 -r df9cfa106307 lenses/xinetd.aug
> --- a/lenses/xinetd.aug	Tue Aug 12 18:05:31 2008 +0200
> +++ b/lenses/xinetd.aug	Tue Aug 12 18:17:30 2008 +0200
> @@ -9,10 +9,10 @@ module Xinetd =
>  module Xinetd =
>    autoload xfm
>  
> -  let comment = [ del /(#.*|[ \t]*)\n/ "#\n" ]
> +  let opt_spc = del /[ \t]*/ ""
> +  let comment = [ opt_spc . del /(#.*|[ \t]*)\n/ "#\n" ]
>  
>    let name = key /[^ \t\n\/+-=]+/
> -  let opt_spc = del /[ \t]*/ ""
>    let spc = del /[ \t]+/ " "
>    let eol = del /[ \t]*\n/ "\n"

This doesn't typecheck. I changed comment to 
   let comment = [ del /[ \t]*(#.*|[ \t]*)\n/ "#\n" ]

David