[svn] Use new function to test filename for common html suffixes.

[wget] / src / retr.c

diff --git a/src/retr.c b/src/retr.c
index 36eb3481885c14addd46d2a08bd9f8e33d3f3209..c35dde110483a482fae8bf8b673d3e2ab725cb66 100644 (file)
--- a/src/retr.c
+++ b/src/retr.c
@@ -384,12 +384,11 @@ retrieve_url (const char *origurl, char **file, char **newloc,
 
       /* There is a possibility of having HTTP being redirected to
         FTP.  In these cases we must decide whether the text is HTML
-        according to the suffix.  The HTML suffixes are `.html' and
-        `.htm', case-insensitive.  */
+        according to the suffix.  The HTML suffixes are `.html',
+        `.htm' and a few others, case-insensitive.  */
       if (redirection_count && local_file && u->scheme == SCHEME_FTP)
        {
-         char *suf = suffix (local_file);
-         if (suf && (!strcasecmp (suf, "html") || !strcasecmp (suf, "htm")))
+         if (has_html_suffix_p (local_file))
            *dt |= TEXTHTML;
        }
     }