From 6a6e859a93e0b5eb714c2bc4770bfef871e34ebd Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 6 Dec 2005 22:10:07 +0000 Subject: (edebug-skip-whitespace): read1:lread.c says that comments end at \n, regardless of selective-display. --- lisp/emacs-lisp/edebug.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index 765548083b5..01f1d760109 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -733,8 +733,7 @@ already is one.)" ;; Leave point before the next token, skipping white space and comments. (skip-chars-forward " \t\r\n\f") (while (= (following-char) ?\;) - ;; \r is counted as a comment terminator to support selective display. - (skip-chars-forward "^\n\r") ; skip the comment + (skip-chars-forward "^\n") ; skip the comment (skip-chars-forward " \t\r\n\f"))) -- cgit v1.2.3