/[emacs]/emacs/lisp/newcomment.el
ViewVC logotype

Diff of /emacs/lisp/newcomment.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.35.4.4 by monnier, Mon Mar 4 01:17:11 2002 UTC revision 1.35.4.5 by eliz, Thu May 16 16:01:24 2002 UTC
# Line 669  comment markers." Line 669  comment markers."
669                           (forward-line 1)                           (forward-line 1)
670                           (re-search-forward sre (line-end-position) t))                           (re-search-forward sre (line-end-position) t))
671                    (replace-match "" t t nil (if (match-end 2) 2 1)))))                    (replace-match "" t t nil (if (match-end 2) 2 1)))))
672              ;; Go the the end for the next comment.              ;; Go to the end for the next comment.
673              (goto-char (point-max)))))              (goto-char (point-max)))))
674        (set-marker end nil))))        (set-marker end nil))))
675    

Legend:
Removed from v.1.35.4.4  
changed lines
  Added in v.1.35.4.5

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26