@@ -690,13 +690,13 @@ module String where
690690
691691 foreign import indexOfS "function indexOfS(s1) {\
692692 \ return function(s2) {\
693− \ return s2.indexOf(s2);\
693+ \ return s1.indexOf(s2);\
694694 \ }; \
695695 \}" :: String -> String -> Number
696696
697697 foreign import lastIndexOfS "function lastIndexOfS(s1) {\
698698 \ return function(s2) {\
699− \ return s2.lastIndexOf(s2);\
699+ \ return s1.lastIndexOf(s2);\
700700 \ };\
701701 \}" :: String -> String -> Number
702702