Quick fix

Author: Hosch250

Rubberduck.CodeAnalysis/QuickFixes/RemoveLocalErrorQuickFix.cs

@@ -0,0 +1,33 @@
+using Rubberduck.Inspections.Abstract;
+using Rubberduck.Inspections.Concrete;
+using Rubberduck.Parsing.Grammar;
+using Rubberduck.Parsing.Inspections.Abstract;
+using Rubberduck.Parsing.VBA;
+
+namespace Rubberduck.Inspections.QuickFixes
+{
+    public sealed class RemoveLocalErrorQuickFix : QuickFixBase
+    {
+        private readonly RubberduckParserState _state;
+
+        public RemoveLocalErrorQuickFix(RubberduckParserState state)
+            : base(typeof(OnLocalErrorInspection))
+        {
+            _state = state;
+        }
+
+        public override void Fix(IInspectionResult result)
+        {
+            var errorStmt = (VBAParser.OnErrorStmtContext)result.Context;
+
+            var rewriter = _state.GetRewriter(result.QualifiedSelection.QualifiedName);
+            rewriter.Replace(errorStmt.ON_LOCAL_ERROR(), Tokens.On + " " + Tokens.Error);
+        }
+
+        public override string Description(IInspectionResult result) => Resources.Inspections.QuickFixes.RemoveLocalErrorQuickFix;
+
+        public override bool CanFixInProcedure => true;
+        public override bool CanFixInModule => true;
+        public override bool CanFixInProject => true;
+    }
+}

Rubberduck.CodeAnalysis/Rubberduck.CodeAnalysis.csproj

@@ -158,6 +158,7 @@
     <Compile Include="Inspections\Concrete\ProcedureNotUsedInspection.cs" />
     <Compile Include="Properties\AssemblyInfo.cs" />
     <Compile Include="QuickFixes\AccessSheetUsingCodeNameQuickFix.cs" />
+    <Compile Include="QuickFixes\RemoveLocalErrorQuickFix.cs" />
     <Compile Include="QuickFixes\RemoveDuplicatedAnnotationQuickFix.cs" />
     <Compile Include="QuickFixes\ReplaceIfElseWithConditionalStatementQuickFix.cs" />
     <Compile Include="QuickFixes\AddIdentifierToWhiteListQuickFix.cs" />

Rubberduck.Resources/Inspections/QuickFixes.Designer.cs

@@ -255,4 +255,7 @@
   <data name="RemoveDuplicatedAnnotationQuickFix" xml:space="preserve">
     <value>Remove duplicated annotation</value>
   </data>
+  <data name="RemoveLocalErrorQuickFix" xml:space="preserve">
+    <value>Replace 'On Local Error' with 'On Error'</value>
+  </data>
 </root>

Rubberduck.Resources/Inspections/QuickFixes.resx

@@ -0,0 +1,41 @@
+using System.Linq;
+using NUnit.Framework;
+using RubberduckTests.Mocks;
+using System.Threading;
+using Rubberduck.Inspections.Concrete;
+using Rubberduck.Inspections.QuickFixes;
+using RubberduckTests.Inspections;
+
+namespace RubberduckTests.QuickFixes
+{
+    [TestFixture]
+    public class RemoveLocalErrorQuickFixTests
+    {
+        [TestCase("On Local Error GoTo 0")]
+        [TestCase("On Local Error GoTo 1")]
+        [TestCase(@"On Local Error GoTo Label
+Label:")]
+        [TestCase("On Local Error Resume Next")]
+        [Category("QuickFixes")]
+        public void OptionBaseZeroStatement_QuickFixWorks_RemoveStatement(string stmt)
+        {
+            var inputCode = $@"Sub foo()
+    {stmt}
+End Sub";
+            var expectedCode = $@"Sub foo()
+    {stmt.Replace("Local ", "")}
+End Sub";
+
+            var vbe = MockVbeBuilder.BuildFromSingleStandardModule(inputCode, out var component);
+            using (var state = MockParser.CreateAndParse(vbe.Object))
+            {
+                var inspection = new OnLocalErrorInspection(state);
+                var inspector = InspectionsHelper.GetInspector(inspection);
+                var inspectionResults = inspector.FindIssuesAsync(state, CancellationToken.None).Result;
+
+                new RemoveLocalErrorQuickFix(state).Fix(inspectionResults.First());
+                Assert.AreEqual(expectedCode, state.GetRewriter(component).GetText());
+            }
+        }
+    }
+}

RubberduckTests/QuickFixes/RemoveLocalErrorQuickFixTests.cs

@@ -134,6 +134,7 @@
     <Compile Include="QuickFixes\AccessSheetUsingCodeNameQuickFixTests.cs" />
     <Compile Include="QuickFixes\IntroduceLocalVariableQuickFixTests.cs" />
     <Compile Include="QuickFixes\RemoveDuplicatedAnnotationQuickFixTests.cs" />
+    <Compile Include="QuickFixes\RemoveLocalErrorQuickFixTests.cs" />
     <Compile Include="Rewriter\ArgumentRewriterInfoFinderTests.cs" />
     <Compile Include="Rewriter\ParameterRewriterInfoFinderTests.cs" />
     <Compile Include="Rewriter\ConstantRewriterInfoFinderTests.cs" />