diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2022-10-18 12:48:33 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-10-18 12:48:42 -0700 |
commit | 5d05def545d7788c4181f841382ec38c8fcfc6fc (patch) | |
tree | dd6627cb07a7fa8db3e680b1aae68a037fdf87b7 | |
parent | bf3742fd3b5fa912511705f44d29d57a2ba1795f (diff) | |
download | dotfiles-5d05def545d7788c4181f841382ec38c8fcfc6fc.tar.gz |
src-unregister: update for advent of lib-src/mr/config
-rwxr-xr-x | bin/src-unregister | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/bin/src-unregister b/bin/src-unregister index 40abce0d..751ccddf 100755 --- a/bin/src-unregister +++ b/bin/src-unregister @@ -35,10 +35,13 @@ system "src-register-all"; die "src-register-all failed\n" unless ($? == 0); my @known_repos; -open my $fh, "<", "$ENV{HOME}/.mrconfig"; -while (<$fh>) { - if (/^\[(src\/.+)\]$/) { - push @known_repos, catfile($ENV{HOME}, $1); +for my $f ("$ENV{HOME}/.mrconfig", + "$ENV{HOME}/src/dotfiles/lib-src/mr/config") { + open my $fh, "<", $f; + while (<$fh>) { + if (/^\[(src\/.+)\]$/) { + push @known_repos, catfile($ENV{HOME}, $1); + } } } |