From efdb836738fd45764a016e46c65cd2a3076c9cb6 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Thu, 22 Apr 2021 14:44:20 -0700 Subject: choose-wallpaper: in fact, just comment out X11 subroutine calls --- bin/choose-wallpaper | 10 +++------- 1 file changed, 3 insertions(+), 7 deletions(-) diff --git a/bin/choose-wallpaper b/bin/choose-wallpaper index 648c1a6b..892252d8 100755 --- a/bin/choose-wallpaper +++ b/bin/choose-wallpaper @@ -8,13 +8,11 @@ use lib "$ENV{HOME}/src/dotfiles/perl5"; use Local::Desktop; use File::Copy; -my $x11 = $ENV{XDG_SESSION_TYPE} && $ENV{XDG_SESSION_TYPE} eq "x11"; - # dirs where wallpaper can be found our @dirs = ("$ENV{HOME}/annex/wallpaper/pro"); if (@ARGV and $ARGV[0] eq "--check-have") { - ensure_resize_for_current_outputs if $x11; + # ensure_resize_for_current_outputs; exit !<"$ENV{HOME}/local/wallpaper??.*">; } @@ -28,10 +26,8 @@ if ($ARGV[0] eq "--random") { unshift @wallpapers, @ARGV; select_wallpaper_files @wallpapers; -if ($x11) { - resize_for_current_outputs; - system "i3-startup-always"; # feh and also restart i3lock -} +# resize_for_current_outputs; +# system "i3-startup-always"; # feh and also restart i3lock # now give develacc something if (-e "$ENV{HOME}/local/develacc") { -- cgit v1.2.3