diff --git a/app/src/gambas3/.project b/app/src/gambas3/.project index 14321f815..bb0c78683 100644 --- a/app/src/gambas3/.project +++ b/app/src/gambas3/.project @@ -34,7 +34,7 @@ Component=gb.util.web Description="Integrated Development Environment for Gambas" Authors="Benoît Minisini\nFabien Bodard\nCharlie Reinl\nJosé Luis Redrejo\nRobert Rowe\nTobias Boege" Arguments=[["-L"],["-t","/home/benoit/gambas/git/master/app/src/gambas3"],["--help"]] -Environment=" GB_NO_JIT=1\nGB_GUI=gb.qt5\n GTK_DEBUG=interactive" +Environment=" GB_NO_JIT=1\nGB_GUI=gb.qt5\n GTK_DEBUG=interactive\nLANGUAGE=it_IT.UTF-8\nLANG=it_IT.UTF-8\nLC_ALL=it_IT.UTF-8" TabSize=2 Translate=1 Language=en diff --git a/app/src/gambas3/.src/Debug/Design.module b/app/src/gambas3/.src/Debug/Design.module index 9d6cccbba..62c8b23d8 100644 --- a/app/src/gambas3/.src/Debug/Design.module +++ b/app/src/gambas3/.src/Debug/Design.module @@ -1000,7 +1000,7 @@ Private Sub Start(sCmd As String) Dim hCopyProcess As Process Dim sFifo As String Dim sRemoteDebuggerHelper As String - Dim iCurrentArg As Variant + Dim iCurrentArg As Integer If Project.Running Then Return diff --git a/app/src/gambas3/.src/Debug/FDebugInfo.form b/app/src/gambas3/.src/Debug/FDebugInfo.form index 7f14e7c67..2bcde8087 100644 --- a/app/src/gambas3/.src/Debug/FDebugInfo.form +++ b/app/src/gambas3/.src/Debug/FDebugInfo.form @@ -66,7 +66,7 @@ AutoResize = True { picProcessMemory PictureBox MoveScaled(0,0,4,4) - Picture = Picture.Load("icon:/small/cpu") + Picture = Picture.Load("icon:/small/statistics") Alignment = Align.Center } { lblProcessMemory Label diff --git a/app/src/gambas3/.src/Help/FTips.class b/app/src/gambas3/.src/Help/FTips.class index 45174f407..136380bb3 100644 --- a/app/src/gambas3/.src/Help/FTips.class +++ b/app/src/gambas3/.src/Help/FTips.class @@ -66,7 +66,7 @@ Private Function GetNextTip(Optional bPrev As Boolean) As String iPos = InStr(sLang, "_") If iPos Then sLang = Left$(sLang, iPos - 1) - sFile = "tips/tips." & sLang + sFile = "tips/tips." & sLang & ".txt" Endif Endif If Not Exist(sFile) Then