diff options
| author | Joe <bousset.rudy@gmail.com> | 2022-07-28 16:41:46 +0200 |
|---|---|---|
| committer | Joe <bousset.rudy@gmail.com> | 2022-07-28 16:41:46 +0200 |
| commit | 3e8f0c71297ef8a0168ed2df98f373daaac8ed75 (patch) | |
| tree | 062fb6a892afc9be874f7dcd167f6062d53a7c6e /.local/bin | |
| parent | compat (diff) | |
| download | dotfiles-bsd-3e8f0c71297ef8a0168ed2df98f373daaac8ed75.tar.gz dotfiles-bsd-3e8f0c71297ef8a0168ed2df98f373daaac8ed75.tar.bz2 dotfiles-bsd-3e8f0c71297ef8a0168ed2df98f373daaac8ed75.tar.xz dotfiles-bsd-3e8f0c71297ef8a0168ed2df98f373daaac8ed75.tar.zst dotfiles-bsd-3e8f0c71297ef8a0168ed2df98f373daaac8ed75.zip | |
CDE
Diffstat (limited to '.local/bin')
| -rwxr-xr-x | .local/bin/dmlog | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/.local/bin/dmlog b/.local/bin/dmlog index 9be8cf6..786d59b 100755 --- a/.local/bin/dmlog +++ b/.local/bin/dmlog @@ -3,12 +3,13 @@ use strict; use warnings; use constant { - SLOCK_PATH => 'slock', - ACPI_PATH => 'acpiconf', - KILL_PATH => 'killall', - SHUTDOWN_PATH => 'shutdown', - NOTIF_PATH => 'notify-send', - EMACS_PATH => 'emacsclient' + SLOCK_PATH => 'slock', + XSCREENSAVER_PATH => 'xscreensaver-command', + ACPI_PATH => 'acpiconf', + KILL_PATH => 'killall', + SHUTDOWN_PATH => 'shutdown', + NOTIF_PATH => 'notify-send', + EMACS_PATH => 'emacsclient' }; use constant LIST => [ 'Lock screen', @@ -46,12 +47,12 @@ sub action chomp $var; if ($var eq ${+LIST}[0]) { - exec(SLOCK_PATH); + exec(XSCREENSAVER_PATH, '-lock'); } elsif ($var eq ${+LIST}[1]) { $pid = fork(); if (not $pid) { - exec(SLOCK_PATH); + exec(XSCREENSAVER_PATH, '-lock'); } else { system( |