From mboxrd@z Thu Jan 1 00:00:00 1970 From: Samuel Wales Subject: Re: bugs in org-remember-backup-directory Date: Thu, 4 Jun 2009 20:59:48 -0700 Message-ID: <20524da70906042059n4d9f0f78qd6d80c5ca48e3377@mail.gmail.com> References: <20524da70904251508w523010efj6a07e25f1cbb03fa@mail.gmail.com> <20524da70905041014u7378d152hdcee65fdc7fc4739@mail.gmail.com> <20524da70905041057w64e3ba2fr4c5c9f9199c51d9c@mail.gmail.com> <20524da70906041429n5270a4f4ice50676d2587a9d0@mail.gmail.com> Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1MCQbF-0005jM-4V for emacs-orgmode@gnu.org; Fri, 05 Jun 2009 00:00:13 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1MCQbE-0005jA-Rt for emacs-orgmode@gnu.org; Fri, 05 Jun 2009 00:00:12 -0400 Received: from [199.232.76.173] (port=43970 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MCQbE-0005j7-J6 for emacs-orgmode@gnu.org; Fri, 05 Jun 2009 00:00:12 -0400 Received: from yw-out-1718.google.com ([74.125.46.154]:5584) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1MCQbD-0007eN-Tm for emacs-orgmode@gnu.org; Fri, 05 Jun 2009 00:00:12 -0400 Received: by yw-out-1718.google.com with SMTP id 5so680520ywm.66 for ; Thu, 04 Jun 2009 21:00:08 -0700 (PDT) In-Reply-To: <20524da70906041429n5270a4f4ice50676d2587a9d0@mail.gmail.com> 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: Carsten Dominik Cc: emacs-orgmode@gnu.org The bug still exists. To reproduce, run emacs -Q --load , remember a task, make enough changes to trigger do-auto-save, then c-x c-s. It should tell you it has changed and ask if you want to save. You will have to set 3 env vars for dirs of your choice. I didn't want to risk making dirs for you. (require 'cl) (defun alpha-add-path (p) (setq load-path (cons p load-path))) (alpha-add-path (concat (getenv "delorgsrc") "/lisp")) (alpha-add-path (concat (getenv "delpkgbef") "/remember")) (add-to-list 'auto-mode-alist '("\\.org$" . org-mode)) (defvar alpha-mac-font "-apple-courier-medium-r-normal--24-240-72-72-m-240-iso10646-1") '(progn (progn (defconst alpha-mac-font-2 "-apple-courier-medium-r-normal--*-*-*-*-*-240-*") (set-frame-font alpha-mac-font-2)) ) (set-frame-font alpha-mac-font) (require 'org-install) (defvar alpha-org-map (make-sparse-keymap "alpha org map")) (define-key global-map [f8] alpha-org-map) (define-key alpha-org-map [f8] 'org-remember) ;c-c r (define-key alpha-org-map "o" 'org-open-at-point-global) ;c-c o (require 'remember-autoloads) (org-remember-insinuate) (setq org-remember-templates `(("conversation" ?c "* CONVERSATION %U %?\n%i"))) (add-hook 'remember-mode-hook 'delete-other-windows) (setf org-remember-backup-directory (getenv "demacsremember")) ;;;(setf org-remember-backup-directory nil) (add-hook 'org-remember-mode-hook (lambda () (when org-remember-backup-directory (cd org-remember-backup-directory)))) (add-hook 'org-remember-mode-hook (lambda () (define-key org-remember-mode-map "\C-x\C-s" 'org-remember-finalize) ;;i think org-mode-map will override? (define-key org-remember-mode-map "\C-c\C-c" nil)))