modules
/
nutools
10
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

pff: bug origext

This commit is contained in:
Jephté Clain 2021-03-26 22:02:56 +04:00
parent 4607f0f3c2
commit 3d54e3771d
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
pff
View File

@ -838,11 +838,12 @@ function new_cmd() {
local fnsrc0="$workdir/nsrc0" fosrc0="$workdir/osrc0"
>"$fnsrc0"
>"$fosrc0"
find "$srcdir" -type f | awkrun ORIGEXTS[@] prefix="$srcdir/" fnsrc="$fnsrc0" fosrc="$fosrc0" '{
find "$srcdir" -type f | awkrun -f ORIGEXTS[@] prefix="$srcdir/" fnsrc="$fnsrc0" fosrc="$fosrc0" '{
found = 0
for (i = 1; i <= ORIGEXTS_count; i++) {
sub("^" prefix, "")
if ($0 ~ ORIGEXTS[i] "(/|$)") {
re_origext = qregexp(ORIGEXTS[i]) "(/|$)"
if ($0 ~ re_origext) {
print >fosrc
found = 1
break
@ -966,11 +967,12 @@ function new_cmd() {
csort "$fosrc0" >"$fosrc"
>"$flsrc"
>"$flosrc"
awkrun <"$fosrc0" ORIGEXTS[@] flsrc="$flsrc" flosrc="$flosrc" '{
<"$fosrc0" awkrun -f ORIGEXTS[@] flsrc="$flsrc" flosrc="$flosrc" '{
for (i = 1; i <= ORIGEXTS_count; i++) {
if ($0 ~ ORIGEXTS[i] "(/|$)") {
re_origext = qregexp(ORIGEXTS[i]) "(/|$)"
if ($0 ~ re_origext) {
orig = $0
local = gensub(ORIGEXTS[i] "(/|$)", "\\1", 1, $0)
local = gensub(re_origext, "\\1", 1, $0)
print local ":" orig >flosrc
print local >flsrc
break