org 45d619c82be: lines are wrapped prefixed with '#' as soon as there is one line commented with '#' before them

org 45d619c82be: lines are wrapped prefixed with '#' as soon as there is one line commented with '#' before them

[Friedrich Delgado Friedrichs]

Hi!

This has been bugging me for quite a while now:

 - Create a buffer *org-scratch*
 - turn on org-mode by M-x org-mode
 - Write the following contents into the buffer:

'-----
# Foo

Bar.

This is to see if lines get commented after being wrapped in an org-buffer
`-----

  - Make sure the cursor ends up after "org-buffer", then press space,
  or add some words if you have a large fill-column setting until the
  line gets wrapped

That gives me "#org-buffer" at the beginning of the second line of the
wrapped text.

As soon as I delete the '#' in front of Foo, this stops.

This happens pretty much everywhere org-mode is involved, so this
makes auto-fill quite useless.

My (redacted) org settings:

 '(org-after-todo-state-change-hook (quote (org-clock-out-if-current)))
 '(org-agenda-columns-add-appointments-to-effort-sum t)
 '(org-agenda-custom-commands (quote (("d" todo #("DOING" 0 5 (face org-warning)) nil) ("S" tags #("STALLED" 0 7 (face org-warning)) ((org-use-tag-inheritance nil))) ("w" tags #("WAITING" 0 7 (face org-warning)) ((org-use-tag-inheritance nil))) ("r" "Describe command here" todo #("REMINDER" 0 8 (face org-warning)) nil) ("l" "\"Shopping List\" (just the headings)" tags-todo #("List" 0 4 (face org-warning)) ((org-agenda-remove-tags t) (org-agenda-prefix-format "") (org-agenda-todo-keyword-format "") (org-agenda-sorting-strategy (quote (category-up priority-down))))) ("p" "Project List" tags #("Project" 0 7 (face org-warning)) ((org-use-tag-inheritance nil))))))
 '(org-agenda-exporter-settings (quote ((htmlize-output-type (quote inline-css)))))
 '(org-agenda-include-diary t)
 '(org-agenda-remove-times-when-in-prefix (quote beg))
 '(org-agenda-skip-deadline-if-done t)
 '(org-agenda-skip-scheduled-if-done t)
 '(org-agenda-skip-timestamp-if-done t)
 '(org-agenda-sorting-strategy (quote ((agenda time-up priority-down category-keep) (todo priority-down category-keep tag-down) (tags priority-down category-keep tag-down) (search category-keep))))
 '(org-agenda-start-on-weekday nil)
 '(org-agenda-todo-ignore-deadlines t)
 '(org-agenda-todo-ignore-scheduled t)
 '(org-agenda-use-time-grid t)
 '(org-blank-before-new-entry (quote ((heading) (plain-list-item))))
 '(org-clock-history-length 15)
 '(org-clock-in-resume t)
 '(org-clock-in-switch-to-state "DOING")
 '(org-clock-into-drawer t)
 '(org-clock-out-remove-zero-time-clocks t)
 '(org-clock-persist t)
 '(org-columns-default-format "%66ITEM %8TODO %3PRIORITY %SCHEDULED %DEADLINE %6EFFORT{:} %TAGS %5CLOCKSUM{:}")
 '(org-combined-agenda-icalendar-file "~/git/Org/home/org.ics")
 '(org-completion-use-ido t)
 '(org-default-notes-file "~/Org/Notes.org")
 '(org-directory "~/Org")
 '(org-drawers (quote ("PROPERTIES" "CLOCK" "LOGBOOK" "SCHEDULE" "HIDDEN")))
 '(org-effort-property "EFFORT")
 '(org-ellipsis (quote org-ellipsis))
 '(org-export-html-use-infojs t)
 '(org-export-mark-todo-in-toc t)
 '(org-export-run-in-background nil)
 '(org-export-with-LaTeX-fragments t)
 '(org-export-with-priority t)
 '(org-export-with-sub-superscripts (quote {}))
 '(org-fast-tag-selection-single-key t)
 '(org-feed-alist nil t)
 '(org-global-properties (quote (("EFFORT_ALL" . "0 0:02:00 0:05:00 0:10:00 0:20:0 0:30:00 1 2 3 4 5 6 7 8 16 24 32 40 48 56 64"))))
 '(org-goto-max-level 5)
 '(org-habit-graph-column 50)
 '(org-habit-show-habits-only-for-today t)
 '(org-hide-leading-stars t)
 '(org-icalendar-categories (quote (all-tags category todo-state)))
 '(org-icalendar-include-body 1000)
 '(org-icalendar-include-sexps nil)
 '(org-icalendar-include-todo nil)
 '(org-icalendar-store-UID t)
 '(org-icalendar-timezone "Europe/Berlin")
 '(org-icalendar-use-deadline (quote (event-if-not-todo event-if-todo)))
 '(org-icalendar-use-plain-timestamp nil)
 '(org-icalendar-use-scheduled (quote (event-if-not-todo event-if-todo)))
 '(org-id-include-domain t)
 '(org-insert-heading-hook (quote ((lambda nil (save-excursion (insert "
") (org-insert-time-stamp (current-time) t t) (org-indent-line-function))))))
 '(org-insert-heading-respect-content t)
 '(org-keep-stored-link-after-insertion t)
 '(org-link-to-org-use-id t)
 '(org-log-done (quote (state)))
 '(org-log-into-drawer t)
 '(org-log-states-order-reversed t)
 '(org-modules (quote (org-bbdb org-bibtex org-gnus org-id org-info org-jsinfo org-habit org-irc org-mew org-mhe org-protocol org-rmail org-vm org-wl org-w3m org-annotate-file org-bookmark org-depend org-elisp-symbol org-interactive-query org-mairix org-man org-toc)))
 '(org-mouse-features (quote (context-menu yank-link activate-bullets activate-checkboxes)))
 '(org-n-level-faces 12)
 '(org-odd-levels-only t)
 '(org-outline-path-complete-in-steps t)
 '(org-refile-allow-creating-parent-nodes (quote confirm))
 '(org-refile-targets (quote ((org-agenda-files :maxlevel . 5))))
 '(org-refile-use-outline-path (quote full-file-path))
 '(org-return-follows-link t)
 '(org-special-ctrl-a/e t)
 '(org-special-ctrl-k t)
 '(org-startup-folded (quote content))
 '(org-startup-truncated nil)
 '(org-stuck-projects (quote ("+Project/-DONE" ("TODO" "DOING") ("WAITING") "")))
 '(org-tags-exclude-from-inheritance (quote ("Project")))
 '(org-tags-match-list-sublevels t)
 '(org-todo-interpretation (quote sequence))
 '(org-todo-keyword-faces (quote (("REMINDER" :foreground "green4"))))
 '(org-use-extra-keys t)
 '(org-use-fast-tag-selection nil)
 '(org-use-fast-todo-selection t)
 '(org-use-property-inheritance (quote ("DEADLINE PRIORITY")))
 '(outline-auto-activation t)
 '(outline-glyph-colour "blue")
 '(outline-glyph-lit-colour "lightblue")
 '(outline-glyph-shade-colour "blue4")
 '(outline-glyphs-on-left nil)
 '(outline-minor-mode-prefix "\x03\x11")

 

-- 
        Friedrich Delgado Friedrichs <friedel@nomaden.org>
                             TauPan on Ircnet and Freenode ;)

Re: org 45d619c82be: lines are wrapped prefixed with '#' as soon as there is one line commented with '#' before them

[Carsten Dominik]

Hi Friedrich,

http://orgmode.org/worg/org-faq.php#auto-fill-and-unwanted-comments

- Carsten

On Nov 11, 2009, at 4:18 PM, Friedrich Delgado Friedrichs wrote:

> Hi!
>
> This has been bugging me for quite a while now:
>
> - Create a buffer *org-scratch*
> - turn on org-mode by M-x org-mode
> - Write the following contents into the buffer:
>
> '-----
> # Foo
>
> Bar.
>
> This is to see if lines get commented after being wrapped in an org- 
> buffer
> `-----
>
>  - Make sure the cursor ends up after "org-buffer", then press space,
>  or add some words if you have a large fill-column setting until the
>  line gets wrapped
>
> That gives me "#org-buffer" at the beginning of the second line of the
> wrapped text.
>
> As soon as I delete the '#' in front of Foo, this stops.
>
> This happens pretty much everywhere org-mode is involved, so this
> makes auto-fill quite useless.
>
> My (redacted) org settings:
>
> '(org-after-todo-state-change-hook (quote (org-clock-out-if-current)))
> '(org-agenda-columns-add-appointments-to-effort-sum t)
> '(org-agenda-custom-commands (quote (("d" todo #("DOING" 0 5 (face  
> org-warning)) nil) ("S" tags #("STALLED" 0 7 (face org-warning))  
> ((org-use-tag-inheritance nil))) ("w" tags #("WAITING" 0 7 (face org- 
> warning)) ((org-use-tag-inheritance nil))) ("r" "Describe command  
> here" todo #("REMINDER" 0 8 (face org-warning)) nil) ("l"  
> "\"Shopping List\" (just the headings)" tags-todo #("List" 0 4 (face  
> org-warning)) ((org-agenda-remove-tags t) (org-agenda-prefix-format  
> "") (org-agenda-todo-keyword-format "") (org-agenda-sorting-strategy  
> (quote (category-up priority-down))))) ("p" "Project List" tags  
> #("Project" 0 7 (face org-warning)) ((org-use-tag-inheritance  
> nil))))))
> '(org-agenda-exporter-settings (quote ((htmlize-output-type (quote  
> inline-css)))))
> '(org-agenda-include-diary t)
> '(org-agenda-remove-times-when-in-prefix (quote beg))
> '(org-agenda-skip-deadline-if-done t)
> '(org-agenda-skip-scheduled-if-done t)
> '(org-agenda-skip-timestamp-if-done t)
> '(org-agenda-sorting-strategy (quote ((agenda time-up priority-down  
> category-keep) (todo priority-down category-keep tag-down) (tags  
> priority-down category-keep tag-down) (search category-keep))))
> '(org-agenda-start-on-weekday nil)
> '(org-agenda-todo-ignore-deadlines t)
> '(org-agenda-todo-ignore-scheduled t)
> '(org-agenda-use-time-grid t)
> '(org-blank-before-new-entry (quote ((heading) (plain-list-item))))
> '(org-clock-history-length 15)
> '(org-clock-in-resume t)
> '(org-clock-in-switch-to-state "DOING")
> '(org-clock-into-drawer t)
> '(org-clock-out-remove-zero-time-clocks t)
> '(org-clock-persist t)
> '(org-columns-default-format "%66ITEM %8TODO %3PRIORITY %SCHEDULED  
> %DEADLINE %6EFFORT{:} %TAGS %5CLOCKSUM{:}")
> '(org-combined-agenda-icalendar-file "~/git/Org/home/org.ics")
> '(org-completion-use-ido t)
> '(org-default-notes-file "~/Org/Notes.org")
> '(org-directory "~/Org")
> '(org-drawers (quote ("PROPERTIES" "CLOCK" "LOGBOOK" "SCHEDULE"  
> "HIDDEN")))
> '(org-effort-property "EFFORT")
> '(org-ellipsis (quote org-ellipsis))
> '(org-export-html-use-infojs t)
> '(org-export-mark-todo-in-toc t)
> '(org-export-run-in-background nil)
> '(org-export-with-LaTeX-fragments t)
> '(org-export-with-priority t)
> '(org-export-with-sub-superscripts (quote {}))
> '(org-fast-tag-selection-single-key t)
> '(org-feed-alist nil t)
> '(org-global-properties (quote (("EFFORT_ALL" . "0 0:02:00 0:05:00  
> 0:10:00 0:20:0 0:30:00 1 2 3 4 5 6 7 8 16 24 32 40 48 56 64"))))
> '(org-goto-max-level 5)
> '(org-habit-graph-column 50)
> '(org-habit-show-habits-only-for-today t)
> '(org-hide-leading-stars t)
> '(org-icalendar-categories (quote (all-tags category todo-state)))
> '(org-icalendar-include-body 1000)
> '(org-icalendar-include-sexps nil)
> '(org-icalendar-include-todo nil)
> '(org-icalendar-store-UID t)
> '(org-icalendar-timezone "Europe/Berlin")
> '(org-icalendar-use-deadline (quote (event-if-not-todo event-if- 
> todo)))
> '(org-icalendar-use-plain-timestamp nil)
> '(org-icalendar-use-scheduled (quote (event-if-not-todo event-if- 
> todo)))
> '(org-id-include-domain t)
> '(org-insert-heading-hook (quote ((lambda nil (save-excursion  
> (insert "
> ") (org-insert-time-stamp (current-time) t t) (org-indent-line- 
> function))))))
> '(org-insert-heading-respect-content t)
> '(org-keep-stored-link-after-insertion t)
> '(org-link-to-org-use-id t)
> '(org-log-done (quote (state)))
> '(org-log-into-drawer t)
> '(org-log-states-order-reversed t)
> '(org-modules (quote (org-bbdb org-bibtex org-gnus org-id org-info  
> org-jsinfo org-habit org-irc org-mew org-mhe org-protocol org-rmail  
> org-vm org-wl org-w3m org-annotate-file org-bookmark org-depend org- 
> elisp-symbol org-interactive-query org-mairix org-man org-toc)))
> '(org-mouse-features (quote (context-menu yank-link activate-bullets  
> activate-checkboxes)))
> '(org-n-level-faces 12)
> '(org-odd-levels-only t)
> '(org-outline-path-complete-in-steps t)
> '(org-refile-allow-creating-parent-nodes (quote confirm))
> '(org-refile-targets (quote ((org-agenda-files :maxlevel . 5))))
> '(org-refile-use-outline-path (quote full-file-path))
> '(org-return-follows-link t)
> '(org-special-ctrl-a/e t)
> '(org-special-ctrl-k t)
> '(org-startup-folded (quote content))
> '(org-startup-truncated nil)
> '(org-stuck-projects (quote ("+Project/-DONE" ("TODO" "DOING")  
> ("WAITING") "")))
> '(org-tags-exclude-from-inheritance (quote ("Project")))
> '(org-tags-match-list-sublevels t)
> '(org-todo-interpretation (quote sequence))
> '(org-todo-keyword-faces (quote (("REMINDER" :foreground "green4"))))
> '(org-use-extra-keys t)
> '(org-use-fast-tag-selection nil)
> '(org-use-fast-todo-selection t)
> '(org-use-property-inheritance (quote ("DEADLINE PRIORITY")))
> '(outline-auto-activation t)
> '(outline-glyph-colour "blue")
> '(outline-glyph-lit-colour "lightblue")
> '(outline-glyph-shade-colour "blue4")
> '(outline-glyphs-on-left nil)
> '(outline-minor-mode-prefix "\x03\x11")
>
>
>
> -- 
>        Friedrich Delgado Friedrichs <friedel@nomaden.org>
>                             TauPan on Ircnet and Freenode ;)
>
>
> _______________________________________________
> 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

- Carsten

Re: org 45d619c82be: lines are wrapped prefixed with '#' as soon as there is one line commented with '#' before them

[Friedrich Delgado Friedrichs]

Hi!

Carsten Dominik schrieb:
> http://orgmode.org/worg/org-faq.php#auto-fill-and-unwanted-comments

Oh, failure to check the FAQ on my part. I'm sorry, I thought I was
beyond that. You never cease to learn.

However I can't find out why comment-start was set in the first place
(it was set to ";;", but the inserted comments were '#'). I had to
resort to

,----
  (add-hook 'org-mode-hook '(lambda ()
                              (setf comment-start nil)))
`----

to get rid of this.

This is a mystery, but I guess my emacs config is so complex now that
it has started to become sentient... ;)

Thanks and kind regards
       Friedel
-- 
        Friedrich Delgado Friedrichs <friedel@nomaden.org>
                             TauPan on Ircnet and Freenode ;)