diff --git a/src/Main.hs b/src/Main.hs
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -31,26 +31,10 @@
 
 module Main where
 
--- |Here are some imports:
+-- Here are some imports:
 
-import           Control.Applicative
-import qualified Data.ByteString as B
-import           Data.Char
-import           Data.Data
-import qualified Data.Map.Lazy as Map
-import           Data.Monoid
-import qualified Data.Text as T
-import           Data.Time
-import           Data.Typeable
-import           Data.Version
-import           Paths_tn (version)
 import           Safe
-import           System.Directory
 import           System.Environment
-import           System.Exit
-import           System.IO
-import           System.IO.Error
-import           System.Process
 import           Tn.Meat
 import           Tn.Potatoes
 import           Tn.Static
diff --git a/src/Tn/Meat.hs b/src/Tn/Meat.hs
--- a/src/Tn/Meat.hs
+++ b/src/Tn/Meat.hs
@@ -30,26 +30,14 @@
 
 module Tn.Meat where
 
-import           Control.Applicative
-import qualified Data.ByteString as B
-import           Data.Char
-import           Data.Data
 import qualified Data.Map.Lazy as Map
 import           Data.Monoid
 import           Data.Text (Text)
 import qualified Data.Text as T
 import qualified Data.Text.IO as Tio
 import           Data.Time
-import           Data.Typeable
-import           Data.Version
 import           Data.Yaml
-import           Paths_tn (version)
-import           Safe
-import           System.Directory
-import           System.Environment
-import           System.Exit
 import           System.IO
-import           System.IO.Error
 import           System.Process
 import           Tn.Potatoes
 import           Tn.Static
diff --git a/src/Tn/Potatoes.hs b/src/Tn/Potatoes.hs
--- a/src/Tn/Potatoes.hs
+++ b/src/Tn/Potatoes.hs
@@ -37,7 +37,6 @@
 import qualified Data.ByteString as B
 import           Data.Char
 import           Data.List
-import qualified Data.Map.Lazy as M
 import           Data.Monoid
 import           Data.Text (Text)
 import qualified Data.Text as T
@@ -45,7 +44,6 @@
 import           Data.Yaml
 import           Prelude hiding (getContents)
 import           System.Directory
-import           System.Exit
 import           System.IO hiding (getContents)
 import           System.IO.Error
 import           Tn.Static
diff --git a/src/Tn/Static.hs b/src/Tn/Static.hs
--- a/src/Tn/Static.hs
+++ b/src/Tn/Static.hs
@@ -112,7 +112,7 @@
 tnVersion = showVersion version
 
 instance FromJSON Journal where
-  parseJSON o@(Object v) = do
+  parseJSON o@(Object _) = do
     q <- parseJSON o
     return $ Map.mapKeys read q
   parseJSON _ = mzero
diff --git a/tn.cabal b/tn.cabal
--- a/tn.cabal
+++ b/tn.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                tn
-version:             1.0.0
+version:             1.0.1
 synopsis:            A simple daily journal program
 -- description:         
 license:             GPL-3
@@ -12,20 +12,22 @@
 bug-reports:         https://notabug.org/pharpend/tn/issues/new
 copyright:           
     tn - a simple daily journal program
+
     Copyright (C) 2015 Peter Harpending
-    .
+     
     This program is free software: you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
     the Free Software Foundation, either version 3 of the License, or
     (at your option) any later version.
-    .
+     
     This program is distributed in the hope that it will be useful,
     but WITHOUT ANY WARRANTY; without even the implied warranty of
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     GNU General Public License for more details.
-    .
+     
     You should have received a copy of the GNU General Public License
     along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
 category:            Text
 build-type:          Simple
 -- extra-source-files:  
@@ -37,6 +39,7 @@
       Tn.Meat
     , Tn.Potatoes
     , Tn.Static
+    , Paths_tn
   -- other-extensions:    
   default-extensions:          
     OverloadedStrings
@@ -55,14 +58,14 @@
                      , yaml
   hs-source-dirs:      src
   default-language:    Haskell2010
-  ghc-options:         -Wall
+  ghc-options:         -Wall -fno-warn-orphans
 
 source-repository head
   type: git
-  location: git@notabug.org:pharpend/tn.git
+  location: ssh://git@notabug.org/pharpend/tn.git
 
 source-repository this
   type: git
-  location: git@notabug.org:pharpend/tn.git
-  tag: 1.0.0
+  location: ssh://git@notabug.org/pharpend/tn.git
+  tag: 1.0.1