i3status-anyevent: i3 uses xdg std for config dir path, so we too
This commit is contained in:
@@ -1,5 +1,7 @@
|
|||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
|
|
||||||
|
# TODO: on i3wm reload (i3status restart), restore active windows status
|
||||||
|
|
||||||
# we need to disable hash shuffling in order to make as less prints to stdout as possible
|
# we need to disable hash shuffling in order to make as less prints to stdout as possible
|
||||||
BEGIN {
|
BEGIN {
|
||||||
unless (defined $ENV{PERL_PERTURB_KEYS}) {
|
unless (defined $ENV{PERL_PERTURB_KEYS}) {
|
||||||
@@ -689,10 +691,16 @@ sub to_hours ($) {
|
|||||||
}
|
}
|
||||||
|
|
||||||
sub readconf () {
|
sub readconf () {
|
||||||
my $file = "$ENV{HOME}/.i3/i3status-anyevent.json";
|
my $i3dir = "$ENV{HOME}/.config/i3";
|
||||||
|
|
||||||
|
unless (-d $i3dir) {
|
||||||
|
$i3dir = "$ENV{HOME}/.i3";
|
||||||
|
}
|
||||||
|
|
||||||
|
my $file = "$i3dir/i3status-anyevent.json";
|
||||||
|
|
||||||
unless (-f $file) {
|
unless (-f $file) {
|
||||||
$file = "$ENV{HOME}/.i3/config.json";
|
$file = "$i3dir/config.json";
|
||||||
}
|
}
|
||||||
|
|
||||||
my $FH;
|
my $FH;
|
||||||
|
|||||||
Reference in New Issue
Block a user