nortega/pacundo
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Simplify get_pkgmgr() subroutine.

Browse Source 
Currently it only is configured to deal with pacman or yay (as noted in
the comment). Other AUR helpers would need to be configured.

Signed-off-by: Nicolás Ortega Froysa <nicolas@ortegas.org>
This commit is contained in:
Nicolás A. Ortega Froysa 2024-03-28 10:45:24 +01:00
parent aa7e2d2fbc
commit 615f491433
1 changed files with 6 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
pacundo.pl
View File

@ -137,6 +137,8 @@ $n, $tx->{action}, $tx->{pkg_name}
return @sel_undo;
}
# NOTE: Currently this subroutine only works for pacman and yay. You'll have to
# add options for additional AUR helpers.
sub get_pkgmgr() {
my $mgr = $ENV{DEFAULT_PKGMGR} // 'pacman';
my $mgr_bin = `which $mgr 2>&1`;
@ -146,18 +148,13 @@ sub get_pkgmgr() {
exit 1;
}
my $mgr_cmd_search = "$mgr_bin -Ss";
my $mgr_cmd_install_remote = "$mgr_bin -S";
my $mgr_cmd_install_local = "$mgr_bin -U";
my $mgr_cmd_remove = "$mgr_bin -R";
my %pkgmgr = (
name => $mgr,
bin => $mgr_bin,
search => $mgr_cmd_search,
install_remote => $mgr_cmd_install_remote,
install_local => $mgr_cmd_install_local,
remove => $mgr_cmd_remove,
search => "$mgr_bin -Ss",
install_remote => "$mgr_bin -S",
install_local => "$mgr_bin -U",
remove => "$mgr_bin -R",
);
return \%pkgmgr;