tests: deepen all suites (37→87 checks, 0 failures, 100% pass)

lisp/system-diagnostics.lisp

@@ -200,6 +200,11 @@
       (setf (uiop:getenv "MEMEX_DIR") (or old-m ""))
       (setf (uiop:getenv "PASSEPARTOUT_DATA_DIR") (or old-d "")))))
 
+(test test-diagnostics-dependency-success
+  "When all binaries exist, diagnostics should pass."
+  (let ((passepartout::*diagnostics-binaries* '("ls")))
+    (is (eq t (diagnostics-dependencies-check)))))
+
 (defskill :passepartout-system-diagnostics
   :priority 100
   :trigger (lambda (ctx) (eq (getf (getf ctx :payload) :sensor) :heartbeat))