From 0f5db8065f6e3dc583696bfec4ab64ff4b59ba18 Mon Sep 17 00:00:00 2001 From: Dmitry Ivanov Date: Sun, 24 Aug 2014 18:14:57 +0700 Subject: [PATCH] Remove unused field in Mode type. Exercise for the reader: try to find all unused fields in our codebase. --- yi/src/library/Yi/Buffer/Misc.hs | 3 --- 1 file changed, 3 deletions(-) diff --git a/yi/src/library/Yi/Buffer/Misc.hs b/yi/src/library/Yi/Buffer/Misc.hs index 4c6d3b88b..40ffc6be8 100644 --- a/yi/src/library/Yi/Buffer/Misc.hs +++ b/yi/src/library/Yi/Buffer/Misc.hs @@ -128,7 +128,6 @@ module Yi.Buffer.Misc , modeToggleCommentSelectionA , modeGetStrokesA , modeGetAnnotationsA - , modePrintTreeA , modeOnLoadA , modeModeLineA , AnyMode (..) @@ -401,7 +400,6 @@ data Mode syntax = Mode modeToggleCommentSelection :: YiM (), modeGetStrokes :: syntax -> Point -> Point -> Point -> [Stroke], -- ^ Strokes that should be applied when displaying a syntax element modeGetAnnotations :: syntax -> Point -> [Span String], - modePrintTree :: syntax -> BufferM (), -- should this be an Action instead? modeOnLoad :: BufferM (), -- ^ An action that is to be executed when this mode is set modeModeLine :: [String] -> BufferM String -- ^ buffer-local modeline formatting method @@ -661,7 +659,6 @@ emptyMode = Mode modeToggleCommentSelection = promptCommentString, modeGetStrokes = \_ _ _ _ -> [], modeGetAnnotations = \_ _ -> [], - modePrintTree = \_ -> return (), modeOnLoad = return (), modeModeLine = defaultModeLine }