# HG changeset patch
# User Matthias Goergens <matthias.goergens@xxxxxxxxxx>
# Date 1272293888 -3600
# Node ID 7db08a326938ecc231f58afdc8f69718c98e4b8b
# Parent  bc1d3f2ac83a28c07fef4a63105a314043b65c82
Extended a comment in stdext/stringext.ml

Signed-off-by: Matthias Goergens <Matthias.Goergens@xxxxxxxxxx>

diff -r bc1d3f2ac83a -r 7db08a326938 stdext/stringext.ml
--- a/stdext/stringext.ml
+++ b/stdext/stringext.ml
@@ -89,7 +89,7 @@
 		concat "" (fold_right aux string [])
 
 (** Take a predicate and a string, return a list of strings separated by
-runs of characters where the predicate was true *)
+runs of characters where the predicate was true (excluding those characters from the result) *)
 let split_f p str =
 	let not_p = fun x -> not (p x) in
 	let rec split_one p acc = function