diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2018-04-30 21:22:34 -0700 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2018-04-30 21:22:34 -0700 |
| commit | d2262d743f156fcca499b0c1b1706717a686aaa2 (patch) | |
| tree | 8747cdd05e6e67aa5fd5151e0482f7d2cf2bdf43 /test/readdir0.awk | |
| parent | baf93ffee67e1a1cebe09b7db45f1f17d43390be (diff) | |
| parent | 9f5ec4e56b5e91b70c7f2148c6f3589453ab00f2 (diff) | |
| download | egawk-d2262d743f156fcca499b0c1b1706717a686aaa2.tar.gz egawk-d2262d743f156fcca499b0c1b1706717a686aaa2.tar.bz2 egawk-d2262d743f156fcca499b0c1b1706717a686aaa2.zip | |
Merge branch 'gawk-4.2-stable'
Diffstat (limited to 'test/readdir0.awk')
| -rw-r--r-- | test/readdir0.awk | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/test/readdir0.awk b/test/readdir0.awk index 2b7674a4..012826ed 100644 --- a/test/readdir0.awk +++ b/test/readdir0.awk @@ -1,7 +1,6 @@ # NOTE: This program is not a generalized parser for the output of 'ls'. # It's job is to read the output of ls from the gawk source code directory, -# where we know there are no symbolic links, nor are there files with -# spaces in their file names, etc. +# where we know there are no files with spaces in their file names, etc. BEGIN { # analyze results from readdir extension while ((getline x < extout) > 0) { @@ -32,7 +31,10 @@ BEGIN { type_let = substr($0, 1, 1) if (type_let == "-") type_let = "f" - type[$NF] = type_let + if (type_let == "l") + type[$(NF-2)] = type_let + else + type[$NF] = type_let } close(longlist) |