hspresent 0.2 → 0.2.1

raw patch · 3 files changed

+9/−2 lines, 3 files

Files

Changelog +5/−0
Main.hs +3/−1
hspresent.cabal +1/−1

+ Changelog view

@@ -0,0 +1,5 @@+0.2.1 2009-07-06+ - Fix a regression in 0.2.0 where resizing the window didn't cause the+   display to be redrawn.+ - New feature: if the first character of a frame is #, then the entire frame+   will be commented out and not rendered.

Main.hs view

@@ -75,6 +75,7 @@                            EvKey (KASCII 'q') _       -> return ()                            EvKey (KASCII 'c') [MCtrl] -> return ()                            EvKey (KASCII 'r') _ -> blankVty vty >> loop' n+                           EvResize _ _   -> blankVty vty >> loop' n                            _              -> eventLoop  -- |Sometimes the vty module gets confused and leaves artifacts from previous@@ -91,7 +92,8 @@ makeFrames :: String -> Presentation makeFrames xs = listArray (1, length frames) frames     where-      frames = concatMap copyFrames $ basicSplit xs+      frames = filter (\p -> head (head p) /= '#') frames'+      frames' = concatMap copyFrames $ basicSplit xs       basicSplit = split "--" . lines       copyFrames = cf [] . split "."       cf _ [] = []

hspresent.cabal view

@@ -1,7 +1,7 @@ Author:        Evan Klitzke Maintainer:    Evan Klitzke <evan@eklitzke.org> Name:          hspresent-Version:       0.2+Version:       0.2.1 Cabal-Version: >= 1.2 License:       BSD3 License-File:  LICENSE