From mboxrd@z Thu Jan 1 00:00:00 1970 From: Frank Rust Subject: Re: Cannot use org-mode and remember templates Date: Fri, 17 Jul 2009 16:03:00 +0200 Message-ID: <6683149f0907170703n24dbccch4d41fbbdf6bfb480@mail.gmail.com> References: <6683149f0907160338kf3f6564t6dc313ffd1e4353d@mail.gmail.com> <13661.1247754819@gamaville.dokosmarshall.org> <6683149f0907160932h223df5fem75f8365b8960f908@mail.gmail.com> <18562.1247764069@gamaville.dokosmarshall.org> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="===============0459157250==" Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1MRo1l-000256-LT for emacs-orgmode@gnu.org; Fri, 17 Jul 2009 10:03:09 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1MRo1h-00022w-28 for emacs-orgmode@gnu.org; Fri, 17 Jul 2009 10:03:09 -0400 Received: from [199.232.76.173] (port=48028 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MRo1g-00022t-VH for emacs-orgmode@gnu.org; Fri, 17 Jul 2009 10:03:04 -0400 Received: from mail-fx0-f217.google.com ([209.85.220.217]:62076) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1MRo1g-00008q-6C for emacs-orgmode@gnu.org; Fri, 17 Jul 2009 10:03:04 -0400 Received: by fxm17 with SMTP id 17so923286fxm.42 for ; Fri, 17 Jul 2009 07:03:02 -0700 (PDT) In-Reply-To: <18562.1247764069@gamaville.dokosmarshall.org> 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 --===============0459157250== Content-Type: multipart/alternative; boundary=0016e6de003306e483046ee73f54 --0016e6de003306e483046ee73f54 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 7bit Thanks to all for the hints so far but unfortunately the setting for "org-time-stamp-rounding-minutes" did not solve my problem. Here is an actual backtrace: 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) I hope this helps. Thanks and regards, Frank On Thu, Jul 16, 2009 at 7:07 PM, Nick Dokos wrote: > Frank Rust wrote: > > > 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) > > > > > > > > Debugger entered--Lisp error: (wrong-type-argument listp 5) > > org-current-time() > > > > ... > > > > I hope this helps. > > p > > In this case, no, because Seb Vauban nailed the cause (he must have > recently polished his crystal ball, so he did not need a backtrace at > all): org-time-stamp-rounding-minutes should be a list of two numbers. > > In general, however, a bug report with a backtrace and uncompiled code > makes things much easier: from your backtrace, anybody (with some > knowledge of lisp) can see what the problem is - no crystal ball > required. > > Thanks, > Nick > > --0016e6de003306e483046ee73f54 Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: quoted-printable Thanks to all for the hints so far but unfortunately the setting for "= ;org-time-stamp-rounding-minutes" did not solve my problem.

Her= e is an actual backtrace:

Debugger entered--Lisp error: (wrong-type-= argument listp 5)
=C2=A0 org-current-time()
=C2=A0 (or org-overriding-default-time (org-cu= rrent-time))
=C2=A0 (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) (o= rg-inhibit-startup t) org-time-was-given org-end-time-was-given x prompt co= mpletions char time pos default histvar) (when (functionp file) (setq file = ...)) (when (and file ...) (setq file ...)) (setq org-store-link-plist (app= end ... org-store-link-plist)) (unless tpl (setq tpl "") (message= "No template") (ding) (sit-for 1)) (erase-buffer) (insert (subst= itute-command-keys ...)) (insert tpl) (goto-char (point-min)) (while (re-se= arch-forward "%\\([tTuUaiAcxkKI]\\)" nil t) (when ... ...) (repla= ce-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]\\)?&q= uot; 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 ... ...)))
=C2=A0 (if org-remember-templates (let* (... ... ... ... ... ... ... ... ..= . ... ... ... ... ... ... ... ... ... ... ... ... v-I ... ... org-time-was-= given org-end-time-was-given x prompt completions char time pos default his= tvar) (when ... ...) (when ... ...) (setq org-store-link-plist ...) (unless= tpl ... ... ... ...) (erase-buffer) (insert ...) (insert tpl) (goto-char .= ..) (while ... ... ...) (goto-char ...) (while ... ...) (goto-char ...) (wh= ile ... ... ...) (when plist-p ... ...) (let ... ... ...) (if ... ...) (if = headline ...) (goto-char ...) (while ... ... ... ... ... ... ...) (goto-cha= r ...) (if ... ... ...)) (let (...) (org-mode) (org-remember-mode 1)))
=C2=A0 org-remember-apply-template()
=C2=A0 run-hooks(text-mode-hook rem= ember-mode-hook)
=C2=A0 apply(run-hooks (text-mode-hook remember-mode-ho= ok))
=C2=A0 run-mode-hooks(remember-mode-hook)
=C2=A0 remember-mode()=
=C2=A0 remember(nil)
=C2=A0 call-interactively(remember nil nil)

I hope this helps.
Thanks and regards,
Frank




--0016e6de003306e483046ee73f54-- --===============0459157250== Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ 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 --===============0459157250==--