luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

[DEVELOPMENT ENVIRONMENT]

Browse source 
* BUG: Try to handle when a project file has disappeared without being 
  noticed by the IDE.


git-svn-id: svn://localhost/gambas/trunk@4215 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2011-10-24 15:35:17 +00:00
parent 13e89c798a
commit 3cb1789157
4 changed files with 4859 additions and 5004 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
app/src/gambas3/.lang/.pot
View file

@ -344,7 +344,7 @@ msgstr ""
msgid "Data"
msgstr ""
#: CRecentFile.class:69 FMain.class:535
#: CRecentFile.class:69 FMain.class:542
msgid "Today"
msgstr ""
@ -711,7 +711,7 @@ msgstr ""
msgid "Fields"
msgstr ""
#: FConnectionEditor.form:213 FMain.class:1805
#: FConnectionEditor.form:213 FMain.class:1816
msgid "Add"
msgstr ""
@ -2528,55 +2528,59 @@ msgstr ""
msgid "Cannot delete file or directory"
msgstr ""
#: FMain.class:556
#: FMain.class:238
msgid "File or directory does not exist anymore."
msgstr ""
#: FMain.class:563
msgid "Sort history"
msgstr ""
#: FMain.class:560 FOpenProject.form:111 FWelcome.form:35
#: FMain.class:567 FOpenProject.form:111 FWelcome.form:35
msgid "Sort by date"
msgstr ""
#: FMain.class:560 FOpenProject.form:120 FWelcome.form:42
#: FMain.class:567 FOpenProject.form:120 FWelcome.form:42
msgid "Sort by name"
msgstr ""
#: FMain.class:560 FOpenProject.form:128 FWelcome.form:48
#: FMain.class:567 FOpenProject.form:128 FWelcome.form:48
msgid "Sort by path"
msgstr ""
#: FMain.class:571
#: FMain.class:578
msgid "&Clear history"
msgstr ""
#: FMain.class:740
#: FMain.class:747
msgid "New folder"
msgstr ""
#: FMain.class:807
#: FMain.class:818
msgid ""
"The GNU translation tools are not installed on your system.\n"
"\n"
"Please install them to be able to do the translation."
msgstr ""
#: FMain.class:1401
#: FMain.class:1412
msgid "Unable to drop file into the project."
msgstr ""
#: FMain.class:1521
#: FMain.class:1532
msgid ""
"All backup or generated files will be removed from the project directory."
msgstr ""
#: FMain.class:1521
#: FMain.class:1532
msgid "Clean"
msgstr ""
#: FMain.class:1703
#: FMain.class:1714
msgid "To show the menu bar again, hit the following keys:<p><b>&1</b>"
msgstr ""
#: FMain.class:1805
#: FMain.class:1816
msgid "Do you really want to add this file to the repository?"
msgstr ""

BIN
app/src/gambas3/.lang/fr.mo
View file

Binary file not shown.

9818
app/src/gambas3/.lang/fr.po
View file

File diff suppressed because it is too large Load diff

13
app/src/gambas3/.src/FMain.class
View file

@ -233,6 +233,13 @@ Public Sub tvwProject_Menu()
If $sKey = Project.KEY_CONNECTION Or If Project.IsConnectionPath($sKey) Then
mnuDatabase.Popup
Else
If Left($sKey) <> "$" And If Not Exist($sKey) Then
Message.Warning($sKey & "\n\n" & ("File or directory does not exist anymore."))
Project.Refresh
Return
Endif
mnuPopup.Popup
Endif
'mnuPopup.Enabled = FALSE
@ -757,7 +764,9 @@ Private Function CanEdit(sPath As String) As Boolean
If Not sPath Then Return
If Left$(sPath) = "$" Then Return
Return Not IsDir(sPath)
Catch
End
Private Function CanDelete(sPath As String) As Boolean
@ -767,6 +776,8 @@ Private Function CanDelete(sPath As String) As Boolean
If Stat(sPath).Type = gb.Link Then Return True
If Project.IsReadOnly(sPath) Then Return False
If tvwProject[sPath].Count = 0 Then Return True
Catch
End