emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Orgmode] Remember mode (frist time) reports wrong type argument: string


From: Charles Cave
Subject: [Orgmode] Remember mode (frist time) reports wrong type argument: stringp, nil
Date: Tue, 23 Dec 2008 10:48:24 +1100

The first time I use Remember, after I file the note with C-c C-c
I get a message: Wrong type argument: stringp, nil
When I repeat C-c C-c  the note is filed successfully.

When I run Remember again, there is no problem.

My org version: 6.15d
My emacs version: 22.1.1   (GNU on Windows XP)

Relevant part of .emacs file:

(setq load-path (append load-path (list "L:/elisp")))
(add-to-list 'load-path "L:/elisp/")
(add-to-list 'load-path "L:/elisp/remember-1.9/")

;; 20th JUly 2007 following line:
;; (require 'org-export-latex)

(autoload 'remember "remember" nil t)
(autoload 'remember-region "remember" nil t)

(setq org-directory "~/orgfiles/")
(setq org-default-notes-file "~/.notes")
(setq remember-annotation-functions '(org-remember-annotation))
(setq remember-handler-functions '(org-remember-handler))
(add-hook 'remember-mode-hook 'org-remember-apply-template)
(define-key global-map "\C-cr" 'org-remember)

(setq org-remember-templates
     '(("Todo" ?t "* TODO %? %^g\n %i\n " "E:/GTD/newgtd.org" "Tasks")
      ("Journal" ?j "\n* %^{topic} %T \n%i%?\n" "L:journal.org")
      ("Book" ?b "\n* %^{Book Title} %t :READING: \n%[l:/booktemp.txt]\n" 
"L:journal.org")
      ("Private" ?p "\n* %^{topic} %T \n%i%?\n" "E:/gtd/privnotes.org")
      ("Special" ?s "\n* My test\n %i \nLIne2 %x" "E:/gtd/privnotes.org")
      ("Contact" ?c "\n* %^{Name} :CONTACT:\n%[l:/contemp.txt]\n" 
"E:/gtd/privnotes.org")
      ))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Backward trace:

Debugger entered--Lisp error: (wrong-type-argument stringp nil)
  set-buffer(nil)
  (save-current-buffer (set-buffer (or visiting ...)) (unless (org-mode-p) 
(error "Target files for remember notes must be in Org-mode")) (save-excursion 
(save-restriction ... ... ... ... ... ... ... ... ... ...)))
  (with-current-buffer (or visiting (get-file-buffer file)) (unless 
(org-mode-p) (error "Target files for remember notes must be in Org-mode")) 
(save-excursion (save-restriction ... ... ... ... ... ... ... ... ... ...)))
  (let* ((visitp ...) (previousp ...) (clockp ...) (fastp ...) (file ...) 
(heading org-remember-default-headline) (visiting ...) (org-startup-folded nil) 
(org-startup-align-all-tables nil) (org-goto-start-pos 1) spos exitcmd level 
reversed txt) (when (equal current-prefix-arg ...) (setq visitp t)) (when 
previousp (setq file ... visiting ... heading ... fastp t)) (when clockp (setq 
file ... visiting ... heading org-clock-heading-for-remember fastp t)) (setq 
current-prefix-arg nil) (goto-char (point-min)) (if (re-search-forward "[  
\n]+\\'" nil t) (replace-match "")) (goto-char (point-min)) (unless (looking-at 
org-outline-regexp) (insert ...) (backward-char 1) (when org-adapt-indentation 
...)) (goto-char (point-min)) (if (re-search-forward "\n[        ]*\n[   
\n]*\\'" nil t) (replace-match "\n\n") (if ... ...)) (goto-char (point-min)) 
(setq txt (buffer-string)) (org-save-markers-in-region (point-min) (point-max)) 
(when (and ... ...) (org-refile nil ...) (and visitp ...) (save-excursi!
 on ... ... ...) (throw ... t)) (if (not visiting) (find-file-noselect file)) 
(with-current-buffer (or visiting ...) (unless ... ...) (save-excursion ...)))


  (catch (quote quit) (if org-note-abort (throw ... nil)) (let* (... ... ... 
... ... ... ... ... ... ... spos exitcmd level reversed txt) (when ... ...) 
(when previousp ...) (when clockp ...) (setq current-prefix-arg nil) (goto-char 
...) (if ... ...) (goto-char ...) (unless ... ... ... ...) (goto-char ...) (if 
... ... ...) (goto-char ...) (setq txt ...) (org-save-markers-in-region ... 
...) (when ... ... ... ... ...) (if ... ...) (with-current-buffer ... ... ...)))
  org-remember-handler()
  run-hook-with-args-until-success(org-remember-handler)
  (if remember-all-handler-functions (run-hooks (quote 
remember-handler-functions)) (run-hook-with-args-until-success (quote 
remember-handler-functions)))
  (save-restriction (narrow-to-region b e) (if remember-all-handler-functions 
(run-hooks ...) (run-hook-with-args-until-success ...)) (remember-destroy))
  (let ((b ...) (e ...)) (save-restriction (narrow-to-region b e) (if 
remember-all-handler-functions ... ...) (remember-destroy)))
  remember-region(1 412)
  remember-finalize()
  org-remember-finalize()
  call-interactively(org-remember-finalize)

  




reply via email to

[Prev in Thread] Current Thread [Next in Thread]