diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,9 +1,13 @@
 # Revision history for hail
 
-## 0.1.0.0  -- 2017-04-08
+## 0.1.0.2  -- 2017-05-16
 
-* Initial release
+* Fix bug in --oneshot that made it actually --noshot
 
 ## 0.1.0.1  -- 2017-04-08
 
 * Add README to tarball.
+
+## 0.1.0.0  -- 2017-04-08
+
+* Initial release
diff --git a/Main.hs b/Main.hs
--- a/Main.hs
+++ b/Main.hs
@@ -75,18 +75,18 @@
   opts <- execParser optsParserInfo
   let profilePath = "/nix/var/nix/profiles" </> (profile opts)
       uri = jobURI opts
-      cont m_creds = case pollPeriod opts of
+  m_creds <- loadCredsFromNetrc (netrcFile opts) uri
+  createDirectoryIfMissing True $ takeDirectory profilePath
+  -- Try to activate on initial startup, but ignore failures.
+  activate profilePath ActivateIgnoreErrors
+  let cont = case pollPeriod opts of
         Nothing -> const $ return ()
         Just period -> \delay -> do
           case delay of
             Delay -> threadDelay $ minutesToMicroseconds period
             NoDelay -> return ()
-          pollLoop profilePath uri m_creds (cont m_creds)
-  m_creds <- loadCredsFromNetrc (netrcFile opts) uri
-  createDirectoryIfMissing True $ takeDirectory profilePath
-  -- Try to activate on initial startup, but ignore failures.
-  activate profilePath ActivateIgnoreErrors
-  cont m_creds NoDelay
+          pollLoop profilePath uri m_creds cont
+  pollLoop profilePath uri m_creds cont
 
 -- | Convert minutes to microseconds
 minutesToMicroseconds :: Int -> Int
diff --git a/hail.cabal b/hail.cabal
--- a/hail.cabal
+++ b/hail.cabal
@@ -1,5 +1,5 @@
 name:                hail
-version:             0.1.0.1
+version:             0.1.0.2
 synopsis:
          A service for pull-based continuous deployment based on hydra.
 description: