lenses/tests/test_anacron.aug

   1 (*
   2 Module: Test_Anacron
   3   Provides unit tests and examples for the <Anacron> lens.
   4 *)
   5
   6 module Test_anacron =
   7
   8 (* Variable: conf *)
   9 let conf = "# /etc/anacrontab: configuration file for anacron
  10
  11 SHELL=/bin/sh
  12 PATH=/usr/local/sbin:/usr/local/bin:/sbin:/bin:/usr/sbin:/usr/bin
  13
  14 # These replace cron's entries
  15 1       5       cron.daily       nice run-parts --report /etc/cron.daily
  16 7       10      cron.weekly      nice run-parts --report /etc/cron.weekly
  17 @monthly        15      cron.monthly nice run-parts --report /etc/cron.monthly
  18 "
  19
  20 (* Test: Anacron.lns *)
  21 test Anacron.lns get conf =
  22   { "#comment" = "/etc/anacrontab: configuration file for anacron" }
  23   { }
  24   { "SHELL" = "/bin/sh" }
  25   { "PATH" = "/usr/local/sbin:/usr/local/bin:/sbin:/bin:/usr/sbin:/usr/bin" }
  26   { }
  27   { "#comment" = "These replace cron's entries" }
  28   { "entry" = "nice run-parts --report /etc/cron.daily"
  29      { "period" = "1" }
  30      { "delay" = "5" }
  31      { "job-identifier" = "cron.daily" } }
  32   { "entry" = "nice run-parts --report /etc/cron.weekly"
  33      { "period" = "7" }
  34      { "delay" = "10" }
  35      { "job-identifier" = "cron.weekly" } }
  36   { "entry" = "nice run-parts --report /etc/cron.monthly"
  37      { "period_name" = "monthly" }
  38      { "delay" = "15" }
  39      { "job-identifier" = "cron.monthly" } }