I found that current bugfix (commit 1014296344a75fa08e0a8814e4fbbd767e7eba4c) brought new bugs.

Step to reproduce:

1. Set these variables.

(setq org-src-content-indentation 4)

(setq org-src-preserve-indentation nil)

2. Try to comment some lines in a source block. For example, line foo and bar.

#+begin_src emacs-lisp
    (setq foo 1)
    (setq bar 2)
    (setq buz 3)
#+end_src

Expected:

#+begin_src emacs-lisp
    ;; (setq foo 1)
    ;; (setq bar 2)
    (setq buz 3)
#+end_src

Got:

#+begin_src emacs-lisp
    ;; (setq foo 1)
    ;; (setq bar 2)
    ;; (setq bu
          z 3)
#+end_src

Then I found that there is a problem in function `org-comment-or-uncomment-region` in lisp/org.el.

in func `org-comment-or-uncomment-region` :

#+begin_src emacs-lisp

(let ((offset (- end beg)))
    (save-excursion
      (goto-char beg)
      (org-babel-do-in-edit-buffer
       (comment-or-uncomment-region (point) (+ offset (point))))))
#+end_src

the value of `offset` is wrong, it became `Expected_Value + Org_Src_Indent * Lines_To_Comment`, in the example which is 8 chars more than expected.


Thanks.



Reply via email to