GUIs.ClipboardWatcher: Add error logging

GUIs.ClipboardWatcher/ProfileSearches.vb

@@ -43,10 +43,11 @@ Public Class ProfileSearches
                     End If
                 Catch ex As Exception
                     _Logger.Warn($"Could not initialize the AppServer: {ex.Message}")
+                    _Logger.Error(ex)
                 End Try
             End If
         Catch ex As Exception
-
+            _Logger.Error(ex)
         End Try
     End Sub
 

Modules.Logging/LogConfig.vb

@@ -250,6 +250,9 @@ Public Class LogConfig
         LogDirectory = _basePath
         LogFile = GetCurrentLogFilePath()
 
+        Dim oLogger = GetLogger()
+        oLogger.Info("Logging started for [{0}{1}] in [{2}]", oProductName, logFileSuffix, LogFile)
+
         ' Clear old Logfiles as defined in `FileKeepInterval`
         ClearOldLogfiles(FileKeepRangeInDays)
     End Sub

Modules.Logging/My Project/AssemblyInfo.vb

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("2.4.3.0")>
+<Assembly: AssemblyVersion("2.4.4.0")>
-<Assembly: AssemblyFileVersion("2.4.3.0")>
+<Assembly: AssemblyFileVersion("2.4.4.0")>