diff options
-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"; |