@@ -477,10 +477,18 @@
 	    [s[0] isEqual: @"asd foo asd foofoo asd"] &&
 	    (s[0] = [OFMutableString stringWithString: @"XX"]) &&
 	    R([s[0] replaceOccurrencesOfString: @"X"
 				    withString: @"XX"]) &&
 	    [s[0] isEqual: @"XXXX"])
+
+	TEST(@"-[replaceOccurrencesOfString:withString:inRange:]",
+	    (s[0] = [OFMutableString stringWithString:
+	    @"foofoobarfoobarfoo"]) &&
+	    R([s[0] replaceOccurrencesOfString: @"oo"
+				    withString: @"óò"
+				       inRange: of_range(2, 15)]) &&
+	    [s[0] isEqual: @"foofóòbarfóòbarfoo"])
 
 	TEST(@"-[deleteLeadingWhitespaces]",
 	    (s[0] = [OFMutableString stringWithString: whitespace[0]]) &&
 	    R([s[0] deleteLeadingWhitespaces]) &&
 	    [s[0] isEqual: @"asd  \t \t\t\r\n"] &&