diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-01-04 20:46:17 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-01-04 20:46:17 +0000 |
| commit | 76df47578dba2a9fdfb9999a2625aa04b4cf475a (patch) | |
| tree | e6580823d607daf7d0f9de24eb1e1f706999b3a1 /ext/Storable | |
| parent | 73614538961af03d34893e87252f7f9225d9fcdd (diff) | |
| download | perl-76df47578dba2a9fdfb9999a2625aa04b4cf475a.tar.gz | |
Typo in #8312 when manually applying a problematic patch fragment.
p4raw-id: //depot/perl@8319
Diffstat (limited to 'ext/Storable')
| -rw-r--r-- | ext/Storable/Storable.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Storable/Storable.xs b/ext/Storable/Storable.xs index 366a301361..9378001cc4 100644 --- a/ext/Storable/Storable.xs +++ b/ext/Storable/Storable.xs @@ -675,7 +675,7 @@ static char magicstr[] = "pst0"; /* Used as a magic number */ #define GETMARK(x) do { \ if (!cxt->fio) \ MBUF_GETC(x); \ -! else if ((int) (x = PerlIO_getc(cxt->fio)) == EOF) \ + else if ((int) (x = PerlIO_getc(cxt->fio)) == EOF) \ return (SV *) 0; \ } while (0) |