[CONFIGURATION]
* NEW: When installing a component entirely written in Gambas, automatically remove possible existing old shared library files. [DEVELOPMENT ENVIRONMENT] * NEW: Don't display an error message when a newly inserted file cannot be automatically opened. git-svn-id: svn://localhost/gambas/trunk@6794 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
parent
4edd14b3db
commit
ace44916a2
@ -319,7 +319,9 @@ Private Sub CreateFile() As Boolean
|
||||
Case "text"
|
||||
|
||||
File.Save($sDir &/ sName, "")
|
||||
Inc FMain.NoMessage
|
||||
Project.InsertFile(sName, $sDir)
|
||||
Dec FMain.NoMessage
|
||||
|
||||
Case "html"
|
||||
|
||||
@ -456,9 +458,12 @@ Private Sub ImportFile() As Boolean
|
||||
Project.InsertSource(sName, "class", $sDir, File.SetExt(sTemp, "class"), True, True, chkLink.Value)
|
||||
Project.InsertSource(sName, "webpage", $sDir, sTemp, False, False, chkLink.Value)
|
||||
|
||||
Default
|
||||
Case Else
|
||||
|
||||
Inc FMain.NoMessage
|
||||
sName = Project.GetUniqueName($sDir, sName)
|
||||
Project.InsertFile(sName, $sDir, sTemp,, chkLink.Value)
|
||||
Dec FMain.NoMessage
|
||||
|
||||
End Select
|
||||
|
||||
@ -480,6 +485,7 @@ Public Sub btnOK_Click()
|
||||
|
||||
Catch
|
||||
|
||||
FMain.NoMessage = 0
|
||||
FMain.ShowError(("Cannot add file.") & "\n\n" & Error.Text & "\n" & Error.Where)
|
||||
|
||||
End
|
||||
|
@ -19,6 +19,7 @@ install-exec-local:
|
||||
$(DESTDIR)$(bindir)/gba$(GAMBAS_VERSION); \
|
||||
rm -rf .gambas; \
|
||||
echo "Installing $$p..."; \
|
||||
rm -f $(DESTDIR)$(gblibdir)/$$p.so $(DESTDIR)$(gblibdir)/$$p.so.* $(DESTDIR)$(gblibdir)/$$p.la \
|
||||
$(INSTALL) $$p.gambas $(DESTDIR)$(gblibdir); \
|
||||
$(INSTALL) .component $(DESTDIR)$(gblibdir)/$$p.component; \
|
||||
chmod a-x $(DESTDIR)$(gblibdir)/$$p.component; \
|
||||
|
Loading…
x
Reference in New Issue
Block a user