Commit7cf8740

authored and

committed

Correctly fetch the IVsBuildMacroInfo to use for the build events page (#3388)

1 parent2c8a0e6 commit7cf8740Copy full SHA for 7cf8740

File tree

+10

-2

lines changed

vsintegration/src/FSharp.ProjectSystem.PropertyPages/PropertyPages
- BuildEventsPropPage.vb

+10

-2

lines changed

Lines changed: 10 additions & 2 deletions

Original file line number	Diff line number	Diff line change
`@@ -335,8 +335,16 @@ Namespace Microsoft.VisualStudio.Editors.PropertyPages`
`335`	`335`	`PrivateFunctionGetTokenValue(ByValMacroNameAsString)AsString`
`336`	`336`	`DimMacroEvalAsIVsBuildMacroInfo`
`337`	`337`	`DimMacroValueAsString=Nothing`
`338`		`-`
`339`		`-MacroEval=CType(m_Objects(0),IVsBuildMacroInfo)`
	`338`	`+DimHierAsIVsHierarchy=Nothing`
	`339`	`+DimItemIdAsUInteger`
	`340`	`+DimThisObjAsObject=m_Objects(0)`
	`341`	`+`
	`342`	`+IfTypeOfThisObjIsIVsBrowseObjectThen`
	`343`	`+VSErrorHandler.ThrowOnFailure(CType(ThisObj,IVsBrowseObject).GetProjectItem(Hier,ItemId))`
	`344`	`+ElseIfTypeOfThisObjIsIVsCfgBrowseObjectThen`
	`345`	`+VSErrorHandler.ThrowOnFailure(CType(ThisObj,IVsCfgBrowseObject).GetProjectItem(Hier,ItemId))`
	`346`	`+EndIf`
	`347`	`+MacroEval=CType(Hier,IVsBuildMacroInfo)`
`340`	`348`	`VSErrorHandler.ThrowOnFailure(MacroEval.GetBuildMacroValue(MacroName,MacroValue))`
`341`	`349`
`342`	`350`	`ReturnMacroValue`

Comments

(0)