Re: [Orgmode] Cannot use org-mode and remember templates

2009-07-17 Thread Frank Rust
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 nicholas.do...@hp.com wrote:

 Frank Rust rusti...@gmail.com 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


___
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


Re: [Orgmode] Cannot use org-mode and remember templates

2009-07-17 Thread Nick Dokos
Frank Rust rusti...@gmail.com wrote:

 Thanks to all for the hints so far but unfortunately the setting for 
 org-time-stamp-rounding-minutes did not solve my problem.
 

What does

 C-h v org-time-stamp-rounding-minutes RET

say?

In fact, it might be better to evaluate it in the backtrace buffer
itself: when you get the error, go to the backtrace buffer, type `e'
which should give you an ``Eval: '' prompt in the echo area and then type
``org-time-stamp-rounding-minutesRET''.

You see, the function that gets the error, org-current-time,
is very short and simple:

,
| (defun org-current-time ()
|   Current time, possibly rounded to `org-time-stamp-rounding-minutes'.
|   (if ( (car org-time-stamp-rounding-minutes) 1)
|   (let ((r (car org-time-stamp-rounding-minutes))
|   (time (decode-time)))
|   (apply 'encode-time
|  (append (list 0 (* r (floor (+ .5 (/ (float (nth 1 time)) r)
|  (nthcdr 2 time
| (current-time)))
`

so there is not that much that can go wrong: the error message pretty
much says we are trying to apply a function that takes a list as
argument to something that is not a list: car is one such
function. That's why I still think that the
org-time-stamp-rounding-minutes variable is at fault. Are you setting it
like this:

(setq org-time-stamp-rounding-minutes '(0 5))

in your .emacs?

BTW, what version of orgmode are you using?

Thanks,
Nick

 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 nicholas.do...@hp.com wrote:
 
 Frank Rust rusti...@gmail.com 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): 

Re: [Orgmode] Cannot use org-mode and remember templates

2009-07-17 Thread Frank Rust
Hi all,

sorry for the confusion but I finally found the reason for my problem.

I set the variable org-time-stamp-rounding-minutes in my .emacs correctly
but unfortunately I didn't recognize the same variable in
custom-set-variables section. :(

@Bastien: In the meantime I installed the actual version Org-mode version
6.28e

Thanks a lot for all your efforts.

Kind regards,
Frank

PS: At least I learned some aspects of lisp debugging. :)
___
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


Re: [Orgmode] Cannot use org-mode and remember templates

2009-07-16 Thread Nick Dokos
Frank Rust rusti...@gmail.com wrote:


 I'm using a new version of emacs for windows (GNU Emacs 23.1.50.1 
 (i386-mingw-nt5.1.2600) of 2009-06-30 on LENNART-69DE564 (patched)) which 
 provides
 Org-mode in version 6.21b.
 
 After the last upgrade the remember templates are not working anymore. 
 Everytime I select a template with my shortcuts I receive the following error:
 
 Select template: [t]odo [j]ournal
 org-remember-apply-template: Wrong type argument: listp, 5
 

Please provide a backtrace: set the variable `debug-on-error' to t, e.g.
by doing

   M-x set-varRETdebug-on-errorRETtRET


and do whatever is necessary to produce the error - the backtrace should
appear in a buffer called '*Backtrace*. If you can do that with
uncompiled code, that is vastly preferable: do 

  M-x load-library RETorg-remember.elRET

first and then try to produce the error.

Thanks,
Nick


___
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


Re: [Orgmode] Cannot use org-mode and remember templates

2009-07-16 Thread Nick Dokos
Frank Rust rusti...@gmail.com 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



___
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


Re: [Orgmode] Cannot use org-mode and remember templates

2009-07-16 Thread Frank Rust

 Please provide a backtrace: set the variable `debug-on-error' to t, e.g.
 by doing

   M-x set-varRETdebug-on-errorRETtRET



 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 RETorg-remember.elRET

 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(  -- 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
___
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