From b094c1ea9aa6fab77ab74ecac4bea17e915c7544 Mon Sep 17 00:00:00 2001 From: Hendrik Jaeger Date: Sun, 31 Aug 2014 02:57:05 +0200 Subject: [PATCH] deleted: Diddo/Entry.hs renamed: Diddo.hs -> src/Diddo.hs renamed: diddohs.hs -> src/Main.hs MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit cleanup, I guess, it’s been a while … basic functionality works it seems --- Diddo/Entry.hs | 12 ------------ Diddo.hs => src/Diddo.hs | 0 diddohs.hs => src/Main.hs | 0 3 files changed, 12 deletions(-) delete mode 100644 Diddo/Entry.hs rename Diddo.hs => src/Diddo.hs (100%) rename diddohs.hs => src/Main.hs (100%) 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] - diff --git a/Diddo.hs b/src/Diddo.hs similarity index 100% rename from Diddo.hs rename to src/Diddo.hs diff --git a/diddohs.hs b/src/Main.hs similarity index 100% rename from diddohs.hs rename to src/Main.hs -- 2.39.2