diff options
| author | H.Merijn Brand <h.m.brand@xs4all.nl> | 2009-05-20 16:45:36 +0200 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2009-05-20 16:45:36 +0200 |
| commit | ef595a33cf693d23c7caebc0a4299b55da3269cb (patch) | |
| tree | bc4dc7e7a884efb496f07ee9a49f3c83f3c3ab2d /sv.c | |
| parent | c0d1ef72496f6e5f671a8995c737e8b591725f59 (diff) | |
| download | perl-ef595a33cf693d23c7caebc0a4299b55da3269cb.tar.gz | |
fix glob-assign for FORMAT
Diffstat (limited to 'sv.c')
| -rw-r--r-- | sv.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -3692,6 +3692,7 @@ S_glob_assign_ref(pTHX_ SV *const dstr, SV *const sstr) goto common; case SVt_PVFM: location = (SV **) &GvFORM(dstr); + goto common; default: location = &GvSV(dstr); import_flag = GVf_IMPORTED_SV; |