[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)