diff options
author | Matthew Lemon <y@yulqen.org> | 2024-05-26 09:13:38 +0100 |
---|---|---|
committer | Matthew Lemon <y@yulqen.org> | 2024-05-26 09:13:38 +0100 |
commit | bde34d4979749439079b3b615ee73bf2bec4bfc1 (patch) | |
tree | a50903732c63270df12a42b14f672ccfb30d4c88 | |
parent | 4949c305ba1e3be17524063dcb87e59108cfca3d (diff) |
Fixes old path to journal notes
-rw-r--r-- | journal/get_journal_tags.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/journal/get_journal_tags.pl b/journal/get_journal_tags.pl index 713babf..e6f47d3 100644 --- a/journal/get_journal_tags.pl +++ b/journal/get_journal_tags.pl @@ -3,7 +3,7 @@ use warnings; my @tags; -foreach my $fn (glob "~/Notes/journal/*.md") { +foreach my $fn (glob "~/Documents/Notes/journal/home/*.md") { open my $FH, "<", $fn or die "Cannot open $fn"; while (<$FH>) { while (/(\s:[A-Z]\w+)/g) { @@ -12,6 +12,7 @@ foreach my $fn (glob "~/Notes/journal/*.md") { } } +# This just ensures the tags are unique my %truetags = map { $_, 1 } @tags; my @trutags = keys %truetags; print @trutags, "\n"; |