diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2022-05-14 16:39:34 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-05-14 16:40:22 -0700 |
commit | 17c92766ceac0099c100ed13c265fb9c208e2c1f (patch) | |
tree | 29d3ffa981ae58d91943d8a2e4ed4c2127712a9f /scripts | |
parent | fd61aa3f4d2d802085b0b37f7340b4c63b14d820 (diff) | |
download | dotfiles-17c92766ceac0099c100ed13c265fb9c208e2c1f.tar.gz |
add bindings to move container to workspace and also go there
Diffstat (limited to 'scripts')
-rwxr-xr-x | scripts/desktop/fresh-workspace | 10 | ||||
-rwxr-xr-x | scripts/desktop/sway-ftp-master | 2 |
2 files changed, 10 insertions, 2 deletions
diff --git a/scripts/desktop/fresh-workspace b/scripts/desktop/fresh-workspace index e04e8338..de369569 100755 --- a/scripts/desktop/fresh-workspace +++ b/scripts/desktop/fresh-workspace @@ -2,4 +2,12 @@ use lib "$ENV{HOME}/src/dotfiles/perl5"; use Local::Desktop; -exit !defined fresh_workspace grep $_ eq "--send", @ARGV +exit !defined fresh_workspace do { + if (grep $_ eq "--take", @ARGV) { + go => 1, send => 1; + } elsif (grep $_ eq "--send", @ARGV) { + send => 1; + } else { + go => 1; + } +} diff --git a/scripts/desktop/sway-ftp-master b/scripts/desktop/sway-ftp-master index 699934af..3e6fa5e4 100755 --- a/scripts/desktop/sway-ftp-master +++ b/scripts/desktop/sway-ftp-master @@ -53,7 +53,7 @@ if (marked_exists "dak") { system "ssh", "ftp-master.debian.org", "pgrep", "-u", "spwhitton", "emacs", "||", "ssh", "ftp-master.debian.org", "emacs", "--daemon", "&"; - my $first = fresh_workspace() // die "no fresh workspace"; + my $first = fresh_workspace(go => 1) // die "no fresh workspace"; fork // die "couldn't fork" or exec "foot", "--override=locked-title=yes", |