From 3073990aa250a294a1f0fbeb1a9126a024ff4cfb Mon Sep 17 00:00:00 2001 From: Lucien Cartier-Tilet Date: Sun, 28 May 2023 16:32:30 +0200 Subject: [PATCH] [StumpWM] Update functions for when I am at work --- org/config/stumpwm.org | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/org/config/stumpwm.org b/org/config/stumpwm.org index fdfc399..0a6a496 100644 --- a/org/config/stumpwm.org +++ b/org/config/stumpwm.org @@ -331,11 +331,16 @@ To save the current desktop, I can write a wrapper around #+end_src Basically the same goes for loading the desktop layout, but this time -it’s ~restore-from-file~ that’s wrapped. +it’s ~restore-from-file~ that’s wrapped. I also want to launch Global +Protect at the same time, because I always forget to before launching +~launch-work~ described below, and automatically connect my bluetooth +headset. #+begin_src lisp (defcommand at-work () () "Restore desktop layout when at work." - (restore-from-file *my/desktop-dump-file*)) + (restore-from-file *my/desktop-dump-file*) + (run-shell-command "gpclient") + (run-shell-command "bluetoothctl power on && bluetoothctl connect 14:3F:A6:6D:E3:D9")) #+end_src If I want to quickly launch all programs I will need, I can also