From c9d11d9829168830b69127156c8d4cdd709de0cb Mon Sep 17 00:00:00 2001
From: Jaidyn Ann <10477760+JadedCtrl@users.noreply.github.com>
Date: Thu, 20 Apr 2023 17:10:50 -0500
Subject: [PATCH] Add Ping to the org.freedesktop.DBus.Peer interface (sorta)

---
 secrettabero.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/secrettabero.scm b/secrettabero.scm
index 3705498..da3ab7d 100644
--- a/secrettabero.scm
+++ b/secrettabero.scm
@@ -124,7 +124,8 @@
 ;; `introspect-interface-sxml`-compliant format.
 (define *peer-interface*
   '("org.freedesktop.DBus.Peer"
-	. (("GetMachineId"
+	. (("Ping" . ())
+	   ("GetMachineId"
 		. (((direction . "out")
 			(type . "s")
 			(name . "machine_uuid")))))))