Update example notebook

src/IHaskell/Eval/Lint.hs

@@ -81,14 +81,15 @@ showIdea :: Idea -> Maybe LintSuggestion
 showIdea idea =
   case ideaTo idea of
     Nothing -> Nothing
-    Just whyNot -> Just
-                     Suggest
-                       { line = srcSpanStartLine $ ideaSpan idea
-                       , found = showSuggestion $ ideaFrom idea
-                       , whyNot = showSuggestion whyNot
-                       , severity = ideaSeverity idea
-                       , suggestion = ideaHint idea
-                       }
+    Just whyNot ->
+      Just
+        Suggest
+          { line = srcSpanStartLine $ ideaSpan idea
+          , found = showSuggestion $ ideaFrom idea
+          , whyNot = showSuggestion whyNot
+          , severity = ideaSeverity idea
+          , suggestion = ideaHint idea
+          }
 
 createModule :: ParseMode -> Located CodeBlock -> Maybe ExtsModule
 createModule mode (Located line block) =