Attribute VB_Name = "Profiles"
Option Explicit

'Public Function GetBuffsFolder(szProfileName As String) As String
'    GetBuffsFolder = GetProfileFolder(szProfileName) & "\" & PROFILE_BUFFS_FOLDER
'End Function
'
'Public Function BuffProfileExists(szProfileName As String, szBuffProfileName As String) As Boolean
'    If ProfileExists(szProfileName) Then
'        BuffProfileExists = PathExists(g_Settings.GetDataFolder & "\" & GetBuffsFolder(szProfileName) & "\" & szBuffProfileName)
'    Else
'        BuffProfileExists = False
'    End If
'End Function
'
'Public Sub ChangeBuffProfile(szBuffProfile As String)
'    MyDebug "ChangeBuffProfile(" & szBuffProfile & ")"
'    g_ui.BuffProfileName = szBuffProfile
'    'g_ui.Buffs.stCurrentBuffProfile.Text = "Current Buff Profile : " & g_ui.BuffProfileName
'End Sub