hush: fix readonly2.tests failure

Signed-off-by: Denys Vlasenko <vda.linux@googlemail.com>

1 files changed, 11 insertions, 0 deletions

diff --git a/shell/hush.c b/shell/hush.c
index 55e581e16..f6da826d3 100644
--- a/shell/hush.c
+++ b/shell/hush.c
@@ -2287,7 +2287,18 @@ static struct variable *set_vars_and_save_old(char **strings)
                         if (var_pp) {
                                 var_p = *var_pp;
                                 if (var_p->flg_read_only) {
+                                        char **p;
                                         bb_error_msg("%s: readonly variable", *s);
+                                        /*
+                                         * "VAR=V BLTIN" unsets VARs after BLTIN completes.
+                                         * If VAR is readonly, leaving it in the list
+                                         * after asssignment error (msg above)
+                                         * causes doubled error message later, on unset.
+                                         */
+                                        debug_printf_env("removing/freeing '%s' element\n", *s);
+                                        free(*s);
+                                        p = s;
+                                        do { *p = p[1]; p++; } while (*p);
                                         goto next;
                                 }
                                 /* Remove variable from global linked list */