anchor.diff:                      return! Successful.OK (JsonConvert.SerializeObject wishList) ctx
                   else
                       return! BAD_REQUEST "WishList is not valid" ctx
  -        with exn -> 
  -            let logger = Log.create "FableSample"
  +        with exn ->
               logger.error (eventX "Database not available" >> addExn exn)
               return! SERVICE_UNAVAILABLE "Database not available" ctx
       })    
positive.code:             fi.Directory.Create()
          File.WriteAllText(fi.FullName,JsonConvert.SerializeObject wishList)
      with exn ->
          let logger = Log.create "FableSample"
          logger.error (eventX "Save failed with exception" >> addExn exn)
  
  /// Handle the GET on /api/wishlist
  
negative.code: open ServerCode.Domain
  open Suave.Logging
  open Suave.Logging.Message
  
  let logger = Log.create "FableSample"
  
  
  /// The default initial data 
  