# HG changeset patch
# User Matthias Görgens <matthias.goergens@xxxxxxxxxx>
# Date 1268698898 0
# Node ID 32a8c736220d8795660b2a4a5cc2295945f0879d
# Parent  0d301fc13f242965c17ab18461d5c16787d26786
Extended a comment in stdext/stringext.ml

diff -r 0d301fc13f24 -r 32a8c736220d 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