190930

2019-09-30 16:18:53 +02:00
parent 7d884d7cba
commit 53f2a0666b
70 changed files with 2984 additions and 197 deletions
--- a/Pilz.Collections/SimpleHistory/SimpleHistory.vb
+++ b/Pilz.Collections/SimpleHistory/SimpleHistory.vb
@@ -32,15 +32,12 @@ Namespace SimpleHistory
            Dim ret As HistoryPoint

            If stackPast.Count > 0 Then
-
                Dim hp As HistoryPoint = stackPast.Pop
                hp.Undo()
                stackFuture.Push(hp)
                ret = hp
-
            Else
                ret = Nothing
-
            End If

            Return ret
@@ -53,15 +50,12 @@ Namespace SimpleHistory
            Dim ret As HistoryPoint

            If stackFuture.Count > 0 Then
-
                Dim hp As HistoryPoint = stackFuture.Pop
                hp.Redo()
                stackPast.Push(hp)
                ret = hp
-
            Else
                ret = Nothing
-
            End If

            Return ret