[Tags] Add '-' argument to readtags to split options and the search string

This commit is contained in:
Junegunn Choi
2024-03-11 12:07:04 +09:00
parent 0b3e015ad8
commit e69f2dcdad

View File

@@ -10,7 +10,7 @@ foreach my $file (@ARGV) {
open $lines, $file;
} else {
# https://perldoc.perl.org/perlopentut#Expressing-the-command-as-a-list
open $lines, '-|', 'readtags', '-t', $file, '-e', '-p', $prefix;
open $lines, '-|', 'readtags', '-t', $file, '-e', '-p', '-', $prefix;
}
while (<$lines>) {
unless (/^\!/) {