[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[mhc:01846] Re: mhc with wanderlust でエラー
ご面倒お掛けします。
> 多分, どっちのパッチを当てても, 一旦 mhc 以外のフォルダに入った後
> mhc summary に入るとエラーになるんじゃないかと思います.
>
> hook 変数をバッファローカルにするのに make-local-variable を使っ
> てしまっていたのを make-local-hook を使う様に修正したので, CVS
> HEAD の wanderlust と 2番目のパッチを当てた mhc-wl.el で試してみ
> て下さい.
この状態で、普通では、エラーが出なくなりました。
かなり限定された条件でのみ、エラーが発生します。Backtraceを添付します。
backtraceを採取した時は、次に手順でした。
wanderlust の Folder mode から
C-c . . ;; mhc起動
C-c . ? ;; mhc calendar を下に表示
C-c . p ;; 9月に移動
*scrach* で (setq mhc-use-wide-scope 8)を評価
C-c . s ;; 9月の mhc summary を拡大
C-c . n ;; 10月に戻る
ここでエラーが発生しました。
(setq mhc-use-wide-scope nil)の時は、
C-c . p
C-c . n
でも大丈夫でした。
宜しくお願いします。
Takashi Hiromatsu *************************
e-mail:takashi-hiromatsu@xxxxxxxxxxx
********************************************
Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil)
#[(folder number) " �H�S �H8 �H�B�\n@\nA\")�" [number folder pair 12 11 elmo-message-flags] 4]([elmo-multi-folder [0 0 0 0 0 0 0] multi "*+schedule/intersect,+schedule/2003/10,+schedule/2003/09,+schedule/2003/11" "*" nil (nil) nil t nil nil ([elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/intersect" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" nil nil nil nil nil nil] nil t nil nil "schedule/intersect" "d:/cygwin/home/A208752/Mail/schedule/intersect"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/10" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" nil nil nil nil nil nil] nil t nil nil "schedule/2003/10" "d:/cygwin/home/A208752/Mail/schedule/2003/10"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/09" "+" nil nil nil t nil nil "schedule/2003/09" "d:/cygwin/home/A208752/Mail/schedule/2003/09"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/11" "+" nil nil nil t nil nil "schedule/2003/11" "d:/cygwin/home/A208752/Mail/schedule/2003/11"]) 100000] nil)
apply(#[(folder number) " �H�S �H8 �H�B�\n@\nA\")�" [number folder pair 12 11 elmo-message-flags] 4] ([elmo-multi-folder [0 0 0 0 0 0 0] multi "*+schedule/intersect,+schedule/2003/10,+schedule/2003/09,+schedule/2003/11" "*" nil (nil) nil t nil nil ([elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/intersect" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" nil nil nil nil nil nil] nil t nil nil "schedule/intersect" "d:/cygwin/home/A208752/Mail/schedule/intersect"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/10" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" nil nil nil nil nil nil] nil t nil nil "schedule/2003/10" "d:/cygwin/home/A208752/Mail/schedule/2003/10"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/09" "+" nil nil nil t nil nil "schedule/2003/09" "d:/cygwin/home/A208752/Mail/schedule/2003/09"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/11" "+" nil nil nil t nil nil "schedule/2003/11" "d:/cygwin/home/A208752/Mail/schedule/2003/11"]) 100000] nil))
luna-call-next-method()
luna-apply-generic([elmo-multi-folder [0 0 0 0 0 0 0] multi "*+schedule/intersect,+schedule/2003/10,+schedule/2003/09,+schedule/2003/11" "*" nil (nil) nil t nil nil ([elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/intersect" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" nil nil nil nil nil nil] nil t nil nil "schedule/intersect" "d:/cygwin/home/A208752/Mail/schedule/intersect"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/10" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" nil nil nil nil nil nil] nil t nil nil "schedule/2003/10" "d:/cygwin/home/A208752/Mail/schedule/2003/10"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/09" "+" nil nil nil t nil nil "schedule/2003/09" "d:/cygwin/home/A208752/Mail/schedule/2003/09"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/11" "+" nil nil nil t nil nil "schedule/2003/11" "d:/cygwin/home/A208752/Mail/schedule/2003/11"]) 100000] elmo-message-flags [elmo-multi-folder [0 0 0 0 0 0 0] multi "*+schedule/intersect,+schedule/2003/10,+schedule/2003/09,+schedule/2003/11" "*" nil (nil) nil t nil nil ([elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/intersect" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" nil nil nil nil nil nil] nil t nil nil "schedule/intersect" "d:/cygwin/home/A208752/Mail/schedule/intersect"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/10" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" nil nil nil nil nil nil] nil t nil nil "schedule/2003/10" "d:/cygwin/home/A208752/Mail/schedule/2003/10"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/09" "+" nil nil nil t nil nil "schedule/2003/09" "d:/cygwin/home/A208752/Mail/schedule/2003/09"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/11" "+" nil nil nil t nil nil "schedule/2003/11" "d:/cygwin/home/A208752/Mail/schedule/2003/11"]) 100000] nil)
elmo-message-flags([elmo-multi-folder [0 0 0 0 0 0 0] multi "*+schedule/intersect,+schedule/2003/10,+schedule/2003/09,+schedule/2003/11" "*" nil (nil) nil t nil nil ([elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/intersect" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/intersect" nil nil nil nil nil nil] nil t nil nil "schedule/intersect" "d:/cygwin/home/A208752/Mail/schedule/intersect"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/10" "+" "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" [modb-standard [0 0 0 0 0 0 0] "d:/cygwin/home/A208752/.elmo/localdir/schedule/2003/10" nil nil nil nil nil nil] nil t nil nil "schedule/2003/10" "d:/cygwin/home/A208752/Mail/schedule/2003/10"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/09" "+" nil nil nil t nil nil "schedule/2003/09" "d:/cygwin/home/A208752/Mail/schedule/2003/09"] [elmo-localdir-folder [0 0 0 0 0 0 0] localdir "+schedule/2003/11" "+" nil nil nil t nil nil "schedule/2003/11" "d:/cygwin/home/A208752/Mail/schedule/2003/11"]) 100000] nil)
wl-summary-update-mark-and-highlight-window(#<window 7 on +schedule/2003/10> 1)
switch-to-buffer(#<buffer +schedule/2003/10>)
(let ((original ...)) (switch-to-buffer (set-buffer ...)) (and original (setq mhc-wl-exit-buffer original)) (setq inhibit-read-only t buffer-read-only nil selective-display t selective-display-ellipses nil indent-tabs-mode nil) (widen) (delete-region (point-min) (point-max)))
mhc-wl-generate-summary-buffer(12326)
mhc-scan-month(12326 mhc-wl #[(schedule) "��" [t] 1] nil)
mhc-goto-month(12326 nil)
mhc-goto-next-month(1)
call-interactively(mhc-goto-next-month)