emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Carsten Dominik
Subject: Re: [Orgmode] Org-mode version 6.30c; plain list termination
Date: Mon, 30 Nov 2009 18:22:13 +0100

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.
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten







reply via email to

[Prev in Thread] Current Thread [Next in Thread]