summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Kerberos.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Propellor/Property/Kerberos.hs')
-rw-r--r--src/Propellor/Property/Kerberos.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Propellor/Property/Kerberos.hs b/src/Propellor/Property/Kerberos.hs
index 74388423..5d07f4dc 100644
--- a/src/Propellor/Property/Kerberos.hs
+++ b/src/Propellor/Property/Kerberos.hs
@@ -1,7 +1,7 @@
+-- | Maintainer: Jelmer Vernooij <jelmer@samba.org>
+
module Propellor.Property.Kerberos where
-import Data.String.Utils
-import Utility.FileSystemEncoding
import Utility.Process
import Propellor
@@ -30,7 +30,7 @@ kdcConfPath = "/etc/krb5kdc/kdc.conf"
keyTabPath :: Maybe FilePath -> FilePath
keyTabPath = maybe defaultKeyTab id
--- Create a principal from a primary, instance and realm
+-- | Create a principal from a primary, instance and realm
principal :: String -> Maybe String -> Maybe Realm -> Principal
principal p i r = p ++ maybe "" ("/"++) i ++ maybe "" ("@" ++) r