Build Action in Visual Studio

[Patrick Greene]

Just wanted to provide this macro in case anyone wants to use the
Publish... functionality in Visual Studio and hates having to remember
to manually set their spark files' build action to Content


<System.ContextStaticAttribute()> Public WithEvents BuildEvents As
EnvDTE.BuildEvents

Sub SetSparkBuildAction(ByVal scope As EnvDTE.vsBuildScope, ByVal
action As EnvDTE.vsBuildAction) Handles BuildEvents.OnBuildBegin
For Each proj As Project In DTE.Solution.Projects
RecurseSetSparkBuildAction(proj)
Next
End Sub

Sub RecurseSetSparkBuildAction(ByVal item As Object)
If (item.Name.EndsWith(".spark",
StringComparison.CurrentCultureIgnoreCase)) Then
item.Properties.Item("BuildAction").Value = 2
End If
For Each childItem As ProjectItem In item.ProjectItems
RecurseSetSparkBuildAction(childItem)
Next
End Sub