# HG changeset patch
# User Robert J. Chassell <bob@rattlesnake.com>
# Date 651526629 0
# Node ID ef6cee0af549bf694ede24f1c0bb9bdfe40556c8
# Parent  9ebfcd47de5951284a2b16e784bf97e71b91938d
*** empty log message ***

diff -r 9ebfcd47de59 -r ef6cee0af549 lisp/=ftp.el
--- a/lisp/=ftp.el	Thu Aug 16 17:48:19 1990 +0000
+++ b/lisp/=ftp.el	Fri Aug 24 19:37:09 1990 +0000
@@ -244,7 +244,7 @@
 	    ((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 ()