diff options
| author | Hans Mulder <hansmu@xs4all.nl> | 1998-07-13 05:54:19 -0700 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-14 03:59:56 +0000 |
| commit | b6e4eeb25bf158956744a31fd6f457268f1a58af (patch) | |
| tree | fdc4a6b99bf5c2b30ed9350077ddbef565750846 /vms/munchconfig.c | |
| parent | 4e83e45193a4b31061c369233abb3560d500834e (diff) | |
| download | perl-b6e4eeb25bf158956744a31fd6f457268f1a58af.tar.gz | |
Fixes to the VMS configuration system
Message-Id: <3.0.5.32.19980713125419.009e0100@ous.edu>
p4raw-id: //depot/perl@1475
Diffstat (limited to 'vms/munchconfig.c')
| -rw-r--r-- | vms/munchconfig.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/vms/munchconfig.c b/vms/munchconfig.c index 714cab7ea5..58c7e7c097 100644 --- a/vms/munchconfig.c +++ b/vms/munchconfig.c @@ -125,10 +125,11 @@ main(int argc, char *argv[]) /* And another over the leading ', which better be there */ *TempValue++ = '\0'; - /* Check to see if there's a trailing '. If not, add a newline to the */ - /* buffer and grab another line. */ + /* Check to see if there's a trailing ' or ". If not, add a newline to + the buffer and grab another line. */ TempLength = strlen(TempValue); - while (TempValue[TempLength-1] != '\'') { + while ((TempValue[TempLength-1] != '\'') && + (TempValue[TempLength-1] != '"')) { fgets(SecondaryLineBuffer, LINEBUFFERSIZE - 1, ConfigSH); /* Force a trailing null, just in case */ SecondaryLineBuffer[LINEBUFFERSIZE - 1] = '\0'; |