artifact-app 0.6.3

Artifact is a design doc tool made for developers. It allows anyone to easily write and link their design docs both to each other and to source code, making it easy to track how complete their project is. Documents are revision controllable, can be rendered as a static web page and have a full suite of command line tools for searching, formatting and displaying them.
Documentation
module Messages exposing (..)

import Http

import Artifacts.Messages

type Route
  = ArtifactsRoute
  | ArtifactNameRoute String
  | NotFoundRoute
  

type AppMsg
  = ArtifactsMsg Artifacts.Messages.Msg
  | RouteChange Route
  | HttpError Http.Error
  | AppError String


formatHttpError : Http.Error -> String
formatHttpError error =
  case error of
    Http.BadPayload desc resp ->
      "HTTP Error BadPayload: " ++ desc
    Http.BadUrl url ->
      "HTTP Error BadUrl: " ++ url
    Http.Timeout ->
      "HTTP Error Timeout"
    Http.NetworkError ->
      "HTTP Error NetworkError"
    Http.BadStatus response ->
      "HTTP Error BadStatus: " ++ response.body