[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: some issues with message expiration
Hi,
>>>>> On Thu, 15 Jul 2010 22:32:54 +0200, David Maus ("DM") wrote:
DM> [1 <text/plain; US-ASCII (7bit)>]
DM> Dirk-Jan C. Binnema wrote:
>> Hi all,
>> I'm playing around a bit the message expiration in Wanderlust; in theory, it's
>> a quite useful feature, as it enables me to automatically delete/refile old
>> messages. However, it does not seem to work very well with me, and often
>> requires me to get into a situation where I need to restart emacs(!).
DM> Could you provide a backtrace of the errors?
DM> M-x toggle-debug-on-error RET
DM> hit the bugs and remove possible confidential information?
First use case is where I try to expire my 'system' folder (which receives all
kinds of useless messages from various programs); in my wl-expire-alist:
("^\\.system$" (date 3) remove)
First it updates the message
db, then I get the 'Wrong type argument: listp, nil'. However, I do /not/ get
any backtrace. When I then try to enter the folder, or do anything (even when
trying M-x toggle-debug-on-error), I either get that same error again. And I
cannot move the cursor anymore. Emacs menus are still accessible though, it's
not a general hang. But just about whatever I do gives me 'Wrong type
argument: listp, nil'.
Interestingly, pressing the 'close' button on the window (eh, frame), does not
close the window, but restores cursor movement (C-g doesn't). But I still
cannot enter folders; entering the 'system' folder gives me a 'Format
specifier doesn't match argument type', any other folder results in 'Wrong
type argument: sequencep, nil'. But no backtraces :(
Then, my junk-folder:
("^\\.junk$" (date 1) trash)
If there's nothing to expire, it complete without any problem; however, if
there *is*, I get:
--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil)
elmo-location-map-setup([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".trash" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir strash" nil nil nil t nil nil x-ctext nil nil nil "/home/foo/Maildir/trash" nil nil nil] ((nil)))
elmo-location-map-load([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".trash" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir strash" nil nil nil t nil nil x-ctext nil nil nil "/home/foo/Maildir/trash" nil nil nil] "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir strash")
#[(folder) "\301\302!\"\210\303!\205 \304\305!\"\207" [folder elmo-location-map-load elmo-folder-msgdb-path elmo-folder-plugged-p elmo-location-map-update elmo-map-folder-list-message-locations] 4]([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".trash" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir strash" nil nil nil t nil nil x-ctext nil nil nil "/home/foo/Maildir/trash" nil nil nil])
apply(#[(folder) "\301\302!\"\210\303!\205 \304\305!\"\207" [folder elmo-location-map-load elmo-folder-msgdb-path elmo-folder-plugged-p elmo-location-map-update elmo-map-folder-list-message-locations] 4] [elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".trash" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir strash" nil nil nil t nil nil x-ctext nil nil nil "/home/foo/Maildir/trash" nil nil nil])
luna-call-next-method()
luna-apply-generic([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".trash" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir strash" nil nil nil t nil nil x-ctext nil nil nil "/home/foo/Maildir/trash" nil nil nil] elmo-folder-open-internal [elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".trash" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir strash" nil nil nil t nil nil x-ctext nil nil nil "/home/foo/Maildir/trash" nil nil nil])
elmo-folder-open-internal([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".trash" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir strash" nil nil nil t nil nil x-ctext nil nil nil "/home/foo/Maildir/trash" nil nil nil])
elmo-folder-move-messages([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".junk" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" [modb-standard [0 0 0 0 0 0 0] "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" nil nil x-ctext (494 495 496 497 498 499) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740415051000\.2E5616B2B68CEEC0@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740416105608\.5A7927A1BE9E9006@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext nil nil 499 "/home/foo/Maildir/junk" ("1279254005.3224_1.cthulhu" "1279226109.8019_2.cthulhu" "1279216516.3144_1.cthulhu") nil nil] (494 495) [elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".trash" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir strash" nil nil nil t nil nil x-ctext nil nil nil "/home/foo/Maildir/
trash" nil nil nil] nil nil)
wl-expire-refile([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".junk" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" [modb-standard [0 0 0 0 0 0 0] "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" nil nil x-ctext (494 495 496 497 498 499) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740415051000\.2E5616B2B68CEEC0@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740416105608\.5A7927A1BE9E9006@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext nil nil 499 "/home/foo/Maildir/junk" ("1279254005.3224_1.cthulhu" "1279226109.8019_2.cthulhu" "1279216516.3144_1.cthulhu") nil nil] (494 495) ".trash")
wl-expire-folder([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".junk" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" [modb-standard [0 0 0 0 0 0 0] "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" nil nil x-ctext (494 495 496 497 498 499) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740415051000\.2E5616B2B68CEEC0@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740416105608\.5A7927A1BE9E9006@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext nil nil 499 "/home/foo/Maildir/junk" ("1279254005.3224_1.cthulhu" "1279226109.8019_2.cthulhu" "1279216516.3144_1.cthulhu") nil nil] nil (date 1) trash)
apply(wl-expire-folder [elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".junk" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" [modb-standard [0 0 0 0 0 0 0] "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" nil nil x-ctext (494 495 496 497 498 499) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740415051000\.2E5616B2B68CEEC0@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740416105608\.5A7927A1BE9E9006@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext nil nil 499 "/home/foo/Maildir/junk" ("1279254005.3224_1.cthulhu" "1279226109.8019_2.cthulhu" "1279216516.3144_1.cthulhu") nil nil] nil ((date 1) trash))
wl-summary-expire([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".junk" "." "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" [modb-standard [0 0 0 0 0 0 0] "/home/foo/.emacs.d/data/wl/elmo-foo/maildir/ shome sfoo sMaildir sjunk" nil nil x-ctext (494 495 496 497 498 499) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740415051000\.2E5616B2B68CEEC0@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 <19740416105608\.5A7927A1BE9E9006@MTX2\.mbn1\.net> 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext nil nil 499 "/home/foo/Maildir/junk" ("1279254005.3224_1.cthulhu" "1279226109.8019_2.cthulhu" "1279216516.3144_1.cthulhu") nil nil] no-summary)
wl-folder-expire-entity(#(".junk" 0 5 (wl-folder-entity-id 26 wl-folder-is-group nil)))
wl-folder-expire-current-entity()
call-interactively(wl-folder-expire-current-entity nil nil)
--8<---------------cut here---------------end--------------->8---
So, not sure what to do... hope it's clear for someone!
Best wishes,
Dirk.
--
Dirk-Jan C. Binnema Helsinki, Finland
e:djcb@djcbsoftware.nl w:www.djcbsoftware.nl
pgp: D09C E664 897D 7D39 5047 A178 E96A C7A1 017D DA3C