Skip to content
Snippets Groups Projects
Select Git revision
  • master
1 result

.env

Blame
    • Code owners
    Assign users and groups as approvers for specific file changes. Learn more.
    test_postfix_canonical.aug 591 B
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27 
    

    

    

    (*
Module: Test_Postfix_Canonical
  Provides unit tests and examples for the <Postfix_Canonical> lens.
*)

module Test_Postfix_Canonical =

(* View: conf *)
let conf = "# a comment
user@domain.com @domain
@otherdomain  @otherotherdomain
someuser  Full.Some.User
"

(* Test: Postfix_Canonical.lns *)
test Postfix_Canonical.lns get conf =
  { "#comment" = "a comment" }
  { "pattern" = "user@domain.com"
    { "destination" = "@domain" }
  }
  { "pattern" = "@otherdomain"
    { "destination" = "@otherotherdomain" }
  }
  { "pattern" = "someuser"
    { "destination" = "Full.Some.User" }
  }