cursedcsv 0.1.3 → 0.1.4

raw patch · 2 files changed

+6/−5 lines, 2 files

Files

• code/CursedCSV.hs +2/−2
• cursedcsv.cabal +4/−3

@@ -468,7 +468,7 @@ moveColLeft :: (Int, Tbl ByteString) -> CsvM () moveColLeft (_, Tbl{colSelected=Nothing}) = return () moveColLeft (w, tbl@Tbl{colSelected=Just csel}) = do-    as @ AppState{myTbls=tbls, tblCur=curTblIdx} <- get+    as@AppState{myTbls=tbls, tblCur=curTblIdx} <- get     let ((nw, newTbl), newTblIdx, newCurTblIdx)             | curTblIdx > 1 = (atNote "moveColLeft" tbls (curTblIdx - 1), curTblIdx - 1, curTblIdx)             | otherwise = ((1, (mkTbl [] []) {ty=ty tbl}), 1, curTblIdx + 1)@@ -484,7 +484,7 @@ moveColRight :: (Int, Tbl ByteString) -> CsvM () moveColRight (_, Tbl{colSelected=Nothing}) = return () moveColRight (w, tbl@Tbl{colSelected=Just csel}) = do-    as @ AppState{myTbls=tbls, tblCur=curTblIdx} <- get+    as@AppState{myTbls=tbls, tblCur=curTblIdx} <- get     let tblsLen = length tbls - 1         (nw, newTbl)             | curTblIdx < tblsLen = atNote "moveColRight" tbls (curTblIdx + 1)

@@ -1,5 +1,6 @@+cabal-version:       1.24 Name:                cursedcsv-Version:             0.1.3+Version:             0.1.4 Synopsis:            Terminal tool for viewing tabular data Description:         Curses-based tool for quick display, searching, sorting, etc. of                      tabular data. Help available in the app with either '?' or 'h'.@@ -11,17 +12,17 @@ Category:            Application Build-type:          Simple -- Extra-source-files:-Cabal-version:       >=1.6  Executable cursedcsv   Main-is: CursedCSV.hs   Build-depends: base >= 4 && < 6, parseargs >= 0.1.3, natural-sort >= 0.1.1,                  hscurses >= 1.4, regex-tdfa >= 1.1.8, safe >= 0.3, mtl >= 2,-                 csv-conduit > 0.7, conduit >= 1.2.8 && < 2.0, conduit-extra, vector >=0.12 && < 0.13, bytestring > 0.9, primitive >=0.6.1 && < 0.7+                 csv-conduit > 0.7, conduit >= 1.2.8 && < 2.0, conduit-extra, vector >=0.12 && < 0.13, bytestring > 0.9, primitive >=0.6.1 && < 0.8   if !os(windows)     Build-depends: unix >= 2.4   ghc-options:     -Wall   hs-source-dirs: code+  default-language: Haskell2010  source-repository head   type:      darcs