@@ -67,12 +67,10 @@ public void EncapsulateMultipleFields(
6767
6868 foreach ( var variable in encapsulated )
6969 {
70- var rhsParameterName = Support . RhsParameterNameBuilder ( $ "{ variable } Prop") ;
71-
7270 StringAssert . Contains ( $ "Private { variable } As", actualCode ) ;
7371 StringAssert . Contains ( $ "{ variable } Prop = { variable } ", actualCode ) ;
74- StringAssert . Contains ( $ "{ variable } = { rhsParameterName } ", actualCode ) ;
75- StringAssert . Contains ( $ "Let { variable } Prop(ByVal { rhsParameterName } As", actualCode ) ;
72+ StringAssert . Contains ( $ "{ variable } = { Support . RHSIdentifier } ", actualCode ) ;
73+ StringAssert . Contains ( $ "Let { variable } Prop(ByVal { Support . RHSIdentifier } As", actualCode ) ;
7674 StringAssert . Contains ( $ "Property Get { variable } Prop()", actualCode ) ;
7775 }
7876 }
@@ -133,12 +131,10 @@ public void EncapsulateMultipleFieldsInList(
133131 {
134132 if ( flags [ key ] )
135133 {
136- var rhsParameterName = Support . RhsParameterNameBuilder ( $ "{ key } Prop") ;
137-
138134 StringAssert . Contains ( $ "Private { key } As", actualCode ) ;
139135 StringAssert . Contains ( $ "{ key } Prop = { key } ", actualCode ) ;
140- StringAssert . Contains ( $ "{ key } = { rhsParameterName } ", actualCode ) ;
141- StringAssert . Contains ( $ "Let { key } Prop(ByVal { rhsParameterName } As", actualCode ) ;
136+ StringAssert . Contains ( $ "{ key } = { Support . RHSIdentifier } ", actualCode ) ;
137+ StringAssert . Contains ( $ "Let { key } Prop(ByVal { Support . RHSIdentifier } As", actualCode ) ;
142138 StringAssert . Contains ( $ "Property Get { key } Prop()", actualCode ) ;
143139 }
144140 }
@@ -234,11 +230,10 @@ Property Set Foo(ByVal vall As Variant)
234230End Property" ;
235231
236232 var presenterAction = Support . SetParametersForSingleTarget ( "fizz" , "Name" ) ;
237- var rhsParameterName = Support . RhsParameterNameBuilder ( "Name" ) ;
238233
239234 var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
240- Assert . Greater ( actualCode . IndexOf ( $ "fizz = { rhsParameterName } ") , actualCode . IndexOf ( "fizz As Integer" ) ) ;
241- Assert . Less ( actualCode . IndexOf ( $ "fizz = { rhsParameterName } ") , actualCode . IndexOf ( "Get Foo" ) ) ;
235+ Assert . Greater ( actualCode . IndexOf ( $ "fizz = { Support . RHSIdentifier } ") , actualCode . IndexOf ( "fizz As Integer" ) ) ;
236+ Assert . Less ( actualCode . IndexOf ( $ "fizz = { Support . RHSIdentifier } ") , actualCode . IndexOf ( "Get Foo" ) ) ;
242237 }
243238
244239 [ TestCase ( "|Public fizz As Integer\r \n Public buzz As Boolean" , "Private fizz As Integer\r \n Public buzz As Boolean" ) ]
@@ -256,8 +251,8 @@ Public Property Get Name() As Integer
256251 Name = fizz
257252End Property
258253
259- Public Property Let Name(ByVal nameValue As Integer)
260- fizz = nameValue
254+ Public Property Let Name(ByVal { Support . RHSIdentifier } As Integer)
255+ fizz = { Support . RHSIdentifier }
261256End Property
262257" ;
263258 var presenterAction = Support . SetParametersForSingleTarget ( "fizz" , "Name" ) ;
@@ -297,14 +292,13 @@ public void EncapsulatePrivateField()
297292 @"|Private fizz As Integer" ;
298293
299294 var presenterAction = Support . SetParametersForSingleTarget ( "fizz" , "Name" ) ;
300- var rhsParameterName = Support . RhsParameterNameBuilder ( "Name" ) ;
301295
302296 var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
303297 StringAssert . Contains ( "Public Property Get Name() As Integer" , actualCode ) ;
304298 StringAssert . Contains ( "Public Property Let Name(" , actualCode ) ;
305- StringAssert . Contains ( $ "(ByVal { rhsParameterName } As Integer)", actualCode ) ;
299+ StringAssert . Contains ( $ "(ByVal { Support . RHSIdentifier } As Integer)", actualCode ) ;
306300 StringAssert . Contains ( "Name = fizz" , actualCode ) ;
307- StringAssert . Contains ( $ "fizz = { rhsParameterName } ", actualCode ) ;
301+ StringAssert . Contains ( $ "fizz = { Support . RHSIdentifier } ", actualCode ) ;
308302 StringAssert . Contains ( "End Property" , actualCode ) ;
309303 }
310304
@@ -371,15 +365,14 @@ public void EncapsulatePrivateFieldInList()
371365 @"Private fi|zz As Integer, fuzz As Integer, fazz As Integer" ;
372366
373367 var presenterAction = Support . SetParametersForSingleTarget ( "fizz" ) ;
374- var rhsParameterName = Support . RhsParameterNameBuilder ( "Fizz" ) ;
375368
376369 var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
377370 StringAssert . Contains ( "Private fizz_1 As Integer, fuzz As Integer," , actualCode ) ;
378371 StringAssert . Contains ( "Public Property Get Fizz() As Integer" , actualCode ) ;
379372 StringAssert . Contains ( "Public Property Let Fizz(" , actualCode ) ;
380- StringAssert . Contains ( $ "(ByVal { rhsParameterName } As Integer)", actualCode ) ;
373+ StringAssert . Contains ( $ "(ByVal { Support . RHSIdentifier } As Integer)", actualCode ) ;
381374 StringAssert . Contains ( "Fizz = fizz_1" , actualCode ) ;
382- StringAssert . Contains ( $ "fizz_1 = { rhsParameterName } ", actualCode ) ;
375+ StringAssert . Contains ( $ "fizz_1 = { Support . RHSIdentifier } ", actualCode ) ;
383376 StringAssert . Contains ( "End Property" , actualCode ) ;
384377 }
385378
@@ -392,14 +385,13 @@ public void EncapsulatePrivateField_Defaults()
392385 @"|Private fizz As Integer" ;
393386
394387 var presenterAction = Support . UserAcceptsDefaults ( ) ;
395- var rhsParameterName = Support . RhsParameterNameBuilder ( "Fizz" ) ;
396388
397389 var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
398390 StringAssert . Contains ( "Public Property Get Fizz() As Integer" , actualCode ) ;
399391 StringAssert . Contains ( "Public Property Let Fizz(" , actualCode ) ;
400- StringAssert . Contains ( $ "(ByVal { rhsParameterName } As Integer)", actualCode ) ;
392+ StringAssert . Contains ( $ "(ByVal { Support . RHSIdentifier } As Integer)", actualCode ) ;
401393 StringAssert . Contains ( "Fizz = fizz_1" , actualCode ) ;
402- StringAssert . Contains ( $ "fizz_1 = { rhsParameterName } ", actualCode ) ;
394+ StringAssert . Contains ( $ "fizz_1 = { Support . RHSIdentifier } ", actualCode ) ;
403395 StringAssert . Contains ( "End Property" , actualCode ) ;
404396 }
405397
@@ -412,12 +404,11 @@ public void EncapsulatePrivateField_DefaultsAsUDT()
412404 @"|Private fizz As Integer" ;
413405
414406 var presenterAction = Support . UserAcceptsDefaults ( convertFieldToUDTMember : true ) ;
415- var rhsParameterName = Support . RhsParameterNameBuilder ( "Fizz" ) ;
416407
417408 var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
418409 StringAssert . Contains ( "Fizz As Integer" , actualCode ) ;
419410 StringAssert . Contains ( $ "this As { Support . StateUDTDefaultType } ", actualCode ) ;
420- StringAssert . Contains ( $ "this.Fizz = { rhsParameterName } ", actualCode ) ;
411+ StringAssert . Contains ( $ "this.Fizz = { Support . RHSIdentifier } ", actualCode ) ;
421412 }
422413
423414 [ Test ]
@@ -440,15 +431,14 @@ Sub Bar(ByVal name As Integer)
440431
441432 var validator = EncapsulateFieldValidationsProvider . NameOnlyValidator ( NameValidators . Default ) ;
442433 var enapsulationIdentifiers = new EncapsulationIdentifiers ( "fizz" , validator ) { Property = "Name" } ;
443- var rhsParameterName = Support . RhsParameterNameBuilder ( "Name" ) ;
444434
445435 var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
446436 StringAssert . AreEqualIgnoringCase ( enapsulationIdentifiers . TargetFieldName , "fizz" ) ;
447437 StringAssert . Contains ( $ "Private { enapsulationIdentifiers . TargetFieldName } As Integer", actualCode ) ;
448438 StringAssert . Contains ( "Property Get Name" , actualCode ) ;
449439 StringAssert . Contains ( "Property Let Name" , actualCode ) ;
450440 StringAssert . Contains ( $ "Name = { enapsulationIdentifiers . TargetFieldName } ", actualCode ) ;
451- StringAssert . Contains ( $ "{ enapsulationIdentifiers . TargetFieldName } = { rhsParameterName } ", actualCode ) ;
441+ StringAssert . Contains ( $ "{ enapsulationIdentifiers . TargetFieldName } = { Support . RHSIdentifier } ", actualCode ) ;
452442 }
453443
454444 [ Test ]
0 commit comments