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

Version control: check more editors for filling the EDITOR environment variable.

Browse source 
[DEVELOPMENT ENVIRONMENT]
* NEW: Version control: check more editors for filling the EDITOR environment variable.
This commit is contained in:
Benoît Minisini 2022-11-05 11:56:10 +01:00
parent f877f08906
commit c2a14230ed
1 changed files with 9 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
app/src/gambas3/.src/VersionControl/VersionControl.module
View file

@ -50,21 +50,24 @@ End
Private Sub GetTextEditor() As String
Dim aProg As String[]
Dim sProg As String
If Desktop.Is("kde4") Or If Desktop.Is("kde5") Then
sProg = "kwrite"
aProg = ["kwrite"]
Else If Desktop.Is("xfce") Then
sProg = "mousepad"
aProg = ["mousepad"]
Else If Desktop.Is("lxde") Then
sProg = "leafpad"
aProg = ["leafpad"]
Else If Desktop.Is("mate") Then
sProg = "pluma"
aProg = ["pluma"]
Else
sProg = "gedit"
aProg = ["gnome-text-editor", "gedit"]
Endif
For Each sProg In [sProg, "kwrite", "kate", "gedit", "emacs"]
aProg.Insert(["kwrite", "kate", "gnome-text-editor", "gedit", "editor", "emacs", "vim"])
For Each sProg In aProg
If System.Exist(sProg) Then Return sProg
Next