From 9593b69aeaabe232b828d1983d0728ca13f8e026 Mon Sep 17 00:00:00 2001
From: Andrew Cady <d@jerkface.net>
Date: Sun, 11 Jun 2017 16:51:34 -0400
Subject: spelling

---
 acme-certify.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/acme-certify.hs b/acme-certify.hs
index a9bf3fa..989940b 100644
--- a/acme-certify.hs
+++ b/acme-certify.hs
@@ -115,7 +115,7 @@ data UpdateOpts = UpdateOpts {
       updateHosts            :: [String],
       updateStaging          :: Bool,
       updateDryRun           :: Bool,
-      updateDoPrivisionCheck :: Bool,
+      updateDoProvisionCheck :: Bool,
       updateTryVHosts        :: [String]
 }
 
@@ -295,7 +295,7 @@ runUpdate UpdateOpts { .. } = do
 
     (needToFetch spec >>=) $ leftMapM_ $ \reason -> do
       putStrLn $ concat ["New certificate needed (for domain ", domainToString domain, "): ", show reason]
-      when updateDoPrivisionCheck $
+      when updateDoProvisionCheck $
         forM_ (filter (wantProvisionCheck . fst) $ csDomains spec) $ \csd -> do
           putStrLn $ "Provision check: " ++ (domainToString . fst $ csd)
           can <- uncurry canProvision csd
-- 
cgit v1.2.3