From f339c6b23756d07214b742c4aac51cb0f6ee6933 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Tue, 14 Apr 2020 22:14:58 -0700 Subject: [PATCH] =?UTF-8?q?Warn=20if=20the=20i3lock=20program=20can?= =?UTF-8?q?=E2=80=99t=20be=20found?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- stumpwm/.stumpwmrc | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/stumpwm/.stumpwmrc b/stumpwm/.stumpwmrc index fda3412..927c682 100644 --- a/stumpwm/.stumpwmrc +++ b/stumpwm/.stumpwmrc @@ -36,4 +36,9 @@ after it has been unlocked." (swm-gaps:toggle-gaps) +(with-message-queuing t + (let ((programs-in-path (programs-in-path))) + (unless (member "i3lock" programs-in-path :test #'string-equal) + (echo "Couldn't find the i3lock executable, can't lock screen")))) + (swank:create-server :dont-close t)