Re: Org-mode version 6.30c; plain list termination

[Carsten Dominik <carsten.dominik@gmail.com>]

Hi Duane,

On Nov 27, 2009, at 4:07 PM, Duane Farnsworth wrote:

> I enjoy using org mode, but I have found a bug that is very
> frustrating.  It appears to be platform independent--I have  
> experienced
> it on both windows and ubuntu.
>
> Expected behavior: Setting org-empty-line-terminates-plain-lists to t
> means that leaving a blank line terminates all open lists and org  
> mode's
> indenting/folding behavior respects this.
>
> Actual behavior:  Leaving a blank line does not terminate the list.
> Indentation still occurs at the lowest list level that was opened.  If
> plain list folding is enabled, all subsequent text (until the next  
> plain
> list or headline) is folded.  Setting this variable has no apparent  
> effect.

Unfortunately, this behavior only works for *export* - not for
identation, and certainly not for outline folding.  In fact,
outline folding for plain list items always goes to the next
sibling item or to the next full headline.  Text "after" an
item does not exist for folding, and it would be complex to fix this.

I would like to fix indentation for this case - but this is also complex
and I have not gotten around to it.  So currently I don't recommend
this setting at all.  For now I will update the documentation of this
variable to make this clearer.

- Carsten

>
>
> ------------------------------------------------------------------------
>
>
>
> Emacs  : GNU Emacs 23.1.50.1 (i486-pc-linux-gnu, GTK+ Version 2.18.0)
> of 2009-09-27 on palmer, modified by Debian
> Package: Org-mode version 6.30c
>
> current state:
> ==============
> (setq
> org-empty-line-terminates-plain-lists t
> org-log-done 'time
> org-file-apps '((auto-mode . emacs) ("\\.x?html?\\'" . "firefox %s")
>        ("\\.pdf\\'" . default))
> org-todo-keyword-faces '(("REMINDER" :foreground "purple" :weight  
> bold)
>             ("APPOINT" :foreground "blue" :weight bold))
> org-startup-align-all-tables t
> org-agenda-custom-commands '(("x" "Basic TODO list" todo "TODO" nil)
>                 ("za" "Show all TODOs as a Block List"
>                  ((tags-todo
>                "+CATEGORY=\"blah\"+TODO=\"TODO\"" nil)
>               (tags-todo
>                "+CATEGORY=\"Personal\"+TODO=\"TODO\"" nil)
>               (tags-todo "+CATEGORY=\"Math\"+TODO=\"TODO\""
>                nil)
>               (tags-todo
>                "+CATEGORY=\"foo\" +TODO=\"TODO\"" nil)
>               )
>                  nil)
>                 ("zm" "Show blah TODOs" tags
>                  "+CATEGORY=\"blah"+TODO=\"TODO\"" nil)
>                 ("zw" "Show Math TODOs" tags
>                  "+CATEGORY=\"Math\"+TODO=\"TODO\"" nil)
>                 ("zp" "Show Personal TODOs" tags
>                  "+CATEGORY=\"Personal\"+TODO=\"TODO\"" nil)
>                 ("z" .
>                  "Show Todos of type a=all, p=personal, m=blah,  
> w=math ")
>                 )
> org-agenda-files '("~/Computing/job.org" "~/Computing/home.org"
>           "~/Computing/math.org" "~/Computing/foo.org"
>           "~/Computing/personal.org")
> org-blocker-hook '(org-block-todo-from-checkboxes
>           org-block-todo-from-children-or-siblings-or-parent)
> org-sort-agenda-notime-is-late nil
> org-hide-leading-stars t
> org-after-todo-state-change-hook '(org-clock-out-if-current)
> org-agenda-remove-tags t
> org-agenda-todo-ignore-scheduled t
> org-archive-location "archive.org::From %s"
> org-deadline-warning-days 7
> org-agenda-time-grid '((daily today require-timed remove-match)
>           "----------------" (800 1000 1200 1400 1600 1800 2000))
> org-hide-emphasis-markers t
> org-export-preprocess-hook '(org-export-blocks-preprocess)
> org-tab-first-hook '(org-hide-block-toggle-maybe)
> org-src-mode-hook '(org-src-mode-configure-edit-buffer)
> org-confirm-shell-link-function 'yes-or-no-p
> org-todo-keywords '((sequence "TODO" "DONE")
>            (type "REMINDER" "APPOINT" "DONE"))
> org-agenda-before-write-hook '(org-agenda-add-entry-text)
> org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide- 
> drawers
>         org-cycle-show-empty-lines
>         org-optimize-window-after-visibility-change)
> org-mode-hook '((lambda nil
>         (setq org-mouse-context-menu-function
>          (quote org-mouse-context-menu))
>         (when (memq (quote context-menu) org-mouse-features)
>          (define-key org-mouse-map
>           (if (featurep (quote xemacs)) [button3] [mouse-3]) nil)
>          (define-key org-mode-map [mouse-3]
>           (quote org-mouse-show-context-menu))
>          )
>         (define-key org-mode-map [down-mouse-1]
>          (quote org-mouse-down-mouse))
>         (when (memq (quote context-menu) org-mouse-features)
>          (define-key org-mouse-map [C-drag-mouse-1]
>           (quote org-mouse-move-tree))
>          (define-key org-mouse-map [C-down-mouse-1]
>           (quote org-mouse-move-tree-start))
>          )
>         (when (memq (quote yank-link) org-mouse-features)
>          (define-key org-mode-map [S-mouse-2]
>           (quote org-mouse-yank-link))
>          (define-key org-mode-map [drag-mouse-3]
>           (quote org-mouse-yank-link))
>          )
>         (when (memq (quote move-tree) org-mouse-features)
>          (define-key org-mouse-map [drag-mouse-3]
>           (quote org-mouse-move-tree))
>          (define-key org-mouse-map [down-mouse-3]
>           (quote org-mouse-move-tree-start))
>          )
>         (when (memq (quote activate-stars) org-mouse-features)
>          (font-lock-add-keywords nil
>           (\`
>            (((\, outline-regexp) 0
>              (\`
>           (face org-link mouse-face highlight keymap
>            (\, org-mouse-map))
>           )
>              (quote prepend))
>             )
>            )
>           t)
>          )
>         (when (memq (quote activate-bullets) org-mouse-features)
>          (font-lock-add-keywords nil
>           (\`
>            (("^[     ]*\\([-+*]\\|[0-9]+[.)]\\) +"
>              (1
>           (\`
>            (face org-link keymap (\, org-mouse-map) mouse-face
>             highlight)
>            )
>           (quote prepend))
>              )
>             )
>            )
>           t)
>          )
>         (when (memq (quote activate-checkboxes) org-mouse-features)
>          (font-lock-add-keywords nil
>           (\`
>            (("^[     ]*\\([-+*]\\|[0-9]+[.)]\\) +\\(\\[[ X]\\]\\)"
>              (2
>           (\`
>            (face bold keymap (\, org-mouse-map) mouse-face
>             highlight)
>            )
>           t)
>              )
>             )
>            )
>           t)
>          )
>         (defadvice org-open-at-point
>          (around org-mouse-open-at-point activate)
>          (let ((context (org-context)))
>           (cond ((assq :headline-stars context) (org-cycle))
>            ((assq :checkbox context) (org-toggle-checkbox))
>            ((assq :item-bullet context)
>             (let ((org-cycle-include-plain-lists t)) (org-cycle)))
>            (t ad-do-it))
>           )
>          )
>         )
>        #[nil "\300\301\302\303\304$\207"
>          [org-add-hook change-major-mode-hook org-show-block-all
>           append local]
>          5]
>        turn-on-auto-fill)
> org-font-lock-hook '(org-inlinetask-fontify)
> org-cycle-separator-lines 1
> org-confirm-elisp-link-function 'yes-or-no-p
> org-agenda-mode-hook '((lambda nil
>            (setq org-mouse-context-menu-function
>             (quote org-mouse-agenda-context-menu))
>            (define-key org-agenda-keymap
>             (if (featurep (quote xemacs)) [button3] [mouse-3])
>             (quote org-mouse-show-context-menu))
>            (define-key org-agenda-keymap [down-mouse-3]
>             (quote org-mouse-move-tree-start))
>            (define-key org-agenda-keymap
>             (if (featurep (quote xemacs)) [(control mouse-4)]
>              [C-mouse-4])
>             (quote org-agenda-earlier))
>            (define-key org-agenda-keymap
>             (if (featurep (quote xemacs)) [(control mouse-5)]
>              [C-mouse-5])
>             (quote org-agenda-later))
>            (define-key org-agenda-keymap [drag-mouse-3]
>             (quote
>              (lambda (event) (interactive "e")
>               (case (org-mouse-get-gesture event)
>                (:left (org-agenda-earlier 1))
>                (:right (org-agenda-later 1)))
>               )
>              )
>             )
>            )
>           )
> org-agenda-start-on-weekday 0
> org-enforce-todo-dependencies t
> org-occur-hook '(org-first-headline-recenter)
> org-drawers '("PROPERTIES" "CLOCK" "HIDDEN")
> org-export-preprocess-after-tree-selection-hook '(org-inlinetask- 
> export-handler)
> org-agenda-use-time-grid nil
> org-enforce-todo-checkbox-dependencies t
> )
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten