[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] Bug: entering range of times [9.0.5 (release_9.0.5-474-g942b62 @ /ho
|
From: |
Joe Corneli |
|
Subject: |
[O] Bug: entering range of times [9.0.5 (release_9.0.5-474-g942b62 @ /home/joe/org-mode/lisp/)] |
|
Date: |
Thu, 20 Apr 2017 15:19:29 +0100 |
As I understand it I should be able to enter a range of times using
either of the following formats:
** TODO time range <2017-04-21 Fri 15:45-16:45>
** TODO time+date range <2017-04-21 Fri 15:45>--<2017-04-22 Sat 15:45>
Docs: http://orgmode.org/manual/Timestamps.html
However, using the formats above triggers errors when I try to display
the agenda (org-agenda) or todo list (org-todo-list).
Note that a single date with a colon-separated time and no range is OK
(no error).
** TODO This is a date with a colon <2017-04-20 Tue 15:45>
~~~
Debugger entered--Lisp error: (void-function org-hh:mm-string-to-minutes)
org-hh:mm-string-to-minutes("16:45")
org-agenda-format-item(nil #("TODO This is a time range <2017-04-21 Fri
15:45-16:45>" 0 4 (org-category "blotter" fontified t face (:foreground "black"
:background "snow" :weight bold :box (:line-width -1))) 4 25 (org-category
"blotter" fontified t face org-level-2) 25 26 (org-category "blotter" fontified
t face org-level-2) 26 53 (fontified t org-category "blotter" face org-date
mouse-face highlight keymap (keymap (follow-link . mouse-face) (mouse-3 .
org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))) 53 54 (fontified t
rear-nonsticky (mouse-face highlight keymap invisible intangible help-echo
org-linked-text htmlize-link) org-category "blotter" face org-date mouse-face
highlight keymap (keymap (follow-link . mouse-face) (mouse-3 .
org-find-file-at-mouse) (mouse-2 . org-open-at-mouse)))) " " "blotter" nil
#("<2017-04-21 Fri 15:45-16:45>" 0 27 (keymap (keymap (follow-link .
mouse-face) (mouse-3 . org-find-file-at-mouse) (mouse-2 . org-open-at-mouse))
mouse-face highlight face org-date org-category "blotter" fontified t) 27 28
(keymap (keymap (follow-link . mouse-face) (mouse-3 . org-find-file-at-mouse)
(mouse-2 . org-open-at-mouse)) mouse-face highlight face org-date org-category
"blotter" rear-nonsticky (mouse-face highlight keymap invisible intangible
help-echo org-linked-text htmlize-link) fontified t))
"<\\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} ?[^\n>]*?\\)>" nil)
org-agenda-get-timestamps(nil)
org-agenda-get-day-entries("/home/joe/postdoc.git/org/blotter.org" (4 21
2017) :scheduled :timestamp :sexp)
apply(org-agenda-get-day-entries "/home/joe/postdoc.git/org/blotter.org" (4
21 2017) (:scheduled :timestamp :sexp))
org-agenda-list(nil)
(let ((org-agenda-include-diary t) (org-agenda-remove-tags t))
(org-agenda-list current-prefix-arg))
eval((let ((org-agenda-include-diary t) (org-agenda-remove-tags t))
(org-agenda-list current-prefix-arg)))
org-let(((org-agenda-include-diary t) (org-agenda-remove-tags t))
(org-agenda-list current-prefix-arg))
org-agenda(nil)
funcall-interactively(org-agenda nil)
call-interactively(org-agenda nil nil)
command-execute(org-agenda)
~~~
Emacs : GNU Emacs 25.1.50.2 (x86_64-unknown-linux-gnu, GTK+ Version 3.14.13)
of 2016-08-15
Package: Org mode version 9.0.5 (release_9.0.5-474-g942b62 @
/home/joe/org-mode/lisp/)
current state:
==============
(setq
org-tree-slide-mode-hook '(toggle-org-cloaking)
org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
org-speed-command-hook '(org-speed-command-activate
org-babel-speed-command-activate)
org-agenda-diary-file "~/postdoc.git/org/work.org"
org-occur-hook '(org-first-headline-recenter)
org-use-fast-todo-selection 'prefix
org-clock-in-prepare-hook '((lambda nil
(if (not pomodoro-is-active)
(let ((minutes (read-number "Start timer: " 90)))
(when org-timer-current-timer (org-timer-stop))
(org-timer-set-timer minutes) (pomodoro-mode))
)
)
)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-log-done 'note
org-latex-format-inlinetask-function
'org-latex-format-inlinetask-default-function
org-confirm-shell-link-function 'yes-or-no-p
org-image-actual-width nil
org-finalize-agenda-hook '(remove-todo-and-cookies place-agenda-tags)
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-startup-folded nil
org-latex-pdf-process '("latexmk -pdflatex='pdflatex -interaction nonstopmode'
-pdf -bibtex -f %f")
org-agenda-prefix-format '((agenda . " %i %-10:c%?-12t% s") (timeline . " %
s")
(todo . " %i %-12:c") (tags . " %i %-12:c") (search
. " %i %-12:c"))
org-agenda-custom-commands '(("a" "" agenda ""
((org-agenda-include-diary t)
(org-agenda-remove-tags t)))
)
org-latex-format-headline-function 'org-latex-format-headline-default-function
org-default-notes-file "~/postdoc.git/org/blotter.org"
org-todo-keyword-faces '(("META" :foreground "darkgreen" :background "snow"
:box
(:line-width -1))
("NOTE" :foreground "lightgreen" :weight bold)
("LOW" :foreground "#cb4b16" :background "snow"
:weight bold :box
(:line-width -1))
("MED" :foreground "goldenrod" :background "cornsilk"
:weight bold
:box (:line-width -1))
("HIGH" :foreground "darkgreen" :background
"honeydew" :weight bold
:box (:line-width -1))
("NICE" :foreground "blue" :background "honeydew"
:weight bold :box
(:line-width -1))
("MUST" :foreground "purple" :background "honeydew"
:weight bold :box
(:line-width -1))
("TODO" :foreground "black" :background "snow"
:weight bold :box
(:line-width -1))
("DONE" . org-done) ("WONTFIX" . org-done) ("ONICE" .
org-done)
("QUESTION" . org-done))
org-capture-templates '(("c" "Comment" entry
(file+headline "~/postdoc.git/org/blotter.org"
"Comments")
"* COMMENT %?\n %i\n %a\n:PROPERTIES:\n:captured:
%U\n:END:")
("q" "Question" entry
(file+headline "~/postdoc.git/org/blotter.org"
"Questions")
"* QUESTION %?\n %i\n %a\n:PROPERTIES:\n:captured:
%U\n:END:")
("t" "Todo" entry
(file+headline "~/postdoc.git/org/blotter.org"
"Tasks")
"* TODO %?\n %i\n %a")
("n" "Note" entry
(file+headline "~/postdoc.git/org/blotter.org"
"Notes")
"* NOTE %?\n %i\n %a")
("c" "calfw2org" entry (file nil) "* %?\n
%(cfw:org-capture-day)"))
org-after-todo-state-change-hook '(org-clock-out-if-current)
org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-from-is-user-regexp "\\<Joe\\>"
org-html-postamble t
org-src-mode-hook '(org-src-babel-configure-edit-buffer
org-src-mode-configure-edit-buffer)
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-babel-pre-tangle-hook '(save-buffer)
org-mode-hook '((lambda nil
(font-lock-add-keywords nil
(quote (("^\\s-*?\\(-\\{1\\}\\|[0-9]+\\.\\)\\s-" 1
font-lock-warning-face t)))
)
(font-lock-add-keywords nil
(quote (("^\\(-\\{5,\\}\\)" 1 font-lock-type-face t))))
)
(closure
(org-inlinetask-min-level buffer-face-mode-face org-mode-map
org-tbl-menu
org-org-menu org-struct-menu org-entities org-last-state
org-id-track-globally org-clock-start-time texmathp-why
remember-data-file
org-agenda-tags-todo-honor-ignore-options
iswitchb-temp-buflist
calc-embedded-open-mode calc-embedded-open-formula
calc-embedded-close-formula align-mode-rules-list
org-emphasis-alist
org-emphasis-regexp-components
org-export-registered-backends org-modules
org-babel-load-languages t)
nil
(add-hook (quote change-major-mode-hook) (quote
org-show-block-all)
(quote append) (quote local))
)
#[0 "\300\301\302\303\304$\207"
[add-hook change-major-mode-hook org-babel-show-result-all
append local] 5]
org-babel-result-hide-spec org-babel-hide-all-hashes)
org-refile-targets '((org-agenda-files :maxlevel . 1)
("~/postdoc.git/org/alt/backlog.org" :maxlevel . 1))
org-archive-hook '(org-attach-archive-delete-maybe)
org-make-link-description-function 'rewrite-link
org-agenda-sorting-strategy '((agenda todo-state-down tag-up category-keep
priority-down)
(todo todo-state-down tag-up priority-down
category-keep)
(tags priority-down category-keep) (search
category-keep))
org-ascii-format-drawer-function #[771 "\207" [] 4 "\n\n(fn NAME CONTENTS
WIDTH)"]
org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point
org-babel-execute-safely-maybe)
org-timer-done-hook '((lambda nil (message "Timer done!")
(when pomodoro-is-active
(save-excursion (set-buffer (get-file-buffer
org-agenda-diary-file))
(pomodoro-mode -1))
(message "Pomodoro done!")
(notifications-notify :title "time over" :body
"record comments and take a break")
(start-process-shell-command "cvlc" nil
(concat "cvlc --play-and-exit --no-video "
timer-done-sound-file))
(org-clock-out))
)
)
org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
org-cycle-show-empty-lines
org-optimize-window-after-visibility-change)
org-agenda-hide-tags-regexp "write"
org-archive-location "~/postdoc.git/org/work.org::datetree/"
org-agenda-use-time-grid nil
org-agenda-finalize-hook '(remove-todo-and-cookies place-agenda-tags)
org-export-before-processing-hook '((lambda (x)
(setq org-html-postamble-format
(list
(list "en"
(concat
"<p class=\"author\">Author:
%a</p>\n<p class=\"date\">Created: %d</p>\n<p class=\"date\">Revised: "
(format-time-string "%B %-d, %Y")
"</p>\n<p
class=\"validation\">%v</p>")
)
)
)
)
)
org-odt-schema-dir nil
org-todo-keywords '((sequence "META(M)" "NOTE(n)" "NICE(i)" "LOW(l)" "MED(m)"
"HIGH(h)"
"MUST(u)" "TODO(t)" "|" "DONE(d)" "WONTFIX(w)" "ONICE(o)"
"QUESTION(q)")
)
org-timer-default-timer 90
org-export-allow-bind-keywords t
org-babel-tangle-lang-exts '(("clojure" . "clj") ("emacs-lisp" . "el")
("elisp" . "el"))
org-confirm-elisp-link-function 'yes-or-no-p
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-html-format-headline-function 'org-html-format-headline-default-function
org-link-parameters '(("id" :follow org-id-open)
("rmail" :follow org-rmail-open :store
org-rmail-store-link)
("mhe" :follow org-mhe-open :store org-mhe-store-link)
("irc" :follow org-irc-visit :store org-irc-store-link)
("info" :follow org-info-open :export org-info-export
:store
org-info-store-link)
("gnus" :follow org-gnus-open :store org-gnus-store-link)
("docview" :follow org-docview-open :export
org-docview-export :store
org-docview-store-link)
("bibtex" :follow org-bibtex-open :store
org-bibtex-store-link)
("bbdb" :follow org-bbdb-open :export org-bbdb-export
:complete
org-bbdb-complete-link :store org-bbdb-store-link)
("w3m" :store org-w3m-store-link)
("cite" :follow org-bibtex-goto-citation :export nil)
("mu4e" :follow org-mu4e-open :export nil) ("file+sys")
("file+emacs")
("doi" :follow org--open-doi-link) ("elisp" :follow
org--open-elisp-link)
("file" :complete org-file-complete-link)
("ftp" :follow (lambda (path) (browse-url (concat "ftp:"
path))))
("help" :follow org--open-help-link)
("http" :follow (lambda (path) (browse-url (concat
"http:" path))))
("https" :follow (lambda (path) (browse-url (concat
"https:" path))))
("mailto" :follow (lambda (path) (browse-url (concat
"mailto:"; path))))
("news" :follow (lambda (path) (browse-url (concat
"news:"; path))))
("shell" :follow org--open-shell-link))
org-structure-template-alist '(("s" "#+BEGIN_SRC ?\n\n#+END_SRC")
("e" "#+BEGIN_EXAMPLE\n?\n#+END_EXAMPLE")
("q" "#+BEGIN_QUOTE\n?\n#+END_QUOTE")
("v" "#+BEGIN_VERSE\n?\n#+END_VERSE")
("V" "#+BEGIN_VERBATIM\n?\n#+END_VERBATIM")
("c" "#+BEGIN_CENTER\n?\n#+END_CENTER")
("l" "#+BEGIN_LaTeX\n?\n#+END_LaTeX") ("L"
"#+LaTeX: ")
("h" "#+BEGIN_HTML\n?\n#+END_HTML") ("H"
"#+HTML: ")
("a" "#+BEGIN_ASCII\n?\n#+END_ASCII") ("A"
"#+ASCII: ")
("i" "#+INDEX: ?") ("I" "#+INCLUDE: %file ?")
("x" "#+BEGIN_COMMENT\n?\n#+END_COMMENT"))
org-babel-load-languages '((clojure . t) (emacs-lisp . t))
org-clock-sound t
org-cycle-global-at-bob t
org-tree-slide-slide-in-effect nil
org-agenda-include-deadlines nil
org-html-format-inlinetask-function
'org-html-format-inlinetask-default-function
org-agenda-mode-hook '(hide-notes)
org-agenda-files '("~/postdoc.git/org/")
org-clock-out-hook '((lambda nil
(when (timerp org-timer-countdown-timer)
(save-excursion (set-buffer (get-file-buffer
org-agenda-diary-file))
(pomodoro-mode -1))
(cancel-timer org-timer-countdown-timer))
(let ((comments (read-string "Comments: ")))
(save-excursion (org-set-property "SUMMARY" comments)))
(let ((minutes (read-number "Take a break: " 5)))
(when (> minutes 0) (org-agenda-list)
(org-agenda-diary-entry-in-org-file-programmatically
(concat (int-to-string minutes) " minute break "
(substring (current-time-string) 11 16))
)
(org-agenda-list) (search-forward "break")
(goto-char (line-beginning-position))
(org-timer-set-timer minutes))
)
)
org-clock-remove-empty-clock-drawer)
)
- [O] Bug: entering range of times [9.0.5 (release_9.0.5-474-g942b62 @ /home/joe/org-mode/lisp/)],
Joe Corneli <=