diff options
Diffstat (limited to 'test')
| -rwxr-xr-x | test/feh-bg.i | 3 | ||||
| -rwxr-xr-x | test/feh-scr.i | 2 | ||||
| -rwxr-xr-x | test/feh.i | 2 | ||||
| -rw-r--r-- | test/feh.t | 3 | 
4 files changed, 6 insertions, 4 deletions
| diff --git a/test/feh-bg.i b/test/feh-bg.i index e7b2f0b..3624f5c 100755 --- a/test/feh-bg.i +++ b/test/feh-bg.i @@ -10,7 +10,7 @@ use Time::HiRes qw/sleep/;  my ($pid_xnest, $pid_twm); -$ENV{XDG_CONFIG_HOME} = "/tmp/feh-test-$$"; +$ENV{HOME} = 'test';  sub set_bg {  	my ($mode, $file) = @_; @@ -76,3 +76,4 @@ kill(15, $pid_xnest);  sleep(0.2);  unlink("/tmp/feh_${$}.png"); +unlink('test/.fehbg'); diff --git a/test/feh-scr.i b/test/feh-scr.i index 9f6d804..9696c9e 100755 --- a/test/feh-scr.i +++ b/test/feh-scr.i @@ -16,7 +16,7 @@ my ($width, $height);  my $pwd = getcwd();  my $test_id = 0; -$ENV{XDG_CONFIG_HOME} = "/tmp/feh-test-$$"; +$ENV{HOME} = 'test';  sub waitfor(&) {  	my ($sub) = @_; @@ -12,7 +12,7 @@ my $win;  my ($width, $height);  my $pwd = getcwd(); -$ENV{XDG_CONFIG_HOME} = "/tmp/feh-test-$$"; +$ENV{HOME} = 'test';  sub waitfor(&) {  	my ($sub) = @_; @@ -4,7 +4,8 @@ use warnings;  use 5.010;  use Test::Command tests => 48; -$ENV{XDG_CONFIG_HOME} = "/tmp/feh-test-$$"; +$ENV{HOME} = 'test'; +  my $feh = "src/feh";  my $images = 'test/ok/gif test/ok/jpg test/ok/png test/ok/pnm '             . 'test/fail/gif test/fail/jpg test/fail/png test/fail/pnm'; | 
