*** empty log message ***

diff --git a/lisp/ftp.el b/lisp/ftp.el
index 402ef12c37130f56fec34da36234840e7ff1f900..c7d7b7e59df6c80be780fbcc5d6f8d6e59ad44ff 100644 (file)
--- a/lisp/ftp.el
+++ b/lisp/ftp.el
@@ -244,7 +244,7 @@ USER and PASSWORD are defaulted from the values used when
            ((looking-at ignore)
             (forward-line 1))
            ((not (search-forward "\n" nil t))
-            ;; the way asynchronous process-output fucks with (point)
+            ;; the way asynchronous process-output works with (point)
             ;;  is really really disgusting.
             (setq p (point))
             (condition-case ()