ekgping: Only call dist_file if no beep file was specified

1 files changed, 3 insertions, 1 deletions

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();