From f1ceaffc159fe7a591bfc615762867db3f6aa199 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Thu, 4 Feb 2016 19:07:03 +0000 Subject: more docs --- server/src/Thermoprint/Server/Queue.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'server/src') diff --git a/server/src/Thermoprint/Server/Queue.hs b/server/src/Thermoprint/Server/Queue.hs index d2400a1..672d540 100644 --- a/server/src/Thermoprint/Server/Queue.hs +++ b/server/src/Thermoprint/Server/Queue.hs @@ -20,7 +20,7 @@ import GHC.Generics (Generic) import Data.Default.Class --- | Zipper for 'Seq QueueEntry' +-- | Zipper for 'Seq QueueEntry' with additional support for 'PrintingError' in the section after point data Queue = Queue { pending :: Seq QueueEntry -- ^ Pending jobs, closest last , current :: Maybe QueueEntry -- cgit v1.2.3