From: Carsten Dominik <carsten.dominik@gmail.com>
To: Anupam Sengupta <anupamsg@gmail.com>
Cc: emacs-orgmode@gnu.org
Subject: Re: Org-mode version 6.30c; org-remember does not honor `org-odd-levels-only' setting
Date: Thu, 3 Sep 2009 08:50:35 +0200 [thread overview]
Message-ID: <19AC4586-17FD-4846-9963-27B6390FFDDE@gmail.com> (raw)
In-Reply-To: <m263c1grur.fsf@gmail.com>
Hi Anupam,
Remember has no way of knowing what kind of setting for
org-odd-levels-only will be used in the target file. Therefore
you need to take care of setting this value correctly, for example
with
(add-hook 'org-remember-mode-hook (lambda () (setq org-odd-levels-only
t)))
or by setting that variable globally.
- Carsten
On Sep 2, 2009, at 7:48 PM, Anupam Sengupta wrote:
> Hi Carsten,
>
>
> *Problem*: `org-odd-levels-only' is not honored in a remember buffer
> for
> creating child entries.
>
> I have been using the clean outline view using the `org-odd-levels-
> only'
> setting (actually via the per file #+STARTUP: odd setting) to simulate
> the indented view of the outline (info "(org)Clean View")
>
> This works perfectly in the main buffer for the org files - where
> creating a child entry using M-S-Right (`org-demote-subtree') indents
> the entry by an odd number of stars so that the indentation is
> preserved
> and the outline hierarchy is correct.
>
> However, in a org-remember buffer, trying to use the same function to
> create a child entry after the main headline does not honor this
> setting, and uses the default behavior of incrementing the stars'
> count
> by 1.
>
> I.e, instead of this happening in the remember buffer:
>
> * TODO Parent Entry
> *** TODO The child entry /after M-S-Right/
>
> what actually ends up happening is:
>
> * TODO Parent Entry
> ** TODO The child entry /after M-S-Right/
> ^
> |
> +---- Notice the missing third star which should have been created
>
>
> This causes problems in the actual org-buffer later on after the
> remember
> note is filed - as org-mode seems to get confused on the outline
> levels.
>
>
> I have added the org-mode settings using the `org-submit-bug-report'
> with some trimming of private settings that probably are not relevant
> (e.g. the `org-agenda-custom-commands').
>
>
> - Anupam Sengupta
>
> ------------------------------------------------------------------------
> Org-mode variable and customization dump follows >>>>>>>>>
> ------------------------------------------------------------------------
>
> Emacs : GNU Emacs 23.1.50.1 (i386-apple-darwin9.7.0, NS apple-
> appkit-949.46)
> Package: Org-mode version 6.30c
>
> current state:
> ==============
> (setq
> org-empty-line-terminates-plain-lists t
> org-log-done t
> org-remember-default-headline "INBOX"
> org-remember-interactive-interface 'outline-path-completion
> org-todo-keyword-faces '(("MEETING" . hi-blue) ("WAITING" . hi-pink)
> ("DELEGATED" . hi-pink) ("STARTED" . hi-green))
> org-special-ctrl-a/e t
> org-agenda-files '("~/org/work.gpg" "~/org/personal.gpg")
> org-blocker-hook '(org-block-todo-from-checkboxes org-block-todo-
> from-children-or-siblings-or-parent)
> org-tag-faces '(("ISSUE" . org-warning) ("Slipped" . org-warning)
> ("HEADING" . shadow) ("INFO" . shadow) ("ATTACH" . org-clock-overlay)
> ("Project" . shadow))
> org-publish-timestamp-directory "~/org/.org-timestamps/"
> org-agenda-tags-column -90
> org-hide-leading-stars t
> org-checklist-export-function 'org-export-as-ascii
> org-agenda-skip-timestamp-if-done t
> org-after-todo-state-change-hook '(org-checklist org-clock-out-if-
> current)
> org-track-ordered-property-with-tag t
> org-combined-agenda-icalendar-file "~/org/OrgMode.ics"
> org-agenda-default-appointment-duration 60
> org-todo-state-tags-triggers '(("PROJECT" ("Project" . t))
> ("TODO" ("Project")) ("MEETING" ("Project")))
> org-special-ctrl-k t
> org-remember-mode-hook '(delete-other-windows)
> org-agenda-restore-windows-after-quit t
> org-deadline-warning-days 3
> org-protocol-protocol-alist '(("org-mac-remember" :protocol "mac-
> remember" :function org-mac-protocol-remember :kill-client t))
> org-agenda-skip-scheduled-if-done t
> org-export-preprocess-hook '(org-eval-replace-snippts org-export-
> blocks-preprocess)
> org-tags-exclude-from-inheritance '("HEADING" "Project")
> org-tab-first-hook '(org-hide-block-toggle-maybe)
> org-src-mode-hook '(org-src-mode-configure-edit-buffer)
> org-finalize-agenda-hook '(my-org-agenda-to-appt)
> org-confirm-shell-link-function 'yes-or-no-p
> org-toc-info-mode t
> org-clock-persist t
> org-agenda-before-write-hook '(org-agenda-add-entry-text)
> org-icalendar-include-sexps nil
> org-registry-file "~/.emacs.d/data/org-registry.el"
> org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-
> drawers org-cycle-show-empty-lines
> org-optimize-window-after-visibility-change)
> org-publish-project-alist '(("org-notes" :base-directory "~/
> org/" :base-extension "gpg" :publishing-directory "~/
> public_html" :recursive
> nil :publishing-function org-publish-
> org-to-html :headline-levels 4 :auto-preamble t)
> )
> org-fontify-done-headline t
> 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 "\303\304\x18\x19\305 !\bL\210*\306\n\307\310#\207"
> [value var yas/keymap yas/trigger-key [tab] make-
> local-variable define-key [tab] yas/next-field-group] 4]
> org-clock-load #[nil "\300\301!\207" [imenu-add-to-
> menubar "Headings"] 2] turn-on-auto-fill
> #[nil "\300\301\302\303\304$\207" [org-add-hook
> change-major-mode-hook org-show-block-all append local] 5])
> org-font-lock-hook '(org-eval-handle-snippets)
> org-agenda-ndays 1
> org-refile-targets '((nil :maxlevel . 3))
> org-confirm-elisp-link-function 'yes-or-no-p
> org-log-into-drawer t
> org-clock-modeline-total 'current
> 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-footnote-auto-adjust t
> org-agenda-skip-deadline-if-done t
> org-enforce-todo-dependencies t
> org-occur-hook '(org-first-headline-recenter)
> org-drawers '("PROPERTIES" "CLOCK" "DETAILS" "SETUP" "LOGBOOK")
> org-tags-column -99
> org-modules '(org-bbdb org-bibtex org-gnus org-info org-jsinfo org-
> mac-message org-protocol org-mouse org-bookmark org-checklist org-eval
> org-expiry org-panel org-registry org2rem org-toc org-
> mac-protocol)
> org-remember-templates '(("Next Work Action" 110 "* TODO %^{Heading}
> %^g\n SCHEDULED: %^{Scheduled for}t\n %?%i\n %a" "~/org/work.gpg"
> "INBOX" nil)
> ("Next Personal Action" 112 "* TODO
> %^{Heading} %^g\n SCHEDULED: %^{Scheduled For}t\n %?%i\n %a"
> "~/org/personal.gpg" "INBOX" nil))
> org-icalendar-include-todo t
> org-ellipsis 'org-warning
> org-enforce-todo-checkbox-dependencies t
> org-expiry-handler-function 'org-toggle-archive-tag
> )
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
next prev parent reply other threads:[~2009-09-03 6:50 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
2009-09-02 17:48 Org-mode version 6.30c; org-remember does not honor `org-odd-levels-only' setting Anupam Sengupta
2009-09-03 6:50 ` Carsten Dominik [this message]
2009-09-03 15:40 ` Anupam Sengupta
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=19AC4586-17FD-4846-9963-27B6390FFDDE@gmail.com \
--to=carsten.dominik@gmail.com \
--cc=anupamsg@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).