From mboxrd@z Thu Jan 1 00:00:00 1970 From: Anupam Sengupta Subject: Org-mode version 6.30c; org-remember does not honor `org-odd-levels-only' setting Date: Wed, 02 Sep 2009 23:18:44 +0530 Message-ID: Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 8bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Mitx9-0005HU-Gd for emacs-orgmode@gnu.org; Wed, 02 Sep 2009 13:49:03 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Mitx4-0005G0-Bv for emacs-orgmode@gnu.org; Wed, 02 Sep 2009 13:49:02 -0400 Received: from [199.232.76.173] (port=45335 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Mitx3-0005Ft-Ro for emacs-orgmode@gnu.org; Wed, 02 Sep 2009 13:48:57 -0400 Received: from mail-ew0-f211.google.com ([209.85.219.211]:52553) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1Mitx2-0007Mq-4H for emacs-orgmode@gnu.org; Wed, 02 Sep 2009 13:48:56 -0400 Received: by ewy7 with SMTP id 7so997103ewy.31 for ; Wed, 02 Sep 2009 10:48:54 -0700 (PDT) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org 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 )