Fix i-nex.gambas --gen_report

Fix Unity Support Test

src/i-nex/.src/FReport_Gen.class

@@ -18,6 +18,9 @@ Public Sub Button1_Click()
  Reportm._generate(CheckBox1.Value, CheckBox2.Value, CheckBox3.Value, CheckBox4.Value, ButtonBox1.Text)
  Reportm.desktop_support(CheckBox10.Value, ButtonBox1.Text)
  Reportm.include(CheckBox6.Value, CheckBox7.Value, CheckBox8.Value, CheckBox9.Value, ButtonBox1.Text)
+ If (Application.Args[1] = "--gen_report") Then
+  Finfosys.Close
+ Endif
  Me.Close
  Endif
 End
@@ -33,7 +36,9 @@ Public Sub ButtonBox1_Click()
 End
 
 Public Sub Button2_Click()
-
+ If (Application.Args[1] = "--gen_report") Then
+  Finfosys.Close
+ Endif
  Me.Close
 
 End

src/i-nex/.src/Reportm.module

@@ -312,6 +312,7 @@ Public Sub include(lspci As Boolean, lsusb As Boolean, scsi As Boolean, dmesg As
 End
 
 Public Sub desktop_support(unity As Boolean, save_dir As String)
+  If unity = True Then
   TextInfo("Include Unity Support Test")
   Shell "echo '' >>" & save_dir & ""
   Wait 0.1
@@ -333,6 +334,7 @@ Public Sub desktop_support(unity As Boolean, save_dir As String)
   Wait 0.1
   PBV(1)
   TextInfo("Include Unity Support Test... ... ... ... Done")
+  Endif
 End
 
 

src/i-nex/.src/Start_App_Args.class

@@ -7,6 +7,8 @@ Public Sub Form_Open()
    Me.Close
   Endif
   If (Application.Args[1] = "--gen_report") Then
+   Finfosys.Show
+   Finfosys.Hide
    FReport_Gen.Show
    Me.Close
   Endif