GNU bug report logs - #34977
org-edit-src-code undesirable behaviour

Previous Next

Full log

View this message in rfc822 format

From: Nicolas Goaziou <mail <at> nicolasgoaziou.fr>
To: pinkanon pinkanon <pinkanon.pinkanon <at> yandex.ru>
Cc: 34977 <at> debbugs.gnu.org
Subject: bug#34977: org-edit-src-code undesirable behaviour
Date: Sun, 05 May 2019 12:24:57 +0200

Hello,

pinkanon pinkanon <pinkanon.pinkanon <at> yandex.ru> writes:

> There are two things that work undesirably for me when using org-edit-src-code:
> (1) With a selected region, the point in the edit buffer will be one line below the bottom of the selection.
> (2) After closing the edit buffer, if it was modified, the point jumps to the beginning of the block.
> (3) If I wanted to programmatically edit src code in the block, is calling 'org-edit-src-code the right way anyway? Because there seems to be some lag, besides the points mentioned above.
>
> Steps to reproduce:
>
> M-x org-mode
>
> Eval this function:
>
>   (defun commit-bad-deeds ()
>     (interactive)
>     (let* ((p (point))
>            (w (get-buffer-window (current-buffer))))
>       (org-edit-src-code)
>       (gnus-delete-line) ; any code that modifies buffer
>       (org-edit-src-exit)
>       (set-window-point w p)))
>
> Bind it:
>
> (global-set-key (kbd "M-w") 'commit-bad-deeds)
>
> Paste this code:
>
> #+BEGIN_SRC elisp
> (1) cursor jumps to the beginning of this line
> (2) lawfully-good line to be selected
> (3) and this line to be murdered instead
> (4) w/ no witnesses
> #+END_SRC
>
> - Jump to line (2)
> - Select whole line: (progn (end-of-line) (set-mark (line-beginning-position))) or any other way
> - press M-w
>
> Observe:
> (1) Line (3) removed instead of (2)
> (2) Point jumping to the beginning of the block
> (3) Lag?

I cannot reproduce any of these observations. Could you check that no
other function is interfering?

Regards,

-- 
Nicolas Goaziou

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.