Skip to content

Commit 0a09d07

Browse files
committed
added quotes around annotation value
1 parent bdca75a commit 0a09d07

File tree

2 files changed

+2
-2
lines changed

2 files changed

+2
-2
lines changed

Rubberduck.Parsing/Annotations/AttributeAnnotationProvider.cs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -36,7 +36,7 @@ public class AttributeAnnotationProvider : IAttributeAnnotationProvider
3636
// FIXME special cased bodge for ExcelHotKeyAnnotation to deal with the value transformation:
3737
if (flexibleValueAttributeAnnotation == AnnotationType.ExcelHotKey)
3838
{
39-
return (flexibleValueAttributeAnnotation, attributeValues.Select(keySpec => keySpec.Substring(1, 1)).ToList());
39+
return (flexibleValueAttributeAnnotation, attributeValues.Select(keySpec => '"' + keySpec.Substring(1, 1) + '"').ToList());
4040
}
4141
return (flexibleValueAttributeAnnotation, attributeValues);
4242
}

RubberduckTests/Annotations/AttributeAnnotationProviderTests.cs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -57,7 +57,7 @@ public void ModuleAttributeAnnotationReturnsSpecializedAnnotationsWhereApplicabl
5757
AssertEqual(expectedValues, actualValues);
5858
}
5959

60-
[TestCase("VB_ProcData.VB_Invoke_Func", "\"A\n14\"", AnnotationType.ExcelHotKey, "A")]
60+
[TestCase("VB_ProcData.VB_Invoke_Func", "\"A\n14\"", AnnotationType.ExcelHotKey, "\"A\"")]
6161
[TestCase("VB_Description", "\"SomeDescription\"", AnnotationType.Description, "\"SomeDescription\"")]
6262
[TestCase("VB_VarDescription", "\"SomeDescription\"", AnnotationType.VariableDescription, "\"SomeDescription\"")]
6363
[TestCase("VB_UserMemId", "0", AnnotationType.DefaultMember)]

0 commit comments

Comments
 (0)