diff options
author | Bart Schaefer <schaefer@zsh.org> | 2024-03-14 13:11:31 -0700 |
---|---|---|
committer | Bart Schaefer <schaefer@zsh.org> | 2024-03-14 13:11:31 -0700 |
commit | 326e8635fe01239ddf14c09785eeca2394e32b95 (patch) | |
tree | 3a9d42b2360ba0535871a99103285c4aa964616b /Src | |
parent | 21fe2dce441116e90a6611527f1fcbccdc97a856 (diff) | |
download | zsh-326e8635fe01239ddf14c09785eeca2394e32b95.tar.gz zsh-326e8635fe01239ddf14c09785eeca2394e32b95.tar.xz zsh-326e8635fe01239ddf14c09785eeca2394e32b95.zip |
52752: typeset -p fixes for local exports and "export -x" / "readonly -r" output.
Diffstat (limited to 'Src')
-rw-r--r-- | Src/params.c | 21 |
1 files changed, 18 insertions, 3 deletions
diff --git a/Src/params.c b/Src/params.c index 973df3fe5..f65aa1e80 100644 --- a/Src/params.c +++ b/Src/params.c @@ -6044,6 +6044,7 @@ printparamnode(HashNode hn, int printflags) { Param p = (Param) hn; Param peer = NULL; + int altname = 0; if (!(p->node.flags & PM_HASHELEM) && !(printflags & PRINT_WITH_NAMESPACE) && *(p->node.nam) == '.') @@ -6089,16 +6090,26 @@ printparamnode(HashNode hn, int printflags) if (printflags & PRINT_POSIX_EXPORT) { if (!(p->node.flags & PM_EXPORTED)) return; + altname = 'x'; printf("export "); } else if (printflags & PRINT_POSIX_READONLY) { if (!(p->node.flags & PM_READONLY)) return; + altname = 'r'; printf("readonly "); - } else if (locallevel && p->level >= locallevel) { - printf("typeset "); /* printf("local "); */ } else if ((p->node.flags & PM_EXPORTED) && !(p->node.flags & (PM_ARRAY|PM_HASHED))) { - printf("export "); + if (p->level && p->level >= locallevel) + printf("local "); + else { + altname = 'x'; + printf("export "); + } + } else if (locallevel && p->level >= locallevel) { + if (p->node.flags & PM_EXPORTED) + printf("local "); + else + printf("typeset "); /* printf("local "); */ } else if (locallevel) { printf("typeset -g "); } else @@ -6112,6 +6123,10 @@ printparamnode(HashNode hn, int printflags) for (pmptr = pmtypes, i = 0; i < PMTYPES_SIZE; i++, pmptr++) { int doprint = 0; + + if (altname && altname == pmptr->typeflag) + continue; + if (pmptr->flags & PMTF_TEST_LEVEL) { if (p->level) { /* |