From f0c5812f1ed3c87f89ab84a69a67f0e4eae58d5c Mon Sep 17 00:00:00 2001 From: Oliver Kiddle Date: Tue, 18 Dec 2001 16:05:01 +0000 Subject: 16364: further to 16351, except specials from having their value set to null --- Src/params.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'Src') diff --git a/Src/params.c b/Src/params.c index f71b8338d..bff3d25a2 100644 --- a/Src/params.c +++ b/Src/params.c @@ -2165,7 +2165,10 @@ stdunsetfn(Param pm, int exp) case PM_SCALAR: pm->sets.cfn(pm, NULL); break; case PM_ARRAY: pm->sets.afn(pm, NULL); break; case PM_HASHED: pm->sets.hfn(pm, NULL); break; - default: pm->u.str = NULL; break; + default: + if (!(pm->flags & PM_SPECIAL)) + pm->u.str = NULL; + break; } pm->flags |= PM_UNSET; } -- cgit 1.4.1