From f74ffb50e9a2709539275a8b1fae43004e32e473 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Thu, 16 Jun 2011 00:15:00 +0200 Subject: ekgping: Only call dist_file if no beep file was specified --- bin/ekgping | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/bin/ekgping b/bin/ekgping index 43981a0..e7c5764 100755 --- a/bin/ekgping +++ b/bin/ekgping @@ -23,7 +23,7 @@ my $dead_count = 0; my $column = 0; my $column_max = Term::Size::chars; -my $beep_file = dist_file( 'ekgping', 'beep.ogg' ); +my $beep_file; my $quiet = 0; GetOptions( @@ -34,6 +34,8 @@ GetOptions( ) or usage(); +$beep_file //= dist_file( 'ekgping', 'beep.ogg' ); + my $host = shift or usage(); my @ping_opts = @ARGV; my $mixer = SDL::Mixer->new(); -- cgit v1.2.3