Thanks Carsten! I thought on the same lines after posting (about the global vs. per file setting) - but the hook you suggested is much nicer! Thanks again, -- Anupam http://slashusr.wordpress.com My Profile: http://www.google.com/profiles/anupamsg On Thu, Sep 3, 2009 at 12:20 PM, Carsten Dominik wrote: > 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 \305 ! L\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 >> > >