Commit c07918c1 authored by Giacomo Tenaglia's avatar Giacomo Tenaglia
Browse files

Extend canonical augeas lens regex (fixes #345)

parent ff664189

lib/augeas/lenses/postfix_canonical.aug

+1 −1
Original line number Diff line number Diff line
@@ -32,7 +32,7 @@ let space_or_eol (sep:regexp) (default:string) = 
  del (space_or_eol_re? . sep . space_or_eol_re?) default 



(* View: word *)

let word = store /[A-Za-z0-9@\*.+-]+/

let word = store /[A-Za-z0-9@\*.+-_!$&'=?^`{|}~]+/



(* View: comma *)

let comma = space_or_eol "," ", "

lib/augeas/lenses/test_postfix_canonical.aug

+4 −0
Original line number Diff line number Diff line
@@ -10,6 +10,7 @@ let conf = "# a comment 
user@domain.com @domain

@otherdomain  @otherotherdomain

someuser  Full.Some.User

anotheruser  another_user+mail=address@domain

"



(* Test: Postfix_Canonical.lns *)
@@ -24,3 +25,6 @@ test Postfix_Canonical.lns get conf = 
  { "pattern" = "someuser"

    { "destination" = "Full.Some.User" }

  }

  { "pattern" = "anotheruser"

    { "destination" = "another_user+mail=address@domain" }

  }