diff --git a/Modules.Logging.Test/ConstructorUnitTest.vb b/Modules.Logging.Test/ConstructorUnitTest.vb
index f8b7bbe7..3a790cfd 100644
--- a/Modules.Logging.Test/ConstructorUnitTest.vb
+++ b/Modules.Logging.Test/ConstructorUnitTest.vb
@@ -8,19 +8,19 @@ Imports DigitalData.Modules.Logging
 ''' </summary>
 <TestClass()> Public Class ConstructorUnitTest
     Private Shared _currentDirectoryLogPath = Path.Combine(Directory.GetCurrentDirectory(), "Log")
-    Private Shared _appdataDirectoryLogPath = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData), "Digital Data", "Modules.Logging")
+    Private Shared _appdataDirectoryLogPath = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData), "Digital Data", "Modules.Logging", "Log")
     Private Shared _customDirectoryLogPath = Path.Combine(Directory.GetCurrentDirectory(), "CustomLogFolder")
     Private Shared _restrictedDirectoryLogPath = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.System), "ShouldNotBeCreated")
     Private Shared _nonsenseDirectoryLogPath = "X:\FOO\BAR\BAZ\QUUX"
 
     <TestMethod()> Public Sub TestConstructorCurrentDirectory()
-        Dim oLogConfig As New LogConfig(LogConfig.PathType.CurrentDirectory)
-
-        Assert.AreEqual(_currentDirectoryLogPath, oLogConfig.LogDirectory)
+        Assert.ThrowsException(Of ArgumentException)(Sub()
+                                                         Dim oLogConfig As New LogConfig(LogConfig.PathType.Temp)
+                                                     End Sub)
     End Sub
 
     <TestMethod()> Public Sub TestConstructorApplicationDirectory()
-        Dim oLogConfig As New LogConfig(LogConfig.PathType.AppData)
+        Dim oLogConfig As New LogConfig(LogConfig.PathType.AppData, Nothing, Nothing, "Digital Data", "Modules.Logging")
 
         Assert.AreEqual(_appdataDirectoryLogPath, oLogConfig.LogDirectory)
     End Sub