Skip to content

Instantly share code, notes, and snippets.

@igorkulman

igorkulman/LogAsync.fs

Created June 20, 2013 11:39
Show Gist options
  • Save igorkulman/5822056 to your computer and use it in GitHub Desktop.
Save igorkulman/5822056 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
LogAsync.fs
let log (severity:Severity) message =
async {
let entry = LogEntity(PartitionKey = DateTime.Now.ToString("yyyy-MM-dd"), RowKey = Guid.NewGuid().ToString(), Timestamp = DateTime.Now, Message = message, Severity = severity.ToString())
CreateEntityWithClient client "LogEntity" entry
} |> Async.Start
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment