diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-10-05 21:04:13 +0200 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2009-10-05 21:07:34 +0200 |
commit | 9f28b43c85ae4811b0768bb37378b21550f27c7d (patch) | |
tree | 21ead8c28946695c198f0b2027599f2f4383787a /perl.c | |
parent | 2dc296d24d23e7bc6c24e294afa31fe89ea1e548 (diff) | |
download | perl-9f28b43c85ae4811b0768bb37378b21550f27c7d.tar.gz |
In Perl_moreswitches(), merge 2 string constants in the code implementing -v.
Diffstat (limited to 'perl.c')
-rw-r--r-- | perl.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -3224,9 +3224,8 @@ Perl_moreswitches(pTHX_ const char *s) #endif PerlIO_printf(PerlIO_stdout(), "\nThis is perl, %"SVf - " built for %s", - level, - ARCHNAME); + " built for " ARCHNAME, + level); SvREFCNT_dec(level); } #else /* DGUX */ |