From mboxrd@z Thu Jan 1 00:00:00 1970 From: Charles Cave Subject: Remember mode (frist time) reports wrong type argument: stringp, nil Date: Tue, 23 Dec 2008 10:48:24 +1100 Message-ID: <200812222348.mBMNmOJm004823@mail06.syd.optusnet.com.au> Reply-To: charles_cave@optusnet.com.au Mime-Version: 1.0 Content-Type: text/plain Content-Transfer-Encoding: binary Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1LEuVm-0003FF-4m for emacs-orgmode@gnu.org; Mon, 22 Dec 2008 18:48:34 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1LEuVl-0003Dy-3Y for emacs-orgmode@gnu.org; Mon, 22 Dec 2008 18:48:33 -0500 Received: from [199.232.76.173] (port=49142 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1LEuVk-0003Du-W1 for emacs-orgmode@gnu.org; Mon, 22 Dec 2008 18:48:33 -0500 Received: from mail06.syd.optusnet.com.au ([211.29.132.187]:53689) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1LEuVk-000702-3A for emacs-orgmode@gnu.org; Mon, 22 Dec 2008 18:48:32 -0500 Received: from localhost.localdomain (webmail04.syd.optusnet.com.au [211.29.132.238]) by mail06.syd.optusnet.com.au (8.13.1/8.13.1) with ESMTP id mBMNmOJm004823 for ; Tue, 23 Dec 2008 10:48:24 +1100 Content-Disposition: inline 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 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)