Re: Cannot use org-mode and remember templates

From: Frank Rust <rustikus@gmail.com>
To: nicholas.dokos@hp.com
Cc: emacs-orgmode@gnu.org
Subject: Re: Cannot use org-mode and remember templates
Date: Thu, 16 Jul 2009 18:32:25 +0200	[thread overview]
Message-ID: <6683149f0907160932h223df5fem75f8365b8960f908@mail.gmail.com> (raw)
In-Reply-To: <13661.1247754819@gamaville.dokosmarshall.org>

[-- Attachment #1.1: Type: text/plain, Size: 4093 bytes --]

>
> Please provide a backtrace: set the variable `debug-on-error' to t, e.g.
> by doing
>
>   M-x set-var<RET>debug-on-error<RET>t<RET>
>

>
> and do whatever is necessary to produce the error - the backtrace should
> appear in a buffer called '*Backtrace*.

Debugger entered--Lisp error: (wrong-type-argument listp 5)
  org-current-time()
  org-remember-apply-template()
  run-hooks(text-mode-hook remember-mode-hook)
  apply(run-hooks (text-mode-hook remember-mode-hook))
  run-mode-hooks(remember-mode-hook)
  remember-mode()
  remember(nil)
  call-interactively(remember nil nil)

> If you can do that with
> uncompiled code, that is vastly preferable: do
>
>  M-x load-library <RET>org-remember.el<RET>
>
> first and then try to produce the error.
>

Debugger entered--Lisp error: (wrong-type-argument listp 5)
  org-current-time()
  (or org-overriding-default-time (org-current-time))
  (let* ((entry ...) (ct ...) (dct ...) (ct1 ...) (tpl ...) (plist-p ...)
(file ...) (headline ...) (v-c ...) (v-x ...) (v-t ...) (v-T ...) (v-u ...)
(v-U ...) (v-i ...) (v-a ...) (clipboards ...) (v-A ...) (v-n
user-full-name) (v-k ...) (v-K ...) v-I (org-startup-folded nil)
(org-inhibit-startup t) org-time-was-given org-end-time-was-given x prompt
completions char time pos default histvar) (when (functionp file) (setq file
...)) (when (and file ...) (setq file ...)) (setq org-store-link-plist
(append ... org-store-link-plist)) (unless tpl (setq tpl "") (message "No
template") (ding) (sit-for 1)) (erase-buffer) (insert
(substitute-command-keys ...)) (insert tpl) (goto-char (point-min)) (while
(re-search-forward "%\\([tTuUaiAcxkKI]\\)" nil t) (when ... ...)
(replace-match ... t t)) (goto-char (point-min)) (while (re-search-forward
"%\\[\\(.+\\)\\]" nil t) (let ... ... ... ...)) (goto-char (point-min))
(while (re-search-forward "%\\((.+)\\)" nil t) (goto-char ...) (let ... ...
...)) (when plist-p (goto-char ...) (while ... ...)) (let (...) (org-mode)
(org-remember-mode 1)) (if (and file ... ...) (org-set-local ... file)) (if
headline (org-set-local ... headline)) (goto-char (point-min)) (while
(re-search-forward "%^\\({\\([^}]*\\)}\\)?\\([gGtTuUCLp]\\)?" nil t) (setq
char ... prompt ...) (goto-char ...) (replace-match "") (setq completions
nil default nil) (when prompt ...) (cond ... ... ... ... ... ...))
(goto-char (point-min)) (if (re-search-forward "%\\?" nil t) (replace-match
"") (and ... ...)))
  (if org-remember-templates (let* (... ... ... ... ... ... ... ... ... ...
... ... ... ... ... ... ... ... ... ... ... v-I ... ... org-time-was-given
org-end-time-was-given x prompt completions char time pos default histvar)
(when ... ...) (when ... ...) (setq org-store-link-plist ...) (unless tpl
... ... ... ...) (erase-buffer) (insert ...) (insert tpl) (goto-char ...)
(while ... ... ...) (goto-char ...) (while ... ...) (goto-char ...) (while
... ... ...) (when plist-p ... ...) (let ... ... ...) (if ... ...) (if
headline ...) (goto-char ...) (while ... ... ... ... ... ... ...) (goto-char
...) (if ... ... ...)) (let (...) (org-mode) (org-remember-mode 1)))
  org-remember-apply-template()
  run-hooks(text-mode-hook remember-mode-hook)
  apply(run-hooks (text-mode-hook remember-mode-hook))
  run-mode-hooks(remember-mode-hook)
  remember-mode()
  remember(nil)
  call-interactively(remember nil nil)
  recursive-edit()
  byte-code(" xxxxxxxx --> bytecode" [unread-command-char debugger-args x
debugger-buffer noninteractive debugger-batch-max-lines -1 debug
backtrace-debug 4 t backtrace-frame lambda 5 pop-to-buffer debugger-mode
debugger-setup-buffer count-lines 2 "...\n" message "%s" buffer-string
kill-emacs "" nil recursive-edit middlestart buffer-read-only
standard-output] 4)
  debug(error (wrong-type-argument listp 5))
  org-current-time()
  org-remember-apply-template()
  run-hooks(text-mode-hook remember-mode-hook)
  apply(run-hooks (text-mode-hook remember-mode-hook))
  run-mode-hooks(remember-mode-hook)
  remember-mode()
  remember(nil)
  call-interactively(remember nil nil)

>
> Thanks,
> Nick
>

I hope this helps.

Thanks and regards,
Frank

[-- Attachment #1.2: Type: text/html, Size: 5138 bytes --]

[-- Attachment #2: Type: text/plain, Size: 204 bytes --]

_______________________________________________
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