Do not error out on failed rewrite (#1269)

The error call was only for diagnostics, so I have replaced
it with a debug trace (commented out)

Author: pepeiborra

ghcide/src/Development/IDE/Plugin/CodeAction.hs

@@ -97,8 +97,10 @@ codeAction lsp state _ (TextDocumentIdentifier uri) _range CodeActionContext{_di
           , Just ps <- [annotatedPS]
           , Just dynflags <- [df]
           , (title, graft) <- suggestExactAction exportsMap dynflags ps x
-          , let edit = either error id $
-                        rewriteToEdit dynflags uri (annsA ps) graft
+          , Right edit <-
+                [ -- either (Left . traceShow) Right $
+                 rewriteToEdit dynflags uri (annsA ps) graft
+                 ]
           ]
       actions'' = caRemoveRedundantImports parsedModule text diag xs uri
                <> actions