dan/eufon
1
0
Fork 0
Code Issues Pull Requests Releases Activity

saturn: Add desktop file ID to properties

Browse Source
This commit is contained in:
Samuel Dionne-Riel 2022-01-25 00:42:25 -05:00 committed by Daniel Barlow
parent 168f4c5793
commit 4f82010ab0
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
saturn/main.fnl
View File

@ -157,6 +157,7 @@
vals (. parsed "Desktop Entry")] vals (. parsed "Desktop Entry")]
(when vals.Icon (when vals.Icon
(tset vals "IconImage" (find-icon vals.Icon))) (tset vals "IconImage" (find-icon vals.Icon)))
(tset vals "ID" (f:sub 0 -9))
vals)) vals))
(fn current-user-home [] (fn current-user-home []