From 369278e734ba9a58f38ae36250fec29f162b160e Mon Sep 17 00:00:00 2001 From: Julian Ospald Date: Wed, 8 Jun 2016 21:39:55 +0200 Subject: [PATCH] GTK: cosmetics, docs --- src/HSFM/GUI/Gtk/Plugins.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/HSFM/GUI/Gtk/Plugins.hs b/src/HSFM/GUI/Gtk/Plugins.hs index 2d62dad..3479e5b 100644 --- a/src/HSFM/GUI/Gtk/Plugins.hs +++ b/src/HSFM/GUI/Gtk/Plugins.hs @@ -70,7 +70,7 @@ insertPos = 4 -- |A list of plugins to add to the right-click menu at position -- `insertPos`. -- --- The left part of the triple is the menuitem. +-- The left part of the triple is a function that returns the menuitem. -- The middle part of the triple is a filter function that -- decides whether the item is shown. -- The right part of the triple is the callback, which is invoked @@ -79,7 +79,8 @@ insertPos = 4 -- Plugins are added in order of this list. myplugins :: [(IO MenuItem ,[Item] -> MyGUI -> MyView -> IO Bool - ,[Item] -> MyGUI -> MyView -> IO ())] + ,[Item] -> MyGUI -> MyView -> IO ()) + ] myplugins = [(diffItem, diffFilter, diffCallback) ]