DefaultStructureMap DefaultConvention.vb

Public Class Bootstrapper

    Public Shared Sub BootstrapStructureMap()
        ObjectFactory.Initialize(AddressOf AutoRegisterStructureMap)
    End Sub

    Private Shared Sub AutoRegisterStructureMap(ByVal s As IInitializationExpression)
        s.Scan(AddressOf ScanAssemblies)      
    End Sub

    Private Shared Sub ScanAssemblies(ByVal scanner As IAssemblyScanner)
        scanner.TheCallingAssembly()
        scanner.WithDefaultConventions()
    End Sub

End Class