diff --git a/2.10/Source/Main.dfm b/2.10/Source/Main.dfm index ae17299..49e9302 100644 --- a/2.10/Source/Main.dfm +++ b/2.10/Source/Main.dfm @@ -2899,7 +2899,6 @@ object MainForm: TMainForm Caption = 'Variation' object mnuVRandom: TMenuItem Caption = 'Random' - Checked = True GroupIndex = 2 RadioItem = True ShortCut = 122 diff --git a/2.10/Source/Main.pas b/2.10/Source/Main.pas index 1e11a29..3cc230f 100644 --- a/2.10/Source/Main.pas +++ b/2.10/Source/Main.pas @@ -42,7 +42,7 @@ const RS_XO = 2; RS_VO = 3; - AppVersionString = 'Apophysis 2.08 beta 2 pre6+'; + AppVersionString = 'Apophysis 2.08 beta 2'; type TMouseMoveState = (msUsual, msZoomWindow, msZoomOutWindow, msZoomWindowMove, @@ -4947,7 +4947,7 @@ end; procedure TMainForm.VariantMenuClick(Sender: TObject); begin - TMenuItem(Sender).Checked := True; + //TMenuItem(Sender).Checked := True; UpdateUndo; Variation := TVariation(TMenuItem(Sender).Tag); SetVariation(maincp);