[Emacs-diffs] Changes to emacs/lisp/newcomment.el

[Stefan Monnier]

Index: emacs/lisp/newcomment.el
diff -c emacs/lisp/newcomment.el:1.49 emacs/lisp/newcomment.el:1.50
*** emacs/lisp/newcomment.el:1.49       Tue Jun 18 13:58:18 2002
--- emacs/lisp/newcomment.el    Mon Aug 12 18:53:39 2002
***************
*** 865,872 ****
                    (>= (point) beg))
             (progn (goto-char end) (end-of-line) (skip-syntax-backward " ")
                    (<= (point) end))
!            (or (not (string= "" comment-end)) block)
!            (progn (goto-char beg) (search-forward "\n" end t)))))
  
      ;; don't add end-markers just because the user asked for `block'
      (unless (or lines (string= "" comment-end)) (setq block nil))
--- 865,872 ----
                    (>= (point) beg))
             (progn (goto-char end) (end-of-line) (skip-syntax-backward " ")
                    (<= (point) end))
!            (or block (not (string= "" comment-end)))
!            (or block (progn (goto-char beg) (search-forward "\n" end t))))))
  
      ;; don't add end-markers just because the user asked for `block'
      (unless (or lines (string= "" comment-end)) (setq block nil))