Gestione scrittura nome configurazione nel fil DDF

DdfFile.vb

@@ -63,7 +63,8 @@ Friend Module DdfFile
       DdfFileContent.Add("#EGTDOORCREATOR")
       Dim Config As String = IniFile.m_sDoorsDirPath
       Config = Path.GetFileName(Config)
-      DdfFileContent.Add("#Config: " & Config)
+      ' versione 2.7d1: non esiste un sottodirettorio di Doors allora non stampo il nome della configurazione
+      If Config <> "Doors" Then DdfFileContent.Add("#Config: " & Config)
       ' versione 2.6g1: salvo il nome del template da cui è genetato il file corrente
       If Not String.IsNullOrEmpty(Map.refAssemblyManagerVM.CurrProject.SelAssemblyName.OrigTemplate) Then
          DdfFileContent.Add("#OrigTemplate: " & Map.refAssemblyManagerVM.CurrProject.SelAssemblyName.OrigTemplate)

MainWindow/MainWindowModel.vb

@@ -71,8 +71,8 @@ Friend Class MainWindowModel
          EgtSetLockId(sLockId)
       End If
       ' Recupero livello e opzioni della chiave
-      Dim bKey As Boolean = EgtGetKeyLevel(3279, 2703, 1, IniFile.m_nKeyLevel) And
-                            EgtGetKeyOptions(3279, 2703, 1, IniFile.m_nKeyOptions)
+      Dim bKey As Boolean = EgtGetKeyLevel(3279, 2704, 1, IniFile.m_nKeyLevel) And
+                            EgtGetKeyOptions(3279, 2704, 1, IniFile.m_nKeyOptions)
       ' Leggo e imposto livello utilizzatore
       IniFile.m_nUserLevel = Math.Min(IniFile.m_nKeyLevel, GetMainPrivateProfileInt(S_GENERAL, K_USERLEVEL, 1))
       'Inizializzazione generale di EgtInterface

My Project/AssemblyInfo.vb

@@ -72,5 +72,5 @@ Imports System.Windows
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.7.3.4")>
-<Assembly: AssemblyFileVersion("2.7.3.4")>
+<Assembly: AssemblyVersion("2.7.4.1")>
+<Assembly: AssemblyFileVersion("2.7.4.1")>