From: Dave Love <fx@gnu.org>
Date: Mon, 27 Sep 1999 11:34:27 +0000 (+0000)
Subject: (scan_lisp_file): Fix typo causing infloop.
X-Git-Tag: emacs-pretest-21.0.90~6621
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7e6972e92c437bf98a74c36b34d0f43dde90ecf3;p=emacs.git

(scan_lisp_file): Fix typo causing infloop.
---

diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c
index 849ff25397e..3045dc305f2 100644
--- a/lib-src/make-docfile.c
+++ b/lib-src/make-docfile.c
@@ -629,7 +629,7 @@ scan_lisp_file (filename, mode)
 	  continue;
 	}
       /* Skip the line break.  */
-      while (c == '\n' || c != '\r')
+      while (c == '\n' || c == '\r')
 	c = getc (infile);
       /* Detect a dynamic doc string and save it for the next expression.  */
       if (c == '#')