Skip to content

Commit

Permalink
Fix bug _init() change to _inits()
Browse files Browse the repository at this point in the history
  • Loading branch information
eloaders committed Feb 13, 2012
1 parent e9db81f commit 5b48743
Show file tree
Hide file tree
Showing 6 changed files with 17 additions and 25 deletions.
16 changes: 8 additions & 8 deletions src/i-nex/.settings
Original file line number Diff line number Diff line change
Expand Up @@ -16,24 +16,24 @@ SearchString=True

[OpenFile]
File[1]=".src/Finfosys.form"
File[2]=".src/Finfosys.class:581.0"
Active=2
File[2]=".src/Finfosys.class:7.29"
File[3]=".src/Global.class:111.36"
File[4]=".src/About.form"
File[5]=".src/About.class:63.30"
File[6]=".src/distrodetect.class:41.7"
File[7]=".src/battery.module:73.30"
File[8]=".src/Disk_Drives.module:36.12"
File[7]=".src/battery.module:24.17"
File[8]=".src/Disk_Drives.module:31.17"
File[9]=".src/ScreenShot.form"
File[10]=".src/ScreenShot.class:8.10"
File[11]=".src/ScreenShotM.module:2.21"
File[12]=".src/USB_Drives.module:28.30"
File[12]=".src/USB_Drives.module:11.17"
File[13]=".src/Asound_Drives.module:36.32"
File[14]=".src/HWmon_coretemp.module:3.18"
File[15]=".src/Input_Devices.module:36.27"
File[16]=".src/Reportm.module:343.34"
File[15]=".src/Input_Devices.module:6.17"
File[16]=".src/Reportm.module:342.74"
File[17]=".src/FReport_Gen.form"
Active=18
File[18]=".src/FReport_Gen.class:9.1"
File[18]=".src/FReport_Gen.class:75.6"
File[19]=".src/Start_App_Args.form"
File[20]=".src/Start_App_Args.class:3.25"
File[21]=".src/ChkPrm.module:14.3"
Expand Down
2 changes: 1 addition & 1 deletion src/i-nex/.src/Disk_Drives.module
Original file line number Diff line number Diff line change
Expand Up @@ -29,7 +29,7 @@ Public max_segment_size As String
Public read_ahead_kb As String
Public scheduler As String

Public Sub _init()
Public Sub _inits()
Dim sdx As String
Dim Avail_HDD As Integer
Dim Max_HDD As Integer
Expand Down
18 changes: 5 additions & 13 deletions src/i-nex/.src/Finfosys.class
Original file line number Diff line number Diff line change
Expand Up @@ -5,17 +5,17 @@ Public Sub Form_Open()
Dim cpuz0, cpuz1, cpuz2, cpuz3, cpuz4, cpuz5, cpuz6, cpuz7, cpuz8, cpuz9, cpuz10, cpuz11 As String
Finfosys.TabStrip1[9].Visible = False
Debug "Check for Battery"
Object.Call(battery, "_init")
Object.Call(battery, "_inits")
Debug "Check for Usb device plugged"
Object.Call(USB_Drives, "_init")
Object.Call(USB_Drives, "_inits")
Debug "Check for Drives"
Object.Call(Disk_Drives, "_init")
Object.Call(Disk_Drives, "_inits")
Debug "Check for Drives.."
Object.Call(Disk_Drives, "_init_2")
Debug "Check for Drives...."
Object.Call(Disk_Drives, "get_informations")
Debug "Check for Input Drives"
Object.Call(Input_Devices, "_init")
Object.Call(Input_Devices, "_inits")
Debug "Check for default display manager"
If default_display_manager = True Then
Label4.Visible = True
Expand Down Expand Up @@ -324,14 +324,8 @@ Public Sub Wykrywanie_procesorow()
Shell "grep 'cpu cores' /proc/cpuinfo | sed -n '" & eloaders & "' | cut -d ':' -f 2" Wait To cpu_cores
Shell "grep 'physical id' /proc/cpuinfo | sed -n '" & eloaders & "' | cut -d ':' -f 2" Wait To physical_id

TextBox29.Alignment = 1
TextBox31.Alignment = 1
TextBox29.Text = cpu
TextBox29.Text = Replace(TextBox29.Text, "\n", "")
'New
'TextArea1.Text = cpu
'TextArea1.Text = Replace(TextArea1.Text, "\n", "")
'new
level3cache = Replace(level3cache, "\n", "")
physical_id = Replace(physical_id, "\n", "")
cpu_cores = Replace(cpu_cores, "\n", "")
Expand Down Expand Up @@ -364,8 +358,6 @@ Public Sub Wykrywanie_procesorow()
End

Public Sub Button2_Click()
' Exec ["gnome-screenshot", "-w"]
' Debug "Running Gnome Screenshot"
ScreenShotM.pic = Desktop.Screenshot(Me.X, Me.Y, Me.W, Me.H + 30)
ScreenShot.Show

Expand Down Expand Up @@ -481,7 +473,7 @@ End

Public Sub Button10_Click()

Object.Call(battery, "_init")
Object.Call(battery, "_inits")
Debug "Battery initial"
End

Expand Down
2 changes: 1 addition & 1 deletion src/i-nex/.src/Input_Devices.module
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@ Public Name As String
Public Phys As String
Public Modalias As String

Public Sub _init()
Public Sub _inits()

Dim ListAllDiscs, risultato As String
Dim righe As New String[]
Expand Down
2 changes: 1 addition & 1 deletion src/i-nex/.src/USB_Drives.module
Original file line number Diff line number Diff line change
Expand Up @@ -9,7 +9,7 @@ Public idProduct As String
Public idVendor As String
Public lsusb As String

Public Sub _init()
Public Sub _inits()
Dim ListAllDiscs, risultato As String
Dim righe As New String[]
Dim count As Integer
Expand Down
2 changes: 1 addition & 1 deletion src/i-nex/.src/battery.module
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@ Public cal_max As Float
Public cal As Float


Public Sub _init()
Public Sub _inits()
If Exist("/proc/acpi/battery/BAT0", True) Then
addres_battery = "/proc/acpi/battery/BAT0/info"
addres_battery_2 = "/proc/acpi/battery/BAT0/state"
Expand Down

0 comments on commit 5b48743

Please sign in to comment.