func GetCAs(store *liftca.Store, r *ht.Request) *ht.Answer {
response := make([]JSONCAResponse, 0)
for _, s := range store.GetCAs() {
auth, _ := store.Get(s)
if auth.Visible {
response = append(response, *JSONCAResponseFromParcel(auth))
}
}
return ht.JSONDocument(response)
}
