Adjust some typos from vms merge, and remove some elements we don't want to include...

[wget] / src / ftp-basic.c

diff --git a/src/ftp-basic.c b/src/ftp-basic.c
index 0e11a8d3353a66d9385373dd47ea81be0e6690ad..8d3342c0c73acee808bbd48215871d5978d470dd 100644 (file)
--- a/src/ftp-basic.c
+++ b/src/ftp-basic.c
@@ -889,42 +889,6 @@ ftp_cwd (int csock, const char *dir)
   return FTPOK;
 }
 
-/* Sends DELE command to the FTP server.  */
-uerr_t
-ftp_dele (int csock, const char *file)
-{
-  char *request, *respline;
-  int nwritten;
-  uerr_t err;
-
-  /* Send DELE request.  */
-  request = ftp_request ("DELE", file);
-  nwritten = fd_write (csock, request, strlen (request), -1.0);
-  if (nwritten < 0)
-    {
-      xfree (request);
-      return WRITEFAILED;
-    }
-  xfree (request);
-  /* Get appropriate response.  */
-  err = ftp_response (csock, &respline);
-  if (err != FTPOK)
-    return err;                 /* Return with early bad status. */
-
-  /* All OK, so far.  */
-  if (*respline == '5')
-    {
-      err = FTPNSFOD;           /* Permanent Negative Completion. */
-    }
-  else if (*respline != '2')    /* Success might be 226 or 250 (or ???). */
-    {
-      err = FTPRERR;            /* Not Positive Completion. */
-    }
-
-  xfree (respline);             /* Free "respline" storage. */
-  return err;                   /* Return response-based status code. */
-}
-
 /* Sends REST command to the FTP server.  */
 uerr_t
 ftp_rest (int csock, wgint offset)