summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/HostingProvider
diff options
context:
space:
mode:
authorJoey Hess2018-08-20 20:46:30 -0400
committerJoey Hess2018-08-20 20:46:30 -0400
commit2a499012b680db73df20b6b5b0bc4959ab65006d (patch)
tree8e371d245f90099b54f74ca7e45f7d2c10351cba /src/Propellor/Property/HostingProvider
parent1cad0c5a11d54496232f338371d1f8e15fa69968 (diff)
Removed HostingProvider.CloudatCost module as it lacks a maintainer
(If anyone would like to maintain it, send a patch adding it back.) (API change)
Diffstat (limited to 'src/Propellor/Property/HostingProvider')
-rw-r--r--src/Propellor/Property/HostingProvider/CloudAtCost.hs34
1 files changed, 0 insertions, 34 deletions
diff --git a/src/Propellor/Property/HostingProvider/CloudAtCost.hs b/src/Propellor/Property/HostingProvider/CloudAtCost.hs
deleted file mode 100644
index 839aa14e..00000000
--- a/src/Propellor/Property/HostingProvider/CloudAtCost.hs
+++ /dev/null
@@ -1,34 +0,0 @@
--- | Maintainer: currently unmaintained; your name here!
-
-module Propellor.Property.HostingProvider.CloudAtCost
- {-# WARNING "This module does not have a maintainer. It might not work right anymore. If you use it, please consider becoming its maintainer." #-}
- where
-
-import Propellor.Base
-import qualified Propellor.Property.Hostname as Hostname
-import qualified Propellor.Property.File as File
-import qualified Propellor.Property.User as User
-
--- Clean up a system as installed by cloudatcost.com
-decruft :: Property DebianLike
-decruft = propertyList "cloudatcost cleanup" $ props
- & Hostname.sane
- & Hostname.mailname
- & grubbugfix
- & nukecruft
- where
- grubbugfix :: Property DebianLike
- grubbugfix = tightenTargets $
- "/etc/default/grub" `File.containsLine` "GRUB_DISABLE_LINUX_UUID=true"
- `describe` "worked around grub/lvm boot bug #743126"
- `onChange` (cmdProperty "update-grub" [] `assume` MadeChange)
- `onChange` (cmdProperty "update-initramfs" ["-u"] `assume` MadeChange)
- nukecruft :: Property Linux
- nukecruft = tightenTargets $
- combineProperties "nuked cloudatcost cruft" $ props
- & File.notPresent "/etc/rc.local"
- & File.notPresent "/etc/init.d/S97-setup.sh"
- & File.notPresent "/zang-debian.sh"
- & File.notPresent "/bin/npasswd"
- & User.nuked (User "user") User.YesReallyDeleteHome
-