X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=Diddo%2FEntry.hs;fp=Diddo%2FEntry.hs;h=0000000000000000000000000000000000000000;hb=b094c1ea9aa6fab77ab74ecac4bea17e915c7544;hp=be9d13cb266ad539ee7743d171a78d15ee60cc9c;hpb=95d1857e437aa09e1161be075c654c50afd91dd8;p=user%2Fhenk%2Fcode%2Fhaskell%2Fdiddohs.git diff --git a/Diddo/Entry.hs b/Diddo/Entry.hs deleted file mode 100644 index be9d13c..0000000 --- a/Diddo/Entry.hs +++ /dev/null @@ -1,12 +0,0 @@ -module Diddo.Entry -( DiddoEntry(DiddoEntry) -) where - -import HMSTime( HMSTime ) -import Data.List( intercalate ) - -data DiddoEntry = DiddoEntry String String HMSTime String - -instance Show DiddoEntry where - show (DiddoEntry start finish delta entry) = intercalate ";" [start,finish,(show delta),entry] -