mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: Call update-desktop-database with incorrect path

Browse source
This commit is contained in:
Alexander Koblov 2021-01-05 14:09:30 +00:00
commit d07fe5ada8
1 changed files with 7 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

12
src/platform/unix/mime/umimeactions.pas
View file

@ -558,6 +558,7 @@ end;
function AddDesktopEntry(const MimeType, DesktopEntry: String; DefaultAction: Boolean): Boolean;
var
Value: String;
Args: TStringArray;
CustomFile: String;
UserDataDir: String;
DesktopFile: TIniFileEx;
@ -584,13 +585,14 @@ var
begin
CustomFile:= DesktopEntry;
UserDataDir:= GetUserDataDir;
mbForceDirectory(UserDataDir + '/applications');
UserDataDir:= GetUserDataDir + '/applications';
if (StrEnds(DesktopEntry, '.desktop') = False) then
begin
mbForceDirectory(UserDataDir);
// Create new desktop entry file for user command
CustomFile:= 'dc_' + ExtractFileName(DesktopEntry) + '_';
CustomFile:= UserDataDir + '/applications/' + CustomFile;
SplitCmdLine(CustomFile, Value, Args);
CustomFile:= 'dc_' + ExtractFileName(Value) + '_';
CustomFile:= UserDataDir + PathDelim + CustomFile;
CustomFile:= GetTempName(CustomFile) + '.desktop';
try
DesktopFile:= TIniFileEx.Create(CustomFile, fmCreate or fmOpenReadWrite);
@ -598,7 +600,7 @@ begin
DesktopFile.WriteBool(DESKTOP_GROUP, DESKTOP_KEY_NO_DISPLAY, True);
DesktopFile.WriteString(DESKTOP_GROUP, DESKTOP_KEY_EXEC, DesktopEntry);
DesktopFile.WriteString(DESKTOP_GROUP, DESKTOP_KEY_MIME_TYPE, MimeType);
DesktopFile.WriteString(DESKTOP_GROUP, DESKTOP_KEY_NAME, ExtractFileName(DesktopEntry));
DesktopFile.WriteString(DESKTOP_GROUP, DESKTOP_KEY_NAME, ExtractFileName(Value));
DesktopFile.WriteString(DESKTOP_GROUP, DESKTOP_KEY_TYPE, KEY_FILE_DESKTOP_TYPE_APPLICATION);
DesktopFile.UpdateFile;
finally