diff options
| author | Carsten Dominik | 2009-02-02 20:57:14 +0000 |
|---|---|---|
| committer | Carsten Dominik | 2009-02-02 20:57:14 +0000 |
| commit | 5ace2fe5ec1ac286b69e3ec3db9a0fba6a295f49 (patch) | |
| tree | 8669f540703294c7d57126b098c9c96d65eaa983 | |
| parent | 68a479400bfe55432c7e3aaf89ba7095751568d9 (diff) | |
| download | emacs-5ace2fe5ec1ac286b69e3ec3db9a0fba6a295f49.tar.gz emacs-5ace2fe5ec1ac286b69e3ec3db9a0fba6a295f49.zip | |
2009-02-02 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-mode): Make dependence stuff work more reliably.
(org-update-parent-todo-statistics): Fix bug with updating
statistics cookie.
(org-yank-adjusted-subtrees, org-return-follows-link)
(org-use-fast-todo-selection, org-tags-column): New default
setting for variables.
* org-export-latex.el (org-export-latex-emphasis-alist): Use = and
~ as verbatim delimiters, to avoid table bug.
(org-export-latex-classes): Remove the a4paper option from the
default styles.
* org-exp.el (org-export-html-format-image): New argument
PAR-OPEN, to fix XHTM validation bug.
(org-export-as-html): Pass par-open to
`org-export-html-format-image'.
(org-export-html-footnotes-section): Use a more consistent id for
footnotes.
* org-agenda.el (org-agenda-sorting-strategy)
(org-agenda-tags-column): New default setting for variables, based
on a poll what typical uses use.
(org-agenda-dim-blocked-tasks): Keep dimming blocked entries from
setting the blocked tag.
34 files changed, 105 insertions, 57 deletions
diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog index 449dd4d896c..4a761beff12 100644 --- a/lisp/org/ChangeLog +++ b/lisp/org/ChangeLog | |||
| @@ -1,3 +1,30 @@ | |||
| 1 | 2009-02-02 Carsten Dominik <carsten.dominik@gmail.com> | ||
| 2 | |||
| 3 | * org.el (org-mode): Make dependence stuff work more reliably. | ||
| 4 | (org-update-parent-todo-statistics): Fix bug with updating | ||
| 5 | statistics cookie. | ||
| 6 | (org-yank-adjusted-subtrees, org-return-follows-link) | ||
| 7 | (org-use-fast-todo-selection, org-tags-column): New default | ||
| 8 | setting for variables. | ||
| 9 | |||
| 10 | * org-export-latex.el (org-export-latex-emphasis-alist): Use = and | ||
| 11 | ~ as verbatim delimiters, to avoid table bug. | ||
| 12 | (org-export-latex-classes): Remove the a4paper option from the | ||
| 13 | default styles. | ||
| 14 | |||
| 15 | * org-exp.el (org-export-html-format-image): New argument | ||
| 16 | PAR-OPEN, to fix XHTM validation bug. | ||
| 17 | (org-export-as-html): Pass par-open to | ||
| 18 | `org-export-html-format-image'. | ||
| 19 | (org-export-html-footnotes-section): Use a more consistent id for | ||
| 20 | footnotes. | ||
| 21 | |||
| 22 | * org-agenda.el (org-agenda-sorting-strategy) | ||
| 23 | (org-agenda-tags-column): New default setting for variables, based | ||
| 24 | on a poll what typical uses use. | ||
| 25 | (org-agenda-dim-blocked-tasks): Keep dimming blocked entries from | ||
| 26 | setting the blocked tag. | ||
| 27 | |||
| 1 | 2009-01-31 Carsten Dominik <dominik@science.uva.nl> | 28 | 2009-01-31 Carsten Dominik <dominik@science.uva.nl> |
| 2 | 29 | ||
| 3 | * org-agenda.el (org-agenda-dim-blocked-tasks): No tagging when | 30 | * org-agenda.el (org-agenda-dim-blocked-tasks): No tagging when |
diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el index 93b6310520b..6180264d073 100644 --- a/lisp/org/org-agenda.el +++ b/lisp/org/org-agenda.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
| @@ -781,9 +781,9 @@ a grid line." | |||
| 781 | :group 'org-agenda) | 781 | :group 'org-agenda) |
| 782 | 782 | ||
| 783 | (defcustom org-agenda-sorting-strategy | 783 | (defcustom org-agenda-sorting-strategy |
| 784 | '((agenda time-up category-keep priority-down) | 784 | '((agenda time-up priority-down category-keep) |
| 785 | (todo category-keep priority-down) | 785 | (todo priority-down category-keep) |
| 786 | (tags category-keep priority-down) | 786 | (tags priority-down category-keep) |
| 787 | (search category-keep)) | 787 | (search category-keep)) |
| 788 | "Sorting structure for the agenda items of a single day. | 788 | "Sorting structure for the agenda items of a single day. |
| 789 | This is a list of symbols which will be used in sequence to determine | 789 | This is a list of symbols which will be used in sequence to determine |
| @@ -1014,7 +1014,7 @@ When this is the symbol `prefix', only remove tags when | |||
| 1014 | (defvaralias 'org-agenda-remove-tags-when-in-prefix | 1014 | (defvaralias 'org-agenda-remove-tags-when-in-prefix |
| 1015 | 'org-agenda-remove-tags)) | 1015 | 'org-agenda-remove-tags)) |
| 1016 | 1016 | ||
| 1017 | (defcustom org-agenda-tags-column -80 | 1017 | (defcustom org-agenda-tags-column (if (featurep 'xemacs) -79 -80) |
| 1018 | "Shift tags in agenda items to this column. | 1018 | "Shift tags in agenda items to this column. |
| 1019 | If this number is positive, it specifies the column. If it is negative, | 1019 | If this number is positive, it specifies the column. If it is negative, |
| 1020 | it means that the tags should be flushright to that column. For example, | 1020 | it means that the tags should be flushright to that column. For example, |
diff --git a/lisp/org/org-archive.el b/lisp/org/org-archive.el index 680d17102a9..a3ac5c88d43 100644 --- a/lisp/org/org-archive.el +++ b/lisp/org/org-archive.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-attach.el b/lisp/org/org-attach.el index 28c1df021ea..92988b5e60c 100644 --- a/lisp/org/org-attach.el +++ b/lisp/org/org-attach.el | |||
| @@ -4,7 +4,7 @@ | |||
| 4 | 4 | ||
| 5 | ;; Author: John Wiegley <johnw@newartisans.com> | 5 | ;; Author: John Wiegley <johnw@newartisans.com> |
| 6 | ;; Keywords: org data task | 6 | ;; Keywords: org data task |
| 7 | ;; Version: 6.20h | 7 | ;; Version: 6.21b |
| 8 | 8 | ||
| 9 | ;; This file is part of GNU Emacs. | 9 | ;; This file is part of GNU Emacs. |
| 10 | ;; | 10 | ;; |
diff --git a/lisp/org/org-bbdb.el b/lisp/org/org-bbdb.el index 5a816d34c02..55200c2ab8c 100644 --- a/lisp/org/org-bbdb.el +++ b/lisp/org/org-bbdb.el | |||
| @@ -7,7 +7,7 @@ | |||
| 7 | ;; Thomas Baumann <thomas dot baumann at ch dot tum dot de> | 7 | ;; Thomas Baumann <thomas dot baumann at ch dot tum dot de> |
| 8 | ;; Keywords: outlines, hypermedia, calendar, wp | 8 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 9 | ;; Homepage: http://orgmode.org | 9 | ;; Homepage: http://orgmode.org |
| 10 | ;; Version: 6.20h | 10 | ;; Version: 6.21b |
| 11 | ;; | 11 | ;; |
| 12 | ;; This file is part of GNU Emacs. | 12 | ;; This file is part of GNU Emacs. |
| 13 | ;; | 13 | ;; |
diff --git a/lisp/org/org-bibtex.el b/lisp/org/org-bibtex.el index 7f63b839d0d..eb65e2a8803 100644 --- a/lisp/org/org-bibtex.el +++ b/lisp/org/org-bibtex.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | ;; Author: Bastien Guerry <bzg at altern dot org> | 5 | ;; Author: Bastien Guerry <bzg at altern dot org> |
| 6 | ;; Carsten Dominik <carsten dot dominik at gmail dot com> | 6 | ;; Carsten Dominik <carsten dot dominik at gmail dot com> |
| 7 | ;; Keywords: org, wp, remember | 7 | ;; Keywords: org, wp, remember |
| 8 | ;; Version: 6.20h | 8 | ;; Version: 6.21b |
| 9 | ;; | 9 | ;; |
| 10 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 11 | ;; | 11 | ;; |
diff --git a/lisp/org/org-clock.el b/lisp/org/org-clock.el index e1decc08b99..0a0f8d0292a 100644 --- a/lisp/org/org-clock.el +++ b/lisp/org/org-clock.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-colview.el b/lisp/org/org-colview.el index e60fd8cd6b2..3171332e252 100644 --- a/lisp/org/org-colview.el +++ b/lisp/org/org-colview.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-compat.el b/lisp/org/org-compat.el index 09ee0ee230d..73d3e0c4a2b 100644 --- a/lisp/org/org-compat.el +++ b/lisp/org/org-compat.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-exp.el b/lisp/org/org-exp.el index 2094242325e..e302052a6ec 100644 --- a/lisp/org/org-exp.el +++ b/lisp/org/org-exp.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
| @@ -3625,7 +3625,7 @@ lang=\"%s\" xml:lang=\"%s\"> | |||
| 3625 | (org-file-image-p | 3625 | (org-file-image-p |
| 3626 | path org-export-html-inline-image-extensions)) | 3626 | path org-export-html-inline-image-extensions)) |
| 3627 | (setq rpl (org-export-html-format-image | 3627 | (setq rpl (org-export-html-format-image |
| 3628 | (concat type ":" path))) | 3628 | (concat type ":" path) org-par-open)) |
| 3629 | (setq link (concat type ":" path)) | 3629 | (setq link (concat type ":" path)) |
| 3630 | (setq rpl (concat "<a href=\"" | 3630 | (setq rpl (concat "<a href=\"" |
| 3631 | (org-export-html-format-href link) | 3631 | (org-export-html-format-href link) |
| @@ -3692,7 +3692,9 @@ lang=\"%s\" xml:lang=\"%s\"> | |||
| 3692 | (or (eq t org-export-html-inline-images) | 3692 | (or (eq t org-export-html-inline-images) |
| 3693 | (and org-export-html-inline-images | 3693 | (and org-export-html-inline-images |
| 3694 | (not descp)))) | 3694 | (not descp)))) |
| 3695 | (org-export-html-format-image thefile) | 3695 | (progn |
| 3696 | (message "image %s %s" thefile org-par-open) | ||
| 3697 | (org-export-html-format-image thefile org-par-open)) | ||
| 3696 | (concat "<a href=\"" thefile "\"" attr ">" | 3698 | (concat "<a href=\"" thefile "\"" attr ">" |
| 3697 | (org-export-html-format-desc desc) | 3699 | (org-export-html-format-desc desc) |
| 3698 | "</a>"))) | 3700 | "</a>"))) |
| @@ -4019,7 +4021,7 @@ lang=\"%s\" xml:lang=\"%s\"> | |||
| 4019 | (org-html-do-expand s)) | 4021 | (org-html-do-expand s)) |
| 4020 | s)) | 4022 | s)) |
| 4021 | 4023 | ||
| 4022 | (defun org-export-html-format-image (src) | 4024 | (defun org-export-html-format-image (src par-open) |
| 4023 | "Create image tag with source and attributes." | 4025 | "Create image tag with source and attributes." |
| 4024 | (save-match-data | 4026 | (save-match-data |
| 4025 | (if (string-match "^ltxpng/" src) | 4027 | (if (string-match "^ltxpng/" src) |
| @@ -4027,15 +4029,18 @@ lang=\"%s\" xml:lang=\"%s\"> | |||
| 4027 | (let* ((caption (org-find-text-property-in-string 'org-caption src)) | 4029 | (let* ((caption (org-find-text-property-in-string 'org-caption src)) |
| 4028 | (attr (org-find-text-property-in-string 'org-attributes src)) | 4030 | (attr (org-find-text-property-in-string 'org-attributes src)) |
| 4029 | (label (org-find-text-property-in-string 'org-label src))) | 4031 | (label (org-find-text-property-in-string 'org-label src))) |
| 4030 | (format "<div %sclass=\"figure\"> | 4032 | (format "%s<div %sclass=\"figure\"> |
| 4031 | <p><img src=\"%s\"%s /></p>%s | 4033 | <p><img src=\"%s\"%s /></p>%s |
| 4032 | </div>" | 4034 | </div>%s" |
| 4035 | (if org-par-open "</p>\n" "") | ||
| 4033 | (if label (format "id=\"%s\" " label) "") | 4036 | (if label (format "id=\"%s\" " label) "") |
| 4034 | src | 4037 | src |
| 4035 | (if (string-match "\\<alt=" (or attr "")) | 4038 | (if (string-match "\\<alt=" (or attr "")) |
| 4036 | (concat " " attr ) | 4039 | (concat " " attr ) |
| 4037 | (concat " " attr " alt=\"" src "\"")) | 4040 | (concat " " attr " alt=\"" src "\"")) |
| 4038 | (if caption (concat "\n<p>" caption "</p>") "")))))) | 4041 | (if caption (concat "\n<p>" caption "</p>") "") |
| 4042 | (if org-par-open "\n<p>" "")))))) | ||
| 4043 | |||
| 4039 | 4044 | ||
| 4040 | (defvar org-table-colgroup-info nil) | 4045 | (defvar org-table-colgroup-info nil) |
| 4041 | (defun org-format-table-ascii (lines) | 4046 | (defun org-format-table-ascii (lines) |
diff --git a/lisp/org/org-export-latex.el b/lisp/org/org-export-latex.el index 3306a1bb090..ab266aafd7f 100644 --- a/lisp/org/org-export-latex.el +++ b/lisp/org/org-export-latex.el | |||
| @@ -4,7 +4,7 @@ | |||
| 4 | ;; | 4 | ;; |
| 5 | ;; Emacs Lisp Archive Entry | 5 | ;; Emacs Lisp Archive Entry |
| 6 | ;; Filename: org-export-latex.el | 6 | ;; Filename: org-export-latex.el |
| 7 | ;; Version: 6.20h | 7 | ;; Version: 6.21b |
| 8 | ;; Author: Bastien Guerry <bzg AT altern DOT org> | 8 | ;; Author: Bastien Guerry <bzg AT altern DOT org> |
| 9 | ;; Maintainer: Bastien Guerry <bzg AT altern DOT org> | 9 | ;; Maintainer: Bastien Guerry <bzg AT altern DOT org> |
| 10 | ;; Keywords: org, wp, tex | 10 | ;; Keywords: org, wp, tex |
| @@ -165,8 +165,8 @@ to represent the section title." | |||
| 165 | ("/" "\\emph{%s}" nil) | 165 | ("/" "\\emph{%s}" nil) |
| 166 | ("_" "\\underline{%s}" nil) | 166 | ("_" "\\underline{%s}" nil) |
| 167 | ("+" "\\texttt{%s}" nil) | 167 | ("+" "\\texttt{%s}" nil) |
| 168 | ("=" "\\verb|%s|" nil) | 168 | ("=" "\\verb=%s=" nil) |
| 169 | ("~" "\\verb|%s|" t)) | 169 | ("~" "\\verb~%s~" t)) |
| 170 | "Alist of LaTeX expressions to convert emphasis fontifiers. | 170 | "Alist of LaTeX expressions to convert emphasis fontifiers. |
| 171 | Each element of the list is a list of three elements. | 171 | Each element of the list is a list of three elements. |
| 172 | The first element is the character used as a marker for fontification. | 172 | The first element is the character used as a marker for fontification. |
diff --git a/lisp/org/org-faces.el b/lisp/org/org-faces.el index 64bc5590684..a539585d447 100644 --- a/lisp/org/org-faces.el +++ b/lisp/org/org-faces.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-footnote.el b/lisp/org/org-footnote.el index 89bc2ea64df..c2dbc4b0418 100644 --- a/lisp/org/org-footnote.el +++ b/lisp/org/org-footnote.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 5 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 6 | ;; Keywords: outlines, hypermedia, calendar, wp | 6 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 7 | ;; Homepage: http://orgmode.org | 7 | ;; Homepage: http://orgmode.org |
| 8 | ;; Version: 6.20h | 8 | ;; Version: 6.21b |
| 9 | ;; | 9 | ;; |
| 10 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 11 | ;; | 11 | ;; |
diff --git a/lisp/org/org-gnus.el b/lisp/org/org-gnus.el index 61fa15cff01..9d97519e660 100644 --- a/lisp/org/org-gnus.el +++ b/lisp/org/org-gnus.el | |||
| @@ -7,7 +7,7 @@ | |||
| 7 | ;; Tassilo Horn <tassilo at member dot fsf dot org> | 7 | ;; Tassilo Horn <tassilo at member dot fsf dot org> |
| 8 | ;; Keywords: outlines, hypermedia, calendar, wp | 8 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 9 | ;; Homepage: http://orgmode.org | 9 | ;; Homepage: http://orgmode.org |
| 10 | ;; Version: 6.20h | 10 | ;; Version: 6.21b |
| 11 | ;; | 11 | ;; |
| 12 | ;; This file is part of GNU Emacs. | 12 | ;; This file is part of GNU Emacs. |
| 13 | ;; | 13 | ;; |
diff --git a/lisp/org/org-id.el b/lisp/org/org-id.el index 16ffe8cf7a4..fd17562ef5a 100644 --- a/lisp/org/org-id.el +++ b/lisp/org/org-id.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 5 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 6 | ;; Keywords: outlines, hypermedia, calendar, wp | 6 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 7 | ;; Homepage: http://orgmode.org | 7 | ;; Homepage: http://orgmode.org |
| 8 | ;; Version: 6.20h | 8 | ;; Version: 6.21b |
| 9 | ;; | 9 | ;; |
| 10 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 11 | ;; | 11 | ;; |
diff --git a/lisp/org/org-info.el b/lisp/org/org-info.el index 32699314af5..1b6de745d49 100644 --- a/lisp/org/org-info.el +++ b/lisp/org/org-info.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-irc.el b/lisp/org/org-irc.el index 0d4fc4e9bdc..a5bb2bb270d 100644 --- a/lisp/org/org-irc.el +++ b/lisp/org/org-irc.el | |||
| @@ -4,7 +4,7 @@ | |||
| 4 | ;; | 4 | ;; |
| 5 | ;; Author: Philip Jackson <emacs@shellarchive.co.uk> | 5 | ;; Author: Philip Jackson <emacs@shellarchive.co.uk> |
| 6 | ;; Keywords: erc, irc, link, org | 6 | ;; Keywords: erc, irc, link, org |
| 7 | ;; Version: 6.20h | 7 | ;; Version: 6.21b |
| 8 | ;; | 8 | ;; |
| 9 | ;; This file is part of GNU Emacs. | 9 | ;; This file is part of GNU Emacs. |
| 10 | ;; | 10 | ;; |
diff --git a/lisp/org/org-jsinfo.el b/lisp/org/org-jsinfo.el index 748e54ca1dd..d72befda7e9 100644 --- a/lisp/org/org-jsinfo.el +++ b/lisp/org/org-jsinfo.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-list.el b/lisp/org/org-list.el index b3efae6a55d..4dd69564403 100644 --- a/lisp/org/org-list.el +++ b/lisp/org/org-list.el | |||
| @@ -7,7 +7,7 @@ | |||
| 7 | ;; Bastien Guerry <bzg AT altern DOT org> | 7 | ;; Bastien Guerry <bzg AT altern DOT org> |
| 8 | ;; Keywords: outlines, hypermedia, calendar, wp | 8 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 9 | ;; Homepage: http://orgmode.org | 9 | ;; Homepage: http://orgmode.org |
| 10 | ;; Version: 6.20h | 10 | ;; Version: 6.21b |
| 11 | ;; | 11 | ;; |
| 12 | ;; This file is part of GNU Emacs. | 12 | ;; This file is part of GNU Emacs. |
| 13 | ;; | 13 | ;; |
diff --git a/lisp/org/org-mac-message.el b/lisp/org/org-mac-message.el index 5e05899f32f..ae91be9148c 100644 --- a/lisp/org/org-mac-message.el +++ b/lisp/org/org-mac-message.el | |||
| @@ -3,7 +3,7 @@ | |||
| 3 | ;; Copyright (C) 2008, 2009 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 2008, 2009 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: John Wiegley <johnw@gnu.org> | 5 | ;; Author: John Wiegley <johnw@gnu.org> |
| 6 | ;; Version: 6.20h | 6 | ;; Version: 6.21b |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | 8 | ||
| 9 | ;; This file is part of GNU Emacs. | 9 | ;; This file is part of GNU Emacs. |
diff --git a/lisp/org/org-macs.el b/lisp/org/org-macs.el index 1042a88f8f1..4990b83d0b8 100644 --- a/lisp/org/org-macs.el +++ b/lisp/org/org-macs.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-mew.el b/lisp/org/org-mew.el index 79a1279498e..75d087e01e9 100644 --- a/lisp/org/org-mew.el +++ b/lisp/org/org-mew.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | ;; Author: Tokuya Kameshima <kames at fa2 dot so-net dot ne dot jp> | 5 | ;; Author: Tokuya Kameshima <kames at fa2 dot so-net dot ne dot jp> |
| 6 | ;; Keywords: outlines, hypermedia, calendar, wp | 6 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 7 | ;; Homepage: http://orgmode.org | 7 | ;; Homepage: http://orgmode.org |
| 8 | ;; Version: 6.20h | 8 | ;; Version: 6.21b |
| 9 | 9 | ||
| 10 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 11 | 11 | ||
diff --git a/lisp/org/org-mhe.el b/lisp/org/org-mhe.el index a654fb5767c..90e4468c728 100644 --- a/lisp/org/org-mhe.el +++ b/lisp/org/org-mhe.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Thomas Baumann <thomas dot baumann at ch dot tum dot de> | 6 | ;; Author: Thomas Baumann <thomas dot baumann at ch dot tum dot de> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-mouse.el b/lisp/org/org-mouse.el index 4927fff4284..798fddb0c59 100644 --- a/lisp/org/org-mouse.el +++ b/lisp/org/org-mouse.el | |||
| @@ -4,7 +4,7 @@ | |||
| 4 | ;; | 4 | ;; |
| 5 | ;; Author: Piotr Zielinski <piotr dot zielinski at gmail dot com> | 5 | ;; Author: Piotr Zielinski <piotr dot zielinski at gmail dot com> |
| 6 | ;; Maintainer: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Maintainer: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Version: 6.20h | 7 | ;; Version: 6.21b |
| 8 | ;; | 8 | ;; |
| 9 | ;; This file is part of GNU Emacs. | 9 | ;; This file is part of GNU Emacs. |
| 10 | ;; | 10 | ;; |
diff --git a/lisp/org/org-plot.el b/lisp/org/org-plot.el index 5da3bcaaa17..c1704405505 100644 --- a/lisp/org/org-plot.el +++ b/lisp/org/org-plot.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | ;; Author: Eric Schulte <schulte dot eric at gmail dot com> | 5 | ;; Author: Eric Schulte <schulte dot eric at gmail dot com> |
| 6 | ;; Keywords: tables, plotting | 6 | ;; Keywords: tables, plotting |
| 7 | ;; Homepage: http://orgmode.org | 7 | ;; Homepage: http://orgmode.org |
| 8 | ;; Version: 6.20h | 8 | ;; Version: 6.21b |
| 9 | ;; | 9 | ;; |
| 10 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 11 | ;; | 11 | ;; |
diff --git a/lisp/org/org-publish.el b/lisp/org/org-publish.el index 2a70e1062cb..843608cb82f 100644 --- a/lisp/org/org-publish.el +++ b/lisp/org/org-publish.el | |||
| @@ -4,7 +4,7 @@ | |||
| 4 | ;; Author: David O'Toole <dto@gnu.org> | 4 | ;; Author: David O'Toole <dto@gnu.org> |
| 5 | ;; Maintainer: Bastien Guerry <bzg AT altern DOT org> | 5 | ;; Maintainer: Bastien Guerry <bzg AT altern DOT org> |
| 6 | ;; Keywords: hypermedia, outlines, wp | 6 | ;; Keywords: hypermedia, outlines, wp |
| 7 | ;; Version: 6.20h | 7 | ;; Version: 6.21b |
| 8 | 8 | ||
| 9 | ;; This file is part of GNU Emacs. | 9 | ;; This file is part of GNU Emacs. |
| 10 | ;; | 10 | ;; |
diff --git a/lisp/org/org-remember.el b/lisp/org/org-remember.el index 13f746cdfba..2efc6a47957 100644 --- a/lisp/org/org-remember.el +++ b/lisp/org/org-remember.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-rmail.el b/lisp/org/org-rmail.el index e57114f4cb2..caff9cac096 100644 --- a/lisp/org/org-rmail.el +++ b/lisp/org/org-rmail.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-table.el b/lisp/org/org-table.el index 20080aeca39..d561bb91bb4 100644 --- a/lisp/org/org-table.el +++ b/lisp/org/org-table.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-timer.el b/lisp/org/org-timer.el index c70563762d4..901693f6732 100644 --- a/lisp/org/org-timer.el +++ b/lisp/org/org-timer.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 5 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 6 | ;; Keywords: outlines, hypermedia, calendar, wp | 6 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 7 | ;; Homepage: http://orgmode.org | 7 | ;; Homepage: http://orgmode.org |
| 8 | ;; Version: 6.20h | 8 | ;; Version: 6.21b |
| 9 | ;; | 9 | ;; |
| 10 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 11 | ;; | 11 | ;; |
diff --git a/lisp/org/org-vm.el b/lisp/org/org-vm.el index 74c42fc8f96..aec28c5f663 100644 --- a/lisp/org/org-vm.el +++ b/lisp/org/org-vm.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org-w3m.el b/lisp/org/org-w3m.el index beded70fd91..a09d88e1536 100644 --- a/lisp/org/org-w3m.el +++ b/lisp/org/org-w3m.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | ;; Author: Andy Stewart <lazycat dot manatee at gmail dot com> | 5 | ;; Author: Andy Stewart <lazycat dot manatee at gmail dot com> |
| 6 | ;; Keywords: outlines, hypermedia, calendar, wp | 6 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 7 | ;; Homepage: http://orgmode.org | 7 | ;; Homepage: http://orgmode.org |
| 8 | ;; Version: 6.20h | 8 | ;; Version: 6.21b |
| 9 | ;; | 9 | ;; |
| 10 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 11 | ;; | 11 | ;; |
diff --git a/lisp/org/org-wl.el b/lisp/org/org-wl.el index 83b4ef54eb5..eb8936f34db 100644 --- a/lisp/org/org-wl.el +++ b/lisp/org/org-wl.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Tokuya Kameshima <kames at fa2 dot so-net dot ne dot jp> | 6 | ;; Author: Tokuya Kameshima <kames at fa2 dot so-net dot ne dot jp> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
diff --git a/lisp/org/org.el b/lisp/org/org.el index ff0451f3776..da33628e75a 100644 --- a/lisp/org/org.el +++ b/lisp/org/org.el | |||
| @@ -6,7 +6,7 @@ | |||
| 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> | 6 | ;; Author: Carsten Dominik <carsten at orgmode dot org> |
| 7 | ;; Keywords: outlines, hypermedia, calendar, wp | 7 | ;; Keywords: outlines, hypermedia, calendar, wp |
| 8 | ;; Homepage: http://orgmode.org | 8 | ;; Homepage: http://orgmode.org |
| 9 | ;; Version: 6.20h | 9 | ;; Version: 6.21b |
| 10 | ;; | 10 | ;; |
| 11 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| 12 | ;; | 12 | ;; |
| @@ -94,7 +94,7 @@ | |||
| 94 | 94 | ||
| 95 | ;;; Version | 95 | ;;; Version |
| 96 | 96 | ||
| 97 | (defconst org-version "6.20h" | 97 | (defconst org-version "6.21b" |
| 98 | "The version number of the file org.el.") | 98 | "The version number of the file org.el.") |
| 99 | 99 | ||
| 100 | (defun org-version (&optional here) | 100 | (defun org-version (&optional here) |
| @@ -689,7 +689,7 @@ text after the yank would be swallowed into a folded tree by this action." | |||
| 689 | :group 'org-edit-structure | 689 | :group 'org-edit-structure |
| 690 | :type 'boolean) | 690 | :type 'boolean) |
| 691 | 691 | ||
| 692 | (defcustom org-yank-adjusted-subtrees t | 692 | (defcustom org-yank-adjusted-subtrees nil |
| 693 | "Non-nil means, when yanking subtrees, adjust the level. | 693 | "Non-nil means, when yanking subtrees, adjust the level. |
| 694 | With this setting, `org-paste-subtree' is used to insert the subtree, see | 694 | With this setting, `org-paste-subtree' is used to insert the subtree, see |
| 695 | this function for details." | 695 | this function for details." |
| @@ -1113,7 +1113,7 @@ Needs to be set before org.el is loaded." | |||
| 1113 | :group 'org-link-follow | 1113 | :group 'org-link-follow |
| 1114 | :type 'boolean) | 1114 | :type 'boolean) |
| 1115 | 1115 | ||
| 1116 | (defcustom org-return-follows-link nil | 1116 | (defcustom org-return-follows-link t |
| 1117 | "Non-nil means, on links RET will follow the link. | 1117 | "Non-nil means, on links RET will follow the link. |
| 1118 | Needs to be set before org.el is loaded." | 1118 | Needs to be set before org.el is loaded." |
| 1119 | :group 'org-link-follow | 1119 | :group 'org-link-follow |
| @@ -1565,7 +1565,7 @@ more information." | |||
| 1565 | :type '(choice (const sequence) | 1565 | :type '(choice (const sequence) |
| 1566 | (const type))) | 1566 | (const type))) |
| 1567 | 1567 | ||
| 1568 | (defcustom org-use-fast-todo-selection 'prefix | 1568 | (defcustom org-use-fast-todo-selection t |
| 1569 | "Non-nil means, use the fast todo selection scheme with C-c C-t. | 1569 | "Non-nil means, use the fast todo selection scheme with C-c C-t. |
| 1570 | This variable describes if and under what circumstances the cycling | 1570 | This variable describes if and under what circumstances the cycling |
| 1571 | mechanism for TODO keywords will be replaced by a single-key, direct | 1571 | mechanism for TODO keywords will be replaced by a single-key, direct |
| @@ -1636,8 +1636,9 @@ TODO state changes | |||
| 1636 | "Non-nil means, undone TODO entries will block switching the parent to DONE. | 1636 | "Non-nil means, undone TODO entries will block switching the parent to DONE. |
| 1637 | Also, if a parent has an :ORDERED: property, switching an entry to DONE will | 1637 | Also, if a parent has an :ORDERED: property, switching an entry to DONE will |
| 1638 | be blocked if any prior sibling is not yet done. | 1638 | be blocked if any prior sibling is not yet done. |
| 1639 | You need to set this variable through the customize interface, or to | 1639 | This variable needs to be set before org.el is loaded, and you need to |
| 1640 | restart emacs after changing the value." | 1640 | restart Emacs after a change to make the change effective. The only way |
| 1641 | to change is while Emacs is running is through the customize interface." | ||
| 1641 | :set (lambda (var val) | 1642 | :set (lambda (var val) |
| 1642 | (set var val) | 1643 | (set var val) |
| 1643 | (if val | 1644 | (if val |
| @@ -1653,8 +1654,9 @@ restart emacs after changing the value." | |||
| 1653 | When this is nil, checkboxes have no influence on switching TODO states. | 1654 | When this is nil, checkboxes have no influence on switching TODO states. |
| 1654 | When non-nil, you first need to check off all check boxes before the TODO | 1655 | When non-nil, you first need to check off all check boxes before the TODO |
| 1655 | entry can be switched to DONE. | 1656 | entry can be switched to DONE. |
| 1656 | You need to set this variable through the customize interface, or to | 1657 | This variable needs to be set before org.el is loaded, and you need to |
| 1657 | restart emacs after changing the value." | 1658 | restart Emacs after a change to make the change effective. The only way |
| 1659 | to change is while Emacs is running is through the customize interface." | ||
| 1658 | :set (lambda (var val) | 1660 | :set (lambda (var val) |
| 1659 | (set var val) | 1661 | (set var val) |
| 1660 | (if val | 1662 | (if val |
| @@ -2043,7 +2045,7 @@ displaying the tags menu is not even shown, until you press C-c again." | |||
| 2043 | "Non-nil means, fast tags selection interface will also offer TODO states. | 2045 | "Non-nil means, fast tags selection interface will also offer TODO states. |
| 2044 | This is an undocumented feature, you should not rely on it.") | 2046 | This is an undocumented feature, you should not rely on it.") |
| 2045 | 2047 | ||
| 2046 | (defcustom org-tags-column (if (featurep 'xemacs) -79 -80) | 2048 | (defcustom org-tags-column (if (featurep 'xemacs) -76 -77) |
| 2047 | "The column to which tags should be indented in a headline. | 2049 | "The column to which tags should be indented in a headline. |
| 2048 | If this number is positive, it specifies the column. If it is negative, | 2050 | If this number is positive, it specifies the column. If it is negative, |
| 2049 | it means that the tags should be flushright to that column. For example, | 2051 | it means that the tags should be flushright to that column. For example, |
| @@ -3595,6 +3597,18 @@ The following commands are available: | |||
| 3595 | (org-set-autofill-regexps) | 3597 | (org-set-autofill-regexps) |
| 3596 | (setq indent-line-function 'org-indent-line-function) | 3598 | (setq indent-line-function 'org-indent-line-function) |
| 3597 | (org-update-radio-target-regexp) | 3599 | (org-update-radio-target-regexp) |
| 3600 | ;; Make sure dependence stuff works reliably, even for users who set it | ||
| 3601 | ;; too late :-( | ||
| 3602 | (if org-enforce-todo-dependencies | ||
| 3603 | (add-hook 'org-blocker-hook | ||
| 3604 | 'org-block-todo-from-children-or-siblings) | ||
| 3605 | (remove-hook 'org-blocker-hook | ||
| 3606 | 'org-block-todo-from-children-or-siblings)) | ||
| 3607 | (if org-enforce-todo-checkbox-dependencies | ||
| 3608 | (add-hook 'org-blocker-hook | ||
| 3609 | 'org-block-todo-from-checkboxes) | ||
| 3610 | (remove-hook 'org-blocker-hook | ||
| 3611 | 'org-block-todo-from-checkboxes)) | ||
| 3598 | 3612 | ||
| 3599 | ;; Comment characters | 3613 | ;; Comment characters |
| 3600 | ; (org-set-local 'comment-start "#") ;; FIXME: this breaks wrapping | 3614 | ; (org-set-local 'comment-start "#") ;; FIXME: this breaks wrapping |
| @@ -8631,13 +8645,14 @@ changes because there are uncheckd boxes in this entry." | |||
| 8631 | "Update any statistics cookie in the parent of the current headline." | 8645 | "Update any statistics cookie in the parent of the current headline." |
| 8632 | (interactive) | 8646 | (interactive) |
| 8633 | (let ((box-re "\\(\\(\\[[0-9]*%\\]\\)\\|\\(\\[[0-9]*/[0-9]*\\]\\)\\)") | 8647 | (let ((box-re "\\(\\(\\[[0-9]*%\\]\\)\\|\\(\\[[0-9]*/[0-9]*\\]\\)\\)") |
| 8634 | level (cnt-all 0) (cnt-done 0) is-percent kwd) | 8648 | level (cnt-all 0) (cnt-done 0) is-percent kwd cookie-present) |
| 8635 | (catch 'exit | 8649 | (catch 'exit |
| 8636 | (save-excursion | 8650 | (save-excursion |
| 8637 | (setq level (org-up-heading-safe)) | 8651 | (setq level (org-up-heading-safe)) |
| 8638 | (unless level | 8652 | (unless level |
| 8639 | (throw 'exit nil)) | 8653 | (throw 'exit nil)) |
| 8640 | (while (re-search-forward box-re (point-at-eol) t) | 8654 | (while (re-search-forward box-re (point-at-eol) t) |
| 8655 | (setq cnt-all 0 cnt-done 0 cookie-present t) | ||
| 8641 | (setq is-percent (match-end 2)) | 8656 | (setq is-percent (match-end 2)) |
| 8642 | (save-match-data | 8657 | (save-match-data |
| 8643 | (unless (outline-next-heading) (throw 'exit nil)) | 8658 | (unless (outline-next-heading) (throw 'exit nil)) |
| @@ -8653,8 +8668,9 @@ changes because there are uncheckd boxes in this entry." | |||
| 8653 | (if is-percent | 8668 | (if is-percent |
| 8654 | (format "[%d%%]" (/ (* 100 cnt-done) (max 1 cnt-all))) | 8669 | (format "[%d%%]" (/ (* 100 cnt-done) (max 1 cnt-all))) |
| 8655 | (format "[%d/%d]" cnt-done cnt-all)))) | 8670 | (format "[%d/%d]" cnt-done cnt-all)))) |
| 8656 | (run-hook-with-args 'org-after-todo-statistics-hook | 8671 | (when cookie-present |
| 8657 | cnt-done (- cnt-all cnt-done)))))) | 8672 | (run-hook-with-args 'org-after-todo-statistics-hook |
| 8673 | cnt-done (- cnt-all cnt-done))))))) | ||
| 8658 | 8674 | ||
| 8659 | (defvar org-after-todo-statistics-hook nil | 8675 | (defvar org-after-todo-statistics-hook nil |
| 8660 | "Hook that is called after a TODO statistics cookie has been updated. | 8676 | "Hook that is called after a TODO statistics cookie has been updated. |