emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Gustavo Barros <gusbrs.2016@gmail.com>
To: emacs-orgmode@gnu.org
Subject: Bug: Plain list indentation on 'org-indent-item' with 'org-list-demote-modify-bullet' [9.2.4 (9.2.4-3-g7bc6f8-elpaplus @ /home/gustavo/.emacs.d/elpa/org-plus-contrib-20190701/)]
Date: Sun, 07 Jul 2019 12:19:13 -0300	[thread overview]
Message-ID: <87lfx9vpq2.fsf@gmail.com> (raw)

Hi all,

'org-indent-item' disrupts indentation of lines other than the first one of a 
given item when 'org-list-demote-modify-bullet' is non-nil.  More precisely, 
the lines below the first one get one extra space upon "org-metaright".

Steps to reproduce:

- Start with =emacs -Q=

- Get the latest installed Org version with =M-x package-initialized RET=

- Evaluate:
  #+begin_src emacs-lisp
  (setq org-list-demote-modify-bullet
        '(("+" . "-") ("-" . "+") ("*" . "+")))
  #+end_src
  (That’s literally the example of the manual).

- Then find Org file with following contents with point placed where "|" 
  indicates:

  #+begin_verbatim
  - foo
  - |bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz
    bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz
    bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz
    bar baz bar baz bar baz

    #+begin_src emacs-lisp
    (+ 1 1)
    #+end_src

    #+RESULTS:
    : 2
  #+end_verbatim

- Use "<M-right>" to indent the second item, the result is:

  #+begin_verbatim
  - foo
    + bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz
       bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz
       bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz
       bar baz bar baz bar baz

       #+begin_src emacs-lisp
       (+ 1 1)
       #+end_src

       #+RESULTS:
       : 2
  #+end_verbatim

- Indeed, by going back and forth with "<M-right>" and "<M-left>" one can 
  "pump" the lines below the first one always further away:

  #+begin_verbatim
  - foo
    + bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz
            bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz 
            bar baz
            bar baz bar baz bar baz bar baz bar baz bar baz bar baz bar baz 
            bar baz
            bar baz bar baz bar baz

            #+begin_src emacs-lisp
            (+ 1 1)
            #+end_src

            #+RESULTS:
            : 2
  #+end_verbatim

When 'org-list-demote-modify-bullet' has its default value of nil, all the 
lines of the item are kept aligned with the first one, as would be expected.

Best regards,
Gustavo Barros.


Emacs  : GNU Emacs 26.2 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.22.30)
 of 2019-04-19
Package: Org mode version 9.2.4 (9.2.4-3-g7bc6f8-elpaplus @ 
/home/gustavo/.emacs.d/elpa/org-plus-contrib-20190701/)

current state:
==============
(setq
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
		     org-src-mode-configure-edit-buffer)
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 org-mode-hook '(#[0 "\300\301\302\303\304$\207"
		   [add-hook change-major-mode-hook org-show-all append local]
		   5]
		 #[0 "\300\301\302\303\304$\207"
		   [add-hook change-major-mode-hook org-babel-show-result-all
		    append local]
		   5]
		 org-babel-result-hide-spec org-babel-hide-all-hashes
		 org-eldoc-load)
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-bibtex-headline-format-function #[257 "\300\236A\207" [:title] 3 "\n\n(fn 
 ENTRY)"]
 org-babel-pre-tangle-hook '(save-buffer)
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe
		      org-babel-header-arg-expand)
 org-list-demote-modify-bullet '(("+" . "-") ("-" . "+") ("*" . "+"))
 org-src-lang-modes '(("arduino" . arduino) ("redis" . redis) ("php" . php)
		      ("C" . c) ("C++" . c++) ("asymptote" . asy)
		      ("bash" . sh) ("beamer" . latex) ("calc" . fundamental)
		      ("cpp" . c++) ("ditaa" . artist) ("dot" . fundamental)
		      ("elisp" . emacs-lisp) ("ocaml" . tuareg)
		      ("screen" . shell-script) ("shell" . sh)
		      ("sqlite" . sql))
 org-occur-hook '(org-first-headline-recenter)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-show-empty-lines
		  org-optimize-window-after-visibility-change)
 org-speed-command-hook '(org-speed-command-activate
			  org-babel-speed-command-activate)
 org-confirm-shell-link-function 'yes-or-no-p
 org-link-parameters '(("id" :follow org-id-open)
		       ("eww" :follow eww :store org-eww-store-link)
		       ("rmail" :follow org-rmail-open :store
			org-rmail-store-link)
		       ("mhe" :follow org-mhe-open :store org-mhe-store-link)
		       ("irc" :follow org-irc-visit :store org-irc-store-link
			:export org-irc-export)
		       ("info" :follow org-info-open :export org-info-export
			:store org-info-store-link)
		       ("gnus" :follow org-gnus-open :store
			org-gnus-store-link)
		       ("docview" :follow org-docview-open :export
			org-docview-export :store org-docview-store-link)
		       ("bibtex" :follow org-bibtex-open :store
			org-bibtex-store-link)
		       ("bbdb" :follow org-bbdb-open :export org-bbdb-export
			:complete org-bbdb-complete-link :store
			org-bbdb-store-link)
		       ("w3m" :store org-w3m-store-link) ("file+sys")
		       ("file+emacs")
		       ("elfeed" :follow elfeed-link-open :store
			elfeed-link-store-link)
		       ("doi" :follow org--open-doi-link)
		       ("elisp" :follow org--open-elisp-link)
		       ("file" :complete org-file-complete-link)
		       ("ftp" :follow
			(lambda (path) (browse-url (concat "ftp:" path))))
		       ("help" :follow org--open-help-link)
		       ("http" :follow
			(lambda (path) (browse-url (concat "http:" path))))
		       ("https" :follow
			(lambda (path) (browse-url (concat "https:" path))))
		       ("mailto" :follow
			(lambda (path) (browse-url (concat "mailto:" path))))
		       ("news" :follow
			(lambda (path) (browse-url (concat "news:" path))))
		       ("shell" :follow org--open-shell-link))
 )

             reply	other threads:[~2019-07-07 15:19 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2019-07-07 15:19 Gustavo Barros [this message]
2019-07-09  9:59 ` Bug: Plain list indentation on 'org-indent-item' with 'org-list-demote-modify-bullet' [9.2.4 (9.2.4-3-g7bc6f8-elpaplus @ /home/gustavo/.emacs.d/elpa/org-plus-contrib-20190701/)] Nicolas Goaziou

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87lfx9vpq2.fsf@gmail.com \
    --to=gusbrs.2016@gmail.com \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).