1 files changed, 1 insertions, 1 deletions
diff --git a/pad.c b/pad.c
index fc66b303b0..c0e7a5b619 100644
--- a/pad.c
+++ b/pad.c
@@ -386,7 +386,7 @@ Perl_pad_add_name(pTHX_ const char *name, HV* typestash, HV* ourstash, bool fake
 
 Allocate a new my or tmp pad entry. For a my, simply push a null SV onto
 the end of PL_comppad, but for a tmp, scan the pad from PL_padix upwards
-for a slot which has no name and and no active value.
+for a slot which has no name and no active value.
 
 =cut
 */