diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2021-09-01 07:27:21 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2021-09-01 07:27:21 -0700 |
commit | 9272b1d59ac9f7fbe05e4fd19a1a28b180732235 (patch) | |
tree | b8a53e7ad602b6807e19c9645d3438123ac42795 | |
parent | f9aa0087fa02bba51d030c7adb3d33929608e9ef (diff) | |
download | txr-9272b1d59ac9f7fbe05e4fd19a1a28b180732235.tar.gz txr-9272b1d59ac9f7fbe05e4fd19a1a28b180732235.tar.bz2 txr-9272b1d59ac9f7fbe05e4fd19a1a28b180732235.zip |
tags: process only files in repo.
* libtags.txr: use git ls-files instead of glob to
obtain list of .c files. This also means that we go into
subdirectories now, since git ls-files '*.c' lists items like
linenoise/linenoise.c and chksums/md5.c. For now, we are not
finding any new tags in these places, but in the future that
could change.
-rwxr-xr-x | libtags.txr | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libtags.txr b/libtags.txr index 3410c8c9..6639ad0e 100755 --- a/libtags.txr +++ b/libtags.txr @@ -314,7 +314,8 @@ @;; However, if we ever need to do it, we could add the tags in question @;; to another hash table and replace the _f variables in question as soon @;; as we found suitable candidates. -@(next :list (cons "lib.c" (remqual "lib.c" (glob "*.c")))) +@(next :list (cons "lib.c" (remqual "lib.c" + (command-get-lines "git ls-files '*.c'")))) @(repeat) @ file.c @ (get-file-ix-tags `@file.c`) |