diff options
Diffstat (limited to 'StackSet.hs')
-rw-r--r-- | StackSet.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/StackSet.hs b/StackSet.hs index 34e6b10..4b74646 100644 --- a/StackSet.hs +++ b/StackSet.hs @@ -412,4 +412,3 @@ shift n s = if and [n >= 0,n < size s,n /= tag (workspace (current s))] then maybe s go (peek s) else s where go w = foldr ($) s [view (tag (workspace (current s))),insertUp w,view n,delete w] -- ^^ poor man's state monad :-) - |