From 4f82010ab09d29be8b41178786c617294e0218b2 Mon Sep 17 00:00:00 2001
From: Samuel Dionne-Riel <samuel@dionne-riel.com>
Date: Tue, 25 Jan 2022 00:42:25 -0500
Subject: [PATCH] saturn: Add desktop file ID to properties

---
 saturn/main.fnl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/saturn/main.fnl b/saturn/main.fnl
index b123b42..c30c47e 100644
--- a/saturn/main.fnl
+++ b/saturn/main.fnl
@@ -157,6 +157,7 @@
         vals (. parsed "Desktop Entry")]
     (when vals.Icon
       (tset vals "IconImage" (find-icon vals.Icon)))
+    (tset vals "ID" (f:sub 0 -9))
     vals))
 
 (fn current-user-home []