Option Strict On
Option Explicit On

Namespace Nexamas.UI.ThemeStudio

    ''' <summary>
    ''' Readiness finding for the Theme Studio / Surface Designer foundation.
    ''' </summary>
    Friend NotInheritable Class MASThemeStudioReadinessFinding

        Friend Sub New(code As String,
                       message As String,
                       severity As MASThemeStudioReadinessSeverity)
            Me.Code = If(code, String.Empty).Trim()
            Me.Message = If(message, String.Empty).Trim()
            Me.Severity = severity
        End Sub

        Friend ReadOnly Property Code As String
        Friend ReadOnly Property Message As String
        Friend ReadOnly Property Severity As MASThemeStudioReadinessSeverity

    End Class

End Namespace