From 06b8ce39d8b2c38b3cc17fbc5e58d7c3d4e62c08 Mon Sep 17 00:00:00 2001
From: Dario Sassi <dario.s@egaltech.com>
Date: Wed, 13 Dec 2017 10:57:53 +0000
Subject: [PATCH] =?UTF-8?q?EgtDOORCreator=201.8l5=20:=20-=20eliminata=20cl?=
 =?UTF-8?q?asse=20AboutBoxVM=20perch=C3=A8=20inutile.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 AboutBoxWindow/AboutBoxVM.vb | 62 ------------------------------------
 EgtDOORCreator.vbproj        |  1 -
 My Project/AssemblyInfo.vb   |  4 +--
 3 files changed, 2 insertions(+), 65 deletions(-)
 delete mode 100644 AboutBoxWindow/AboutBoxVM.vb

diff --git a/AboutBoxWindow/AboutBoxVM.vb b/AboutBoxWindow/AboutBoxVM.vb
deleted file mode 100644
index c46b237..0000000
--- a/AboutBoxWindow/AboutBoxVM.vb
+++ /dev/null
@@ -1,62 +0,0 @@
-Imports System.ComponentModel
-
-
-Public Class AboutBoxVM
-   Implements INotifyPropertyChanged
-   'Inherits VModelBase
-
-   Private m_AboutBoxVisibility As Visibility
-   Public Property AboutBoxVisibility As Visibility
-      Get
-         Return m_AboutBoxVisibility
-      End Get
-      Set(value As Visibility)
-         If value <> m_AboutBoxVisibility Then
-            m_AboutBoxVisibility = value
-            NotifyPropertyChanged("AboutBoxVisibility")
-         End If
-      End Set
-   End Property
-   ' Definizione comandi
-   Private m_cmdClose As ICommand
-
-#Region "COMMANDS"
-
-#Region "CloseCommand"
-
-   ''' <summary>
-   ''' Returns a command that do Point.
-   ''' </summary>
-   Public ReadOnly Property CloseCommand As ICommand
-      Get
-         If m_cmdClose Is Nothing Then
-            m_cmdClose = New Command(AddressOf Close, AddressOf CanClose)
-         End If
-         Return m_cmdClose
-      End Get
-   End Property
-
-   ''' <summary>
-   ''' Execute the Point.  This method is invoked by the PointCommand.
-   ''' </summary>
-   Public Sub Close(ByVal param As Object)
-      AboutBoxVisibility = Visibility.Hidden
-   End Sub
-
-   ''' <summary>
-   ''' Returns always true.
-   ''' </summary>
-   Private Function CanClose(ByVal param As Object) As Boolean
-      Return True
-   End Function
-
-#End Region ' CloseCommand
-
-#End Region    ' Commands
-
-   Public Event PropertyChanged As PropertyChangedEventHandler Implements INotifyPropertyChanged.PropertyChanged
-
-   Public Sub NotifyPropertyChanged(propName As String)
-      RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs(propName))
-   End Sub
-End Class
diff --git a/EgtDOORCreator.vbproj b/EgtDOORCreator.vbproj
index d322bfa..9ca96c8 100644
--- a/EgtDOORCreator.vbproj
+++ b/EgtDOORCreator.vbproj
@@ -109,7 +109,6 @@
     <Compile Include="AboutBoxWindow\AboutBoxV.xaml.vb">
       <DependentUpon>AboutBoxV.xaml</DependentUpon>
     </Compile>
-    <Compile Include="AboutBoxWindow\AboutBoxVM.vb" />
     <Compile Include="AssemblyManager\AssemblyName.vb" />
     <Compile Include="Assembly\PartDoor.vb" />
     <Compile Include="Command\Command.vb" />
diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb
index c298d11..95f6266 100644
--- a/My Project/AssemblyInfo.vb	
+++ b/My Project/AssemblyInfo.vb	
@@ -72,5 +72,5 @@ Imports System.Windows
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("1.8.12.4")> 
-<Assembly: AssemblyFileVersion("1.8.12.4")> 
+<Assembly: AssemblyVersion("1.8.12.5")> 
+<Assembly: AssemblyFileVersion("1.8.12.5")>