# HG changeset patch # User Stefan Monnier # Date 1002926271 0 # Node ID 71f93e4101151d04b92afdce74fdc892aa4b4aa9 # Parent 345caf35c534c972317386cc5578b2fe6a829abb (comment-region-internal): Don't rebind invisibility_spec now that the C routines handle it correctly. diff -r 345caf35c534 -r 71f93e410115 lisp/newcomment.el --- a/lisp/newcomment.el Fri Oct 12 22:31:23 2001 +0000 +++ b/lisp/newcomment.el Fri Oct 12 22:37:51 2001 +0000 @@ -5,7 +5,7 @@ ;; Author: code extracted from Emacs-20's simple.el ;; Maintainer: Stefan Monnier ;; Keywords: comment uncomment -;; Revision: $Id: newcomment.el,v 1.35 2001/09/27 21:13:44 monnier Exp $ +;; Revision: $Id: newcomment.el,v 1.36 2001/10/11 01:44:48 monnier Exp $ ;; This file is part of GNU Emacs. @@ -765,14 +765,7 @@ (unless (or ce (eolp)) (insert "\n") (indent-according-to-mode)) (comment-with-narrowing beg end (let ((min-indent (point-max)) - (max-indent 0) - ;; We rebind the invisibility spec because move-to-column - ;; skips invisible text. Only reveal ellipses. - (buffer-invisibility-spec - (if (listp buffer-invisibility-spec) - (mapcar (lambda (x) (if (cdr-safe x) t x)) - buffer-invisibility-spec) - buffer-invisibility-spec))) + (max-indent 0)) (goto-char (point-min)) ;; Quote any nested comment marker (comment-quote-nested comment-start comment-end nil)