Fix build

3 files changed, 4 insertions, 4 deletions

diff --git a/Handler/Common.hs b/Handler/Common.hs
index 87496cb..ab84e4e 100644
--- a/Handler/Common.hs
+++ b/Handler/Common.hs
@@ -105,9 +105,9 @@ itemForm proto identView = do
       groupId <- newIdent
       
       dNever <- mWhen dfNever $
-        mopt checkBoxField ("" { fsId = Just $ Text.pack neverBoxId }) . Just . Just . fromMaybe True $ fmap isNever proto
+        mopt checkBoxField ("" { fsId = Just neverBoxId }) . Just . Just . fromMaybe True $ fmap isNever proto
       dUnknown <- mWhen dfUnknown $
-        mopt checkBoxField ("" { fsId = Just $ Text.pack unknownBoxId }) . Just . Just . fromMaybe False $ fmap isUnknown proto
+        mopt checkBoxField ("" { fsId = Just unknownBoxId }) . Just . Just . fromMaybe False $ fmap isUnknown proto
       dDay <- mWhen dfKnown $
         mopt dayField "" . Just . Just $ case proto of
                              Just (DateKnown d) -> d
diff --git a/bar.cabal b/bar.cabal
index 13e47d1..37eedf3 100644
--- a/bar.cabal
+++ b/bar.cabal
@@ -1,5 +1,5 @@
 name:              bar
-version:           0.6.4
+version:           0.6.5
 cabal-version:     >= 1.8
 build-type:        Simple
 
diff --git a/bar.nix b/bar.nix
index 1b690db..c41d3f8 100644
--- a/bar.nix
+++ b/bar.nix
@@ -10,7 +10,7 @@
 }:
 mkDerivation {
   pname = "bar";
-  version = "0.6.4";
+  version = "0.6.5";
   src = ./.;
   isLibrary = true;
   isExecutable = true;