From f09d47769022a0eeebc63e1678d60832a8c43b73 Mon Sep 17 00:00:00 2001 From: John Date: Tue, 4 Jun 2019 20:31:47 +0200 Subject: formatting --- dwim | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/dwim b/dwim index 6e9ce00..c2a992b 100755 --- a/dwim +++ b/dwim @@ -11,11 +11,13 @@ use subs qw/path env handle fail arguments/; my ($phrase, %o) = arguments "usage: $0 parse\n", 1, d => 0; $phrase = `xsel -o` if not defined $phrase; -my @LAUNCHER = split /\s/, env(OPENER => "urxvtc -e"); -my @EDITOR = split /\s/, env(EDITOR => "vi"); -my @MAILER = split /\s/, env(MAILER => "mutt"); -my @MAILDIR_VIEWER = split /\s/, env(MAILDIR_VIEWER => "mutt -f"); -my $MAILROOT = env(MAILROOT => "/home/john/mail/"); +my @LAUNCHER = split /\s/, env OPENER => "urxvtc -e"; +my @EDITOR = split /\s/, env EDITOR => "vi"; +my @MAILER = split /\s/, env MAILER => "mutt"; +my @BROWSER = split /\s/, env BROWSER => "firefox"; +my @FILE_BROWSER = split /\s/, env FILE_BROWSER => "ranger"; +my @MAILDIR_VIEWER = split /\s/, env MAILDIR_VIEWER => "mutt -f"; +my $MAILROOT = env MAILROOT => "/home/john/mail/"; our $handler; -- cgit v1.2.3