summaryrefslogtreecommitdiff
path: root/custom/tinc/generate_hostfile.hs
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2015-07-02 20:56:24 +0200
committerGregor Kleen <gkleen@yggdrasil.li>2015-07-02 20:56:24 +0200
commit6e4aff5269ef7677ddc23ccb498c130a0e1403a2 (patch)
treeb54a3f56ccbe66dfe7d88c5f2d266a7affd65b59 /custom/tinc/generate_hostfile.hs
parent17d901fdd0f0cbd6fddbca62bb4b4d835e9f059b (diff)
downloadnixos-6e4aff5269ef7677ddc23ccb498c130a0e1403a2.tar
nixos-6e4aff5269ef7677ddc23ccb498c130a0e1403a2.tar.gz
nixos-6e4aff5269ef7677ddc23ccb498c130a0e1403a2.tar.bz2
nixos-6e4aff5269ef7677ddc23ccb498c130a0e1403a2.tar.xz
nixos-6e4aff5269ef7677ddc23ccb498c130a0e1403a2.zip
Moved tinc hosts to submodules
Diffstat (limited to 'custom/tinc/generate_hostfile.hs')
-rwxr-xr-xcustom/tinc/generate_hostfile.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/custom/tinc/generate_hostfile.hs b/custom/tinc/generate_hostfile.hs
index a8420780..90fa11b7 100755
--- a/custom/tinc/generate_hostfile.hs
+++ b/custom/tinc/generate_hostfile.hs
@@ -12,7 +12,7 @@ genHostFile (_ :/ (Dir _ contents)) = "{\n" ++ entries ++ "\n}\n"
12 entries = concat [ genEntry name content | (File name content) <- contents, name `notElem` hidden ] 12 entries = concat [ genEntry name content | (File name content) <- contents, name `notElem` hidden ]
13 genEntry fileName fileContent = unlines . indent $ [ "\"" ++ fileName ++ "\" = ''" ] ++ indent (lines fileContent) ++ [ "'';" ] 13 genEntry fileName fileContent = unlines . indent $ [ "\"" ++ fileName ++ "\" = ''" ] ++ indent (lines fileContent) ++ [ "'';" ]
14 hidden = [ "to_nix.sh" 14 hidden = [ "to_nix.sh"
15 , "signup.sh" 15 , "hosts.nix"
16 ] 16 ]
17 17
18indent :: [String] -> [String] 18indent :: [String] -> [String]