From 2fdb1bbdeb6fd30ea7011a98c818d0c8b3e83278 Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gkleen@yggdrasil.li>
Date: Fri, 15 Jan 2016 01:46:02 +0000
Subject: minor documentation

---
 spec/src/Thermoprint/API.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/spec/src/Thermoprint/API.hs b/spec/src/Thermoprint/API.hs
index e77f406..49cccf5 100644
--- a/spec/src/Thermoprint/API.hs
+++ b/spec/src/Thermoprint/API.hs
@@ -2,6 +2,7 @@
 {-# LANGUAGE TypeOperators, DataKinds #-}
 {-# LANGUAGE OverloadedStrings #-}
 
+-- ^ A specification of an API for interacting with a set of printers
 module Thermoprint.API
        ( PrinterStatus(..)
        , JobStatus(..)
@@ -65,4 +66,5 @@ type ThermoprintAPI = "printers" :> Get '[JSON] (Set PrinterId)
                       )
 
 thermoprintAPI :: Proxy ThermoprintAPI
+-- ^ Servant occasionally needs an object of this type 
 thermoprintAPI = Proxy
-- 
cgit v1.2.3