Reformulate an error

(so the error message given by "perl -M" is a bit more
meaningful, as Jarkko pointed out)

p4raw-id: //depot/perl@23465

1 files changed, 1 insertions, 1 deletions

diff --git a/perl.c b/perl.c
index 65b02a09c9..1525df222d 100644
--- a/perl.c
+++ b/perl.c
@@ -2678,7 +2678,7 @@ Perl_moreswitches(pTHX_ char *s)
 	    av_push(PL_preambleav, sv);
 	}
 	else
-	    Perl_croak(aTHX_ "No space allowed after -%c", *(s-1));
+	    Perl_croak(aTHX_ "Missing argument to -%c", *(s-1));
 	return s;
     case 'n':
 	PL_minus_n = TRUE;