fix(massinput): properly render massInputList

2019-07-03 15:29:46 +02:00 · 2019-07-03 15:29:46 +02:00 · 7c2844807f
commit 7c2844807f
parent c78b9ff4d6
2 changed files with 3 additions and 3 deletions
--- a/src/Audit/Types.hs
+++ b/src/Audit/Types.hs
@ -13,7 +13,7 @@ import Utils.PathPiece


 data Transaction
-  = TransactionTermEdit { transactionTerm :: TermId }
+  = TransactionTermEdit { transactionTerm :: Key Term }
  deriving (Eq, Ord, Read, Show, Generic, Typeable)

 deriveJSON defaultOptions
--- a/templates/widgets/massinput/list/layout.hamlet
+++ b/templates/widgets/massinput/list/layout.hamlet
@ -1,8 +1,8 @@
 $newline never
 <table>
  <tbody>
-    <tr .massinput__cell>
-      $forall coord <- review liveCoords lLength
+    $forall coord <- review liveCoords lLength
+      <tr .massinput__cell>
        <td>
          ^{cellWdgts ! coord}
        <td>