[svn] Rewrite parsing and handling of URLs.

[wget] / src / cmpt.c

diff --git a/src/cmpt.c b/src/cmpt.c
index 4b4d68cb4b34e9bc3b76689f9f3ec258b2e113fa..bfc7b2c9ab06275ab043062187f5becd594fba43 100644 (file)
--- a/src/cmpt.c
+++ b/src/cmpt.c
@@ -205,6 +205,24 @@ ret0:
 }
 #endif /* not HAVE_STRSTR */
 
+#ifndef HAVE_STRPBRK
+/* Find the first ocurrence in S of any character in ACCEPT.  */
+char *
+strpbrk (const char *s, const char *accept)
+{
+  while (*s != '\0')
+    {
+      const char *a = accept;
+      while (*a != '\0')
+       if (*a++ == *s)
+         return (char *) s;
+      ++s;
+    }
+
+  return 0;
+}
+#endif /* HAVE_STRPBRK */
+
 #ifndef HAVE_MKTIME
 /* From GNU libc 2.0.  */