diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-11-30 22:16:51 +0200 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2002-12-02 15:43:16 +0000 |
| commit | e297595301ee5f3b0643be0fb1fffae9b6b548a0 (patch) | |
| tree | 180f2d7e6d134e4213582d3b546ed42908da3da8 /mg.c | |
| parent | 1a67fee7d910c67790fff4a69f2f20f7628aa80a (diff) | |
| download | perl-e297595301ee5f3b0643be0fb1fffae9b6b548a0.tar.gz | |
$0 mofifying part I
Subject: [PATCH] $0 modifying
Message-ID: <20021130181651.GA5876@kosh.hut.fi>
p4raw-id: //depot/perl@18229
Diffstat (limited to 'mg.c')
| -rw-r--r-- | mg.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -2207,6 +2207,7 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg) break; #ifndef MACOS_TRADITIONAL case '0': + LOCK_DOLLARZERO_MUTEX; #ifdef HAS_SETPROCTITLE /* The BSDs don't show the argv[] in ps(1) output, they * show a string from the process struct and provide @@ -2286,6 +2287,7 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg) for (i = 1; i < PL_origargc; i++) PL_origargv[i] = Nullch; } + UNLOCK_DOLLARZERO_MUTEX; break; #endif } |