Subject: Re: expecting a list, got a vector

From: Dave Abrahams <[email-masked]>
Date: Sun, 04 Sep 2011 17:29:17 -0800

on Tue Aug 02 2011, Lars Ingebrigtsen <larsi-AT-gnus.org> wrote:

> Dave Abrahams <[email-masked]> writes:
>
>> It's fairly common when I do a `G' from the group buffer for
>> everything to get stuck just after nnimap seems to have collected all
>> its data from the server (I presume that's what's going on from the
>> message about how many bytes have been read).
>
> Can you (setq debug-on-quit t) and see where it hangs?

Here's another example:

  delq(16560 (897 946 947 949 962 963 1775 13969 14020 14070 16561 16562 16563 16564 16565 16566 16567 16568 16569 16570 16571 16572 16573 16574 16575 16576 16577 16578 16579 16580 16581 16582 16583 16584 16585 16586 16587 16588 16589 16590 16591 16592 16593 16594 16595 16596 16597 16598 16599 16600 ...))
  (setq list1 (delq (car list2) list1))
  (while list2 (setq list1 (delq ... list1)) (setq list2 (cdr list2)))
  (let ((list1 ...)) (while list2 (setq list1 ...) (setq list2 ...)) list1)
  gnus-set-difference((1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 ...) (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 ...))
  nnimap-update-info(("[Gmail].All Mail" 6 ((1 . 896) (898 . 945) 948 (950 . 961) (964 . 1774) (1776 . 13968) (13970 . 14019) (14021 . 14069) (14071 . 22737) (22740 . 22748) (22750 . 22785) (22787 . 23999) (24002 . 24003) 24006 (24015 . 24017) 24026 (24028 . 24031) 24037 24039 24045 24049 (24052 . 24053) (24055 . 24056) 24059 (24071 . 24072) 24076 24078 24080 24082 24084 24087 24095 24101 24107 24111 24113 (24119 . 24122) (24125 . 24126) (24132 . 24134) (24137 . 24141) 24144 24147 24153 24156 24160 24165 24173 24182 (24204 . 24206) (24237 . 24238) ...) ((reply 31937 112364 116790 129755 136658 138039 138046 138140 138152 138154 140078 141715 141815 142320 144463 144477 144854 144895 145223 145280 145287 145350 145378 145856 146218 146252 146266 146632 146651 147011 147144 ... ... 147411 147424 147628 147669 147708 147817 147855 147868 147883 148031 148037 148064 148066 148071 ... 148149 ...) (tick 6 ... ... ... 91 ... 101 ... 212 267 30227 ... ... 31946 31954 32008 ... 32028 32040 ... ... 32066 32355 32363 32367 ... 32453 32457 32478 32571 32887 32945 32947 ... 32982 33053 33132 33211 33273 33313 33817 33897 ... 33920 33953 34487 34490 ... 35877 ...)) nil ((permanent-flags %Answered %Flagged %Deleted %Seen %Draft %*) (timestamp 20068 9319) (modseq . "509") (uidvalidity . "1313942954") (active 1 . 194638))) ((1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 ...) ((%Answered 31937 112364 116790 129755 136658 138039 138046 138140 138152 138154 140078 141715 141815 142320 144463 144477 144854 144895 145223 145280 145287 145350 145378 145856 146218 146252 146266 146632 146651 147011 147144 147360 147361 147401 147402 147411 147424 147628 147669 147708 147817 147855 147868 147883 148031 148037 148064 148066 148071 ...) (%Flagged 6 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 38 39 81 82 83 84 85 86 87 88 89 91 95 96 97 98 99 101 105 106 212 267 ...) (%Seen 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 ...)) 194642 1 194643 1 (%Answered %Flagged %Deleted %Seen %Draft %*) "1313942954" nil "512"))
  nnimap-update-infos((("[Gmail].All Mail" (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 ...) (... ... ...) 194642 1 194643 1 (%Answered %Flagged %Deleted %Seen %Draft %*) "1313942954" nil "512")) (("[Gmail].All Mail" 6 (... ... 948 ... ... ... ... ... ... ... ... ... ... 24006 ... 24026 ... 24037 24039 24045 24049 ... ... 24059 ... 24076 24078 24080 24082 24084 24087 24095 24101 24107 24111 24113 ... ... ... ... 24144 24147 24153 24156 24160 24165 24173 24182 ... ... ...) (... ...) nil (... ... ... ... ...))))
  nnimap-request-group("[Gmail].All Mail" "LocalIMAP" nil ("[Gmail].All Mail" 6 ((1 . 896) (898 . 945) 948 (950 . 961) (964 . 1774) (1776 . 13968) (13970 . 14019) (14021 . 14069) (14071 . 22737) (22740 . 22748) (22750 . 22785) (22787 . 23999) (24002 . 24003) 24006 (24015 . 24017) 24026 (24028 . 24031) 24037 24039 24045 24049 (24052 . 24053) (24055 . 24056) 24059 (24071 . 24072) 24076 24078 24080 24082 24084 24087 24095 24101 24107 24111 24113 (24119 . 24122) (24125 . 24126) (24132 . 24134) (24137 . 24141) 24144 24147 24153 24156 24160 24165 24173 24182 (24204 . 24206) (24237 . 24238) ...) ((reply 31937 112364 116790 129755 136658 138039 138046 138140 138152 138154 140078 141715 141815 142320 144463 144477 144854 144895 145223 145280 145287 145350 145378 145856 146218 146252 146266 146632 146651 147011 147144 ... ... 147411 147424 147628 147669 147708 147817 147855 147868 147883 148031 148037 148064 148066 148071 ... 148149 ...) (tick 6 ... ... ... 91 ... 101 ... 212 267 30227 ... ... 31946 31954 32008 ... 32028 32040 ... ... 32066 32355 32363 32367 ... 32453 32457 32478 32571 32887 32945 32947 ... 32982 33053 33132 33211 33273 33313 33817 33897 ... 33920 33953 34487 34490 ... 35877 ...)) nil ((permanent-flags %Answered %Flagged %Deleted %Seen %Draft %*) (timestamp 20068 9319) (modseq . "509") (uidvalidity . "1313942954") (active 1 . 194638))))
  gnus-activate-group("[Gmail].All Mail" scan)
  (let ((old ...) (old-high gnus-newsgroup-highest) (nnmail-fetched-sources ...) (new-active ...) i new) (unless new-active (error "Couldn't fetch new data")) (setq gnus-newsgroup-active (gnus-copy-sequence new-active)) (setq i (cdr gnus-newsgroup-active) gnus-newsgroup-highest i) (while (> i old-high) (push i new) (decf i)) (if (not new) (message "No gnus is bad news") (gnus-summary-insert-articles new) (setq gnus-newsgroup-unreads ...) (gnus-summary-limit ...)))
  gnus-summary-insert-new-articles()
  call-interactively(gnus-summary-insert-new-articles nil nil)

-- 
Dave Abrahams
BoostPro Computing
http://www.boostpro.com