propellor

propellor config for hosts.
git clone git://git.ricketyspace.net/propellor.git
Log | Files | Refs | LICENSE

commit 95dd48d25ecbeedf9eee48b0d6c4f65fdb7efb4e
parent 42b68459cfb7d051f0042640d8312cb03ffa7a6b
Author: rsiddharth <s@ricketyspace.net>
Date:   Sun, 10 Dec 2017 20:17:31 +0000

config.hs: Update cron cygnus jobs' time.

* config.hs (rsyncToEntisol, rsyncFromCruxToEntisol, annexToEntisol)
(annexSyncFromHome, updateGitAnnex, getCruxEtc)
(autoCommitCygnusRepos): Update functions.

Diffstat:
config.hs | 14+++++++-------
1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/config.hs b/config.hs @@ -195,14 +195,14 @@ rsyncToChum = Cron.job "rsync-to-chum" (Cron.Times "*/30 * * * *") rsyncCmd = rsyncBuTo chumFilter "/home/s" chumBackupPath rsyncToEntisol :: Property DebianLike -rsyncToEntisol = Cron.job "rsync-to-entisol" (Cron.Times "20 00 * * *") +rsyncToEntisol = Cron.job "rsync-to-entisol" (Cron.Times "00 02 * * *") (User "s") "/home/s/.bin" rsyncCmd where rsyncCmd = rsyncBuTo entisolFilter "/home/s" entisolBackupPath rsyncFromCruxToEntisol :: Property DebianLike rsyncFromCruxToEntisol = Cron.job "rsync-from-crux-to-entisol" - (Cron.Times "35 00 * * *") + (Cron.Times "15 22 * * *") (User "s") "/home/s/.bin" rsyncCmd where rsyncCmd = sourceCygnusEnv (rsyncBuTo cruxFilter "rspace:~/" @@ -215,20 +215,20 @@ annexToChum = Cron.job "annex-to-chum" (Cron.Times "00 */1 * * *") annexCmd = annexTo chumAnnexPath "docs" annexToEntisol :: Property DebianLike -annexToEntisol = Cron.job "annex-to-entisol" (Cron.Times "50 00 * * *") +annexToEntisol = Cron.job "annex-to-entisol" (Cron.Times "45 02 * * *") (User "s") "/home/s/.bin" annexCmd where annexCmd = annexTo entisolAnnexPath "." annexSyncFromHome :: Property DebianLike annexSyncFromHome = Cron.job "annex-sync-from-home" - (Cron.Times "00 01 * * *") + (Cron.Times "00 03 * * *") (User "s") "/home/s/annex" annexCmd where annexCmd = "$HOME/.bin/git-annex sync" updateGitAnnex :: Property DebianLike -updateGitAnnex = Cron.job "update-git-annex" (Cron.Weekly) +updateGitAnnex = Cron.job "update-git-annex" (Cron.Times "20 10 * * 1") (User "s") "/home/s/v/git/rsd/df" makeCmd where makeCmd = "make git-annex" @@ -246,14 +246,14 @@ eighthirtyNoise = Cron.job "eigthirty-noise" (Cron.Times "30 08 * * *") noiseCmd = "mpc play" getCruxEtc :: Property DebianLike -getCruxEtc = Cron.job "get-crux-etc" (Cron.Times "00 23 * * *") +getCruxEtc = Cron.job "get-crux-etc" (Cron.Times "15 10 * * *") (User "s") "/home/s/v/git/rsd/crux-etc" gitCmd where gitCmd = sourceCygnusEnv "git pull origin" autoCommitCygnusRepos :: Property DebianLike autoCommitCygnusRepos = Cron.job "auto-commit-repos" - (Cron.Times "00 22 * * *") + (Cron.Times "20 22 * * *") (User "s") "/home/s/.bin/" autoCommitCmd where autoCommitCmd = sourceCygnusEnv "./git-difme"