anchor.diff:          let swuTemplateId = envVarRequired "SCI_TALLY_SWU_TEMPLATE_ID"
           let formatEmail name = sprintf "%s@%s" name emailDomain
   
  -        let emailRecipient: SwuRecipient = 
  +        let emailRecipient: SwuRecipient =
               if isLive then { name = "Mike"; address = formatEmail "mikef" }
               else { name = "Joshua Harms"; address = formatEmail "josh" }
           let emailCcs: SwuRecipient list =
  -            if isLive then 
  -                [
  -                    {
  -                        name = "Tim"
  -                        address = formatEmail "tim"
  -                    }
  -                    {
  -                        name = "Joshua Harms"
  -                        address = formatEmail "josh"
  -                    }
  -                    {
  -                        name = "Leta"
  -                        address = formatEmail "letaf"
  -                    }
  -                ]
  +            if isLive then
  +                let listJson = envVarRequired "SCI_TALLY_CC_LIST"
  +                JsonConvert.DeserializeObject<SwuRecipient list>(listJson)
               else []
  -        let sender = 
  +        let sender =
               {
                   name = "KMSignalR Superintendent"
                   address = formatEmail "superintendent"
  -                replyTo = formatEmail "superintendent" 
  -            }    
  +                replyTo = formatEmail "superintendent"
  +            }
   
  -        let base64HeaderValue = 
  -            sprintf "%s:" swuKey 
  -            |> Text.Encoding.UTF8.GetBytes 
  +        let base64HeaderValue =
  +            sprintf "%s:" swuKey
  +            |> Text.Encoding.UTF8.GetBytes
               |> Convert.ToBase64String
  -        let header = Custom ("Authorization", sprintf "Basic %s" base64HeaderValue) 
  +        let header = Custom ("Authorization", sprintf "Basic %s" base64HeaderValue)
           let url = "https://api.sendwithus.com/api/v1/send"
  -        let message = 
  +        let message =
               {
                   template = swuTemplateId
                   recipient = emailRecipient
                   cc = emailCcs
                   sender = sender
  -                template_data = 
  +                template_data =
                       {
                           date = tallyStartDate.ToString ("MMM dd, yyyy")
                           tally = tally
  
positive.code: module SciTallyTool
  
      open System
      open System.Net
      open System.Threading
      open System.Collections.Generic
      open Microsoft.Azure.WebJobs
      open Microsoft.Azure.WebJobs.Host
      open Microsoft.Azure.WebJobs.Extensions
      open Newtonsoft.Json
      open HttpFs.Client
      open Hopac
  
negative.code:             |> JsonConvert.DeserializeObject<Tally>
  
          match summaryResponse.Count with
          | 0 ->
              printfn "Tally response contained an empty summary. Was the `since` parameter (%i) incorrect?"
                  (startDate |> toJsTimestamp)
          | _ ->
              summaryResponse
              |> Seq.iter (fun kvp -> printfn "%s: %i portraits" kvp.Key kvp.Value)
  
          let emailResponse =
              try
                  summaryResponse
                  |> Seq.map (fun kvp -> { source = kvp.Key; count = kvp.Value })
                  |> List.ofSeq
                  |> sendEmailMessage startDate
                  |> run
              with
              | e ->
                  log.Error("API call to SendWithUs failed.", e)
                  reraise ()
  
  