Re: [vm-bugs] wrong-type-argument error on starting vm

[Robert Marshall]

Unfortunately not, I get wrong-type-argument arrayp nil

with the following traceback:

Debugger entered--Lisp error: (wrong-type-argument arrayp nil)
  fillarray(nil 0)
  (save-excursion (vm-update-draft-count) (mapatoms (function (lambda (b) (setq 
b (get-buffer (symbol-name b))) (when b (set-buffer b) (intern (buffer-name) 
vm-buffers-needing-undo-boundaries) (vm-check-for-killed-summary) (and 
vm-use-toolbar (vm-toolbar-support-possible-p) (vm-toolbar-update-toolbar)) 
(when vm-summary-show-threads (vm-build-threads-if-unbuilt)) 
(vm-do-needed-renumbering) (when vm-summary-buffer 
(vm-do-needed-summary-rebuild)) (vm-do-needed-mode-line-update)))) 
vm-buffers-needing-display-update) (fillarray vm-buffers-needing-display-update 
0))
  vm-update-summary-and-mode-line()
  (progn (vm-update-summary-and-mode-line) (vm-sort-messages (or 
vm-ml-sort-keys (if vm-summary-show-threads "activity" "date"))))
  (if (and new-messages vm-summary-show-threads) (progn 
(vm-update-summary-and-mode-line) (vm-sort-messages (or vm-ml-sort-keys (if 
vm-summary-show-threads "activity" "date")))))
  (when (and new-messages vm-summary-show-threads) 
(vm-update-summary-and-mode-line) (vm-sort-messages (or vm-ml-sort-keys (if 
vm-summary-show-threads "activity" "date"))))
  (let ((tail-cons (vm-last vm-message-list)) b-list new-messages) 
(save-excursion (vm-save-restriction (widen) (vm-build-message-list) (when (or 
(null tail-cons) (cdr tail-cons)) (unless vm-assimilate-new-messages-sorted 
(setq vm-ml-sort-keys nil)) (if dont-read-attributes (vm-set-default-attributes 
(cdr tail-cons)) (vm-read-attributes (cdr tail-cons))) (when gobble-order 
(vm-gobble-message-order)) (when (or (vectorp vm-thread-obarray) 
vm-summary-show-threads) (vm-build-threads (cdr tail-cons))))) (setq 
new-messages (if tail-cons (cdr tail-cons) vm-message-list)) 
(vm-set-numbering-redo-start-point new-messages) 
(vm-set-summary-redo-start-point new-messages)) (if (and new-messages 
dont-read-attributes (or (not (eq new-messages vm-message-list)) (null 
gobble-order))) (vm-modify-folder-totals buffer-file-name (quote arrived) 
(length new-messages))) (setq new-messages (copy-sequence new-messages)) (when 
(and new-messages labels vm-burst-digest-messages-inherit-labels) (let ((mp 
new-messages)) (while mp (vm-set-labels-of (car mp) (copy-sequence labels)) 
(setq mp (cdr mp))))) (when (and new-messages vm-summary-show-threads) 
(vm-update-summary-and-mode-line) (vm-sort-messages (or vm-ml-sort-keys (if 
vm-summary-show-threads "activity" "date")))) (when (and new-messages (or 
vm-arrived-message-hook vm-arrived-messages-hook) (not first-time)) (let 
((new-messages new-messages)) (vm-update-summary-and-mode-line) (when (and 
vm-arrived-message-hook (not (eq vm-folder-access-method (quote imap)))) (while 
new-messages (vm-run-message-hook (car new-messages) (quote 
vm-arrived-message-hook)) (setq new-messages (cdr new-messages)))) (run-hooks 
(quote vm-arrived-messages-hook)))) (when (and new-messages vm-virtual-buffers) 
(save-excursion (setq b-list vm-virtual-buffers) (while b-list (when 
(buffer-name (car b-list)) (let (tail-cons) (set-buffer (car b-list)) (setq 
tail-cons (vm-last vm-message-list)) (vm-build-virtual-message-list 
new-messages) (when (or ... ...) (if ... ...) (if ... ...) 
(vm-set-summary-redo-start-point ...) (vm-set-numbering-redo-start-point ...) 
(unless vm-message-pointer ... ...) (when vm-summary-show-threads ... ...)))) 
(setq b-list (cdr b-list))))) (when (and new-messages vm-ml-sort-keys) 
(vm-sort-messages vm-ml-sort-keys)) new-messages)
  (catch (quote --cl-block-vm-assimilate-new-messages--) (let ((tail-cons 
(vm-last vm-message-list)) b-list new-messages) (save-excursion 
(vm-save-restriction (widen) (vm-build-message-list) (when (or (null tail-cons) 
(cdr tail-cons)) (unless vm-assimilate-new-messages-sorted (setq 
vm-ml-sort-keys nil)) (if dont-read-attributes (vm-set-default-attributes (cdr 
tail-cons)) (vm-read-attributes (cdr tail-cons))) (when gobble-order 
(vm-gobble-message-order)) (when (or (vectorp vm-thread-obarray) 
vm-summary-show-threads) (vm-build-threads (cdr tail-cons))))) (setq 
new-messages (if tail-cons (cdr tail-cons) vm-message-list)) 
(vm-set-numbering-redo-start-point new-messages) 
(vm-set-summary-redo-start-point new-messages)) (if (and new-messages 
dont-read-attributes (or (not (eq new-messages vm-message-list)) (null 
gobble-order))) (vm-modify-folder-totals buffer-file-name (quote arrived) 
(length new-messages))) (setq new-messages (copy-sequence new-messages)) (when 
(and new-messages labels vm-burst-digest-messages-inherit-labels) (let ((mp 
new-messages)) (while mp (vm-set-labels-of (car mp) (copy-sequence labels)) 
(setq mp (cdr mp))))) (when (and new-messages vm-summary-show-threads) 
(vm-update-summary-and-mode-line) (vm-sort-messages (or vm-ml-sort-keys (if 
vm-summary-show-threads "activity" "date")))) (when (and new-messages (or 
vm-arrived-message-hook vm-arrived-messages-hook) (not first-time)) (let 
((new-messages new-messages)) (vm-update-summary-and-mode-line) (when (and 
vm-arrived-message-hook (not (eq vm-folder-access-method ...))) (while 
new-messages (vm-run-message-hook (car new-messages) (quote 
vm-arrived-message-hook)) (setq new-messages (cdr new-messages)))) (run-hooks 
(quote vm-arrived-messages-hook)))) (when (and new-messages vm-virtual-buffers) 
(save-excursion (setq b-list vm-virtual-buffers) (while b-list (when 
(buffer-name (car b-list)) (let (tail-cons) (set-buffer ...) (setq tail-cons 
...) (vm-build-virtual-message-list new-messages) (when ... ... ... ... ... ... 
...))) (setq b-list (cdr b-list))))) (when (and new-messages vm-ml-sort-keys) 
(vm-sort-messages vm-ml-sort-keys)) new-messages))
  (cl-block-wrapper (catch (quote --cl-block-vm-assimilate-new-messages--) (let 
((tail-cons (vm-last vm-message-list)) b-list new-messages) (save-excursion 
(vm-save-restriction (widen) (vm-build-message-list) (when (or (null tail-cons) 
(cdr tail-cons)) (unless vm-assimilate-new-messages-sorted (setq 
vm-ml-sort-keys nil)) (if dont-read-attributes (vm-set-default-attributes ...) 
(vm-read-attributes ...)) (when gobble-order (vm-gobble-message-order)) (when 
(or ... vm-summary-show-threads) (vm-build-threads ...)))) (setq new-messages 
(if tail-cons (cdr tail-cons) vm-message-list)) 
(vm-set-numbering-redo-start-point new-messages) 
(vm-set-summary-redo-start-point new-messages)) (if (and new-messages 
dont-read-attributes (or (not (eq new-messages vm-message-list)) (null 
gobble-order))) (vm-modify-folder-totals buffer-file-name (quote arrived) 
(length new-messages))) (setq new-messages (copy-sequence new-messages)) (when 
(and new-messages labels vm-burst-digest-messages-inherit-labels) (let ((mp 
new-messages)) (while mp (vm-set-labels-of (car mp) (copy-sequence labels)) 
(setq mp (cdr mp))))) (when (and new-messages vm-summary-show-threads) 
(vm-update-summary-and-mode-line) (vm-sort-messages (or vm-ml-sort-keys (if 
vm-summary-show-threads "activity" "date")))) (when (and new-messages (or 
vm-arrived-message-hook vm-arrived-messages-hook) (not first-time)) (let 
((new-messages new-messages)) (vm-update-summary-and-mode-line) (when (and 
vm-arrived-message-hook (not ...)) (while new-messages (vm-run-message-hook ... 
...) (setq new-messages ...))) (run-hooks (quote vm-arrived-messages-hook)))) 
(when (and new-messages vm-virtual-buffers) (save-excursion (setq b-list 
vm-virtual-buffers) (while b-list (when (buffer-name ...) (let ... ... ... ... 
...)) (setq b-list (cdr b-list))))) (when (and new-messages vm-ml-sort-keys) 
(vm-sort-messages vm-ml-sort-keys)) new-messages)))
  (block vm-assimilate-new-messages ....
<trimmed traceback here>

Robert