various little nits

p4raw-id: //depot/perl@3436

1 files changed, 1 insertions, 1 deletions

diff --git a/doop.c b/doop.c
index 4e5866e9c4..ec14a76ff4 100644
--- a/doop.c
+++ b/doop.c
@@ -665,7 +665,7 @@ do_join(register SV *sv, SV *del, register SV **mark, register SV **sp)
 	SvGROW(sv, len + 1);		/* so try to pre-extend */
 
 	mark = oldmark;
-	items = sp - mark;;
+	items = sp - mark;
 	++mark;
     }