LIB/GTK: cleanup

This commit is contained in:
2016-06-12 23:40:55 +02:00
parent 369278e734
commit df0b5e3e16
5 changed files with 6 additions and 64 deletions

View File

@@ -19,7 +19,6 @@ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
module HSFM.Utils.MyPrelude where
import Data.Default
import Data.List
@@ -31,6 +30,3 @@ listIndices :: [a] -> [Int]
listIndices = findIndices (const True)
-- |A `maybe` flavor using the `Default` class.
maybeD :: (Default b) => (a -> b) -> Maybe a -> b
maybeD = maybe def