diff --git a/README.md b/README.md index 5b1d1ea..a563fa8 100644 --- a/README.md +++ b/README.md @@ -5,8 +5,8 @@ This repository provides functions and types for common azure related operations. This is very much incomplete but serves as a boilerplate to get started. Covered areas: -- Authentication (with managed identities) -- Key Vault (To be pushed) +- Authentication (with managed identities only as of now) +- Key Vault - Blob storage (To be pushed) - Email communication service (To be pushed) @@ -17,7 +17,7 @@ To build the entire project, run: stack build ``` -In order to build individual components of the library, run: +In order to build individual components of the library, `cd` into the package and run: ``` cabal build ``` diff --git a/azure-auth/Azure/Auth.hs b/azure-auth/Azure/Auth.hs index 9b0eea7..3dda1e6 100644 --- a/azure-auth/Azure/Auth.hs +++ b/azure-auth/Azure/Auth.hs @@ -27,7 +27,8 @@ import Azure.Types (AccessToken (..), Token, readToken, updateToken) import qualified Data.Text as Text {- | IMDS is a REST API that's available at a well-known, non-routable IP address ( 169.254. 169.254 ). -It can only be accessed from within the VM. Communication between the VM and IMDS never leaves the host. +It is a local-only link can only be accessed from within the VM. +Communication between the VM and IMDS never leaves the host. -} imdsHost :: String imdsHost = "169.254.169.254"