whitespace

This commit is contained in:
Jonathan Daugherty 2015-06-03 19:39:05 -07:00
parent 6628dd9c9e
commit 1a6cf1a660

View File

@ -86,7 +86,7 @@ listInsert pos e l =
}
listRemove :: Int -> List e -> List e
listRemove pos l | null es = l
listRemove pos l | null es = l
| pos /= clamp 0 (length es - 1) pos = l
| otherwise =
let newSel = case listSelected l of