lenses/tests/test_backuppchosts.aug

   1 module Test_BackupPCHosts =
   2
   3 let conf = "host        dhcp    user      moreUsers
   4 hostname1     0     user1     anotheruser,athirduser
   5 hostname2     1     user2     stillanotheruser\n"
   6
   7 test BackupPCHosts.lns get conf =
   8   { "1"
   9     { "host" = "host" }
  10     { "dhcp" = "dhcp" }
  11     { "user" = "user" }
  12     { "moreusers" = "moreUsers" }
  13   }
  14   { "2"
  15     { "host" = "hostname1" }
  16     { "dhcp" = "0" }
  17     { "user" = "user1" }
  18     { "moreusers" = "anotheruser" }
  19     { "moreusers" = "athirduser" }
  20   }
  21   { "3"
  22     { "host" = "hostname2" }
  23     { "dhcp" = "1" }
  24     { "user" = "user2" }
  25     { "moreusers" = "stillanotheruser" }
  26   }