From 9ce4f10eeda968206bdf591b0a64a95fa41f1411 Mon Sep 17 00:00:00 2001 From: joe Date: Tue, 30 Sep 2025 17:54:44 +0200 Subject: up --- .local/bin/dmbookm | 12 ++---------- 1 file changed, 2 insertions(+), 10 deletions(-) (limited to '.local/bin/dmbookm') diff --git a/.local/bin/dmbookm b/.local/bin/dmbookm index dcd0e36..9190dca 100755 --- a/.local/bin/dmbookm +++ b/.local/bin/dmbookm @@ -4,11 +4,8 @@ use strict; use warnings; use Sys::Hostname; -# debug -use Data::Dumper; - use constant { - BROWSER => '/bin/firefox', + BROWSER => 'surf', HOSTNAME => (split /\./, hostname())[0] }; @@ -47,7 +44,6 @@ sub main my $choice; my $url; my $pid; - my $prefix; my $list; my $color; @@ -55,10 +51,6 @@ sub main if (@ARGV == 1) { $color = $ARGV[0]; } - $prefix = '/usr'; - if (HOSTNAME eq "mars") { - $prefix += '/local'; - } for (sort keys %{LIST()}) { $list .= $_ . "\n"; } @@ -69,7 +61,7 @@ sub main chomp $choice; $pid = fork(); if (not $pid) { - exec($prefix . BROWSER, LIST->{$choice}); + exec(BROWSER, LIST->{$choice}); } return; } -- cgit v1.2.3