"lose the looses", from Abhijit Menon-Sen.

p4raw-id: //depot/perl@10979

1 files changed, 1 insertions, 1 deletions

diff --git a/gv.c b/gv.c
index 89b15e1277..86f48434a6 100644
--- a/gv.c
+++ b/gv.c
@@ -447,7 +447,7 @@ Perl_gv_autoload4(pTHX_ HV *stash, const char *name, STRLEN len, I32 method)
          * pass along the same data via some unused fields in the CV
          */
         CvSTASH(cv) = stash;
-        SvPVX(cv) = (char *)name; /* cast to loose constness warning */
+        SvPVX(cv) = (char *)name; /* cast to lose constness warning */
         SvCUR(cv) = len;
         return gv;
     }