Re: bugs in org-remember-backup-directory

[Samuel Wales <samologist@gmail.com>]

Strange that it is not reproducible even with the minimal startup.

It happens to me every time I save a remember that is long enough to
trigger auto-save.

On Fri, Jun 5, 2009 at 00:00, Carsten Dominik<carsten.dominik@gmail.com> wrote:
> I am still unable to reproduce this.
>
> Anyone?
>
> - Carsten
>
> On Jun 5, 2009, at 5:59 AM, Samuel Wales wrote:
>
>> The bug still exists.
>>
>> To reproduce, run emacs -Q --load <the minimal setup below>, 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)))
>
>



-- 
Myalgic encephalomyelitis denialism is causing death and severe suffering,
worse than MS.  Conflicts of interest are destroying research.  /You/ can
get the disease at any time permanently.  Do science and justice matter to
you?  http://www.meactionuk.org.uk/What_Is_ME_What_Is_CFS.htm