cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

propellor spin

This commit is contained in:
Joey Hess 2014-03-31 01:10:50 -04:00
parent 9a61b127a0
commit a431dd231e
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Propellor/Engine.hs
View File

@ -22,6 +22,7 @@ ensureProperties' ps = ensure ps NoChange
where where
ensure [] rs = return rs ensure [] rs = return rs
ensure (l:ls) rs = do ensure (l:ls) rs = do
setTitle $ propertyDesc l
r <- ensureProperty l r <- ensureProperty l
clearFromCursorToLineBeginning clearFromCursorToLineBeginning
setCursorColumn 0 setCursorColumn 0