@@ -196,7 +196,7 @@ data Credentials
196 -- * Read the default credentials from a file specified by
196 -- * Read the default credentials from a file specified by
197 -- the environment variable @GOOGLE_APPLICATION_CREDENTIALS@ if it exists.
197 -- the environment variable @GOOGLE_APPLICATION_CREDENTIALS@ if it exists.
199− -- * Read the platform equivalent of @~/.config/gcloud/application_default_credentials.json@ if it exists.
199+ -- * Read the platform equivalent of @~\/.config\/gcloud\/application_default_credentials.json@ if it exists.
200 -- The @~/.config@ component of the path can be overriden by the environment
200 -- The @~/.config@ component of the path can be overriden by the environment
201 -- variable @CLOUDSDK_CONFIG@ if it exists.
201 -- variable @CLOUDSDK_CONFIG@ if it exists.
@@ -290,7 +290,7 @@ isValid :: Refresh a -> IO Bool
290isValid r = (< _rExpiry r) <$> getCurrentTime
290isValid r = (< _rExpiry r) <$> getCurrentTime
292-- | Return the filepath to the Cloud SDK well known file location such as
292-- | Return the filepath to the Cloud SDK well known file location such as
293−-- @~/.config/gcloud/application_default_credentials.json@.
293+-- @~\/.config\/gcloud\/application_default_credentials.json@.
294cloudSDKCredentialsPath :: MonadIO m => m FilePath
294cloudSDKCredentialsPath :: MonadIO m => m FilePath
295cloudSDKCredentialsPath = liftIO $ do
295cloudSDKCredentialsPath = liftIO $ do
296 v <- lookupEnv cloudSDKCredentialsDirVar
296 v <- lookupEnv cloudSDKCredentialsDirVar