From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/63446 Path: news.gmane.org!not-for-mail From: "Terje Kvernes" Newsgroups: gmane.emacs.gnus.general Subject: Gnus refuses to start with an args-out-of-range error on a nnimap folder. Date: Sun, 2 Jul 2006 02:44:44 +0200 (CEST) Message-ID: <63789.193.91.144.150.1151801084.squirrel@webmail.uio.no> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain;charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: sea.gmane.org 1151817162 4835 80.91.229.2 (2 Jul 2006 05:12:42 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sun, 2 Jul 2006 05:12:42 +0000 (UTC) Original-X-From: ding-owner+m11973@lists.math.uh.edu Sun Jul 02 07:12:40 2006 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by ciao.gmane.org with esmtp (Exim 4.43) id 1FwuG5-0008VC-A5 for ding-account@gmane.org; Sun, 02 Jul 2006 07:12:37 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu ident=lists) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 1FwuFm-0008Gl-00; Sun, 02 Jul 2006 00:12:18 -0500 Original-Received: from nas01.math.uh.edu ([129.7.128.39]) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1Fwq4w-0008BK-00 for ding@lists.math.uh.edu; Sat, 01 Jul 2006 19:44:50 -0500 Original-Received: from quimby.gnus.org ([80.91.224.244]) by nas01.math.uh.edu with esmtp (Exim 4.52) id 1Fwq4t-0001hq-IV for ding@lists.math.uh.edu; Sat, 01 Jul 2006 19:44:50 -0500 Original-Received: from pat.uio.no ([129.240.10.4]) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1Fwq4s-0007E6-00 for ; Sun, 02 Jul 2006 02:44:46 +0200 Original-Received: from mail-mx1.uio.no ([129.240.10.29]) by pat.uio.no with esmtp (Exim 4.43) id 1Fwq4s-0006xB-7T for ding@gnus.org; Sun, 02 Jul 2006 02:44:46 +0200 Original-Received: from mail-web1.uio.no ([129.240.10.18] helo=webmail.uio.no) by mail-mx1.uio.no with esmtp (Exim 4.43) id 1Fwq4q-0002pK-5t for ding@gnus.org; Sun, 02 Jul 2006 02:44:44 +0200 Original-Received: from 193.91.144.150 (SquirrelMail authenticated user terjekv) by webmail.uio.no with HTTP; Sun, 2 Jul 2006 02:44:44 +0200 (CEST) Original-To: ding@gnus.org User-Agent: SquirrelMail/1.4.6 X-UiO-Spam-info: not spam, SpamAssassin (score=-5.561, required 12, autolearn=disabled, AWL -0.56, UIO_MAIL_IS_INTERNAL -5.00) X-Spam-Score: -2.5 (--) Precedence: bulk Original-Sender: ding-owner@lists.math.uh.edu Xref: news.gmane.org gmane.emacs.gnus.general:63446 Archived-At: This bit me today after having created a lot of folders on the imap server and starting Gnus, I've tested 0.5 and the snapshot that 'cvs update' gave me just before this email was sent. I'm kinda at a loss as to what is up and google didn't seem to help much, any help is gratefully accepted. I get the following backtrace after creating the folder on the server (not done via Gnus): Debugger entered--Lisp error: (args-out-of-range "INBOX.drift.admin" 0 19) substring("INBOX.drift.admin" 0 19) (concat "^" (substring (gnus-group-real-name ...) 0 (match-end 0))) (setq prefix (concat "^" (substring ... 0 ...))) (and (string-match "[^\\.]\\." (gnus-group-real-name ...) start) (cdr groups) (setq prefix (concat "^" ...)) (string-match prefix (gnus-group-real-name ...))) (if (and (string-match "[^\\.]\\." ... start) (cdr groups) (setq prefix ...) (string-match prefix ...)) (progn (push prefix prefixes) (message "Descend hierarchy %s? ([y]nsq): " ...) (while ... ... ...) (cond ... ... ... ...)) (message "Subscribe %s? ([n]yq)" (car groups)) (while (not ...) (ding) (message "Subscribe %s? ([n]yq)" ...)) (setq group (car groups)) (cond (... ... ...) (... ...) (t ... ...)) (setq groups (cdr groups))) (while (and groups prefixes) (while (not ...) (setq prefixes ...)) (setq prefix (car prefixes)) (setq start (1- ...)) (if (and ... ... ... ...) (progn ... ... ... ...) (message "Subscribe %s? ([n]yq)" ...) (while ... ... ...) (setq group ...) (cond ... ... ...) (setq groups ...))) (while groups (setq prefixes (list "^")) (while (and groups prefixes) (while ... ...) (setq prefix ...) (setq start ...) (if ... ... ... ... ... ... ...))) (let ((groups ...) prefixes prefix start ans group starts real-group) (while groups (setq prefixes ...) (while ... ... ... ... ...))) gnus-subscribe-hierarchical-interactive(("nnimap+imap.uio.no:INBOX.lists.lk-alle" "nnimap+imap.uio.no:INBOX.lists.management" "nnimap+imap.uio.no:INBOX.lists.viper" "nnimap+imap.uio.no:INBOX.local.logs.orion" "nnimap+imap.uio.no:INBOX.personal" "nnimap+imap.uio.no:INBOX.personal.bark" "nnimap+imap.uio.no:INBOX.uio")) (progn (gnus-subscribe-hierarchical-interactive new-newsgroups)) (if new-newsgroups (progn (gnus-subscribe-hierarchical-interactive new-newsgroups))) (when new-newsgroups (gnus-subscribe-hierarchical-interactive new-newsgroups)) (while (setq method (gnus-server-get-method nil ...)) (setq new-newsgroups nil gnus-override-subscribe-method method) (when (and ... ...) (save-excursion ... ... ...) (mapatoms ... hashtb)) (when new-newsgroups (gnus-subscribe-hierarchical-interactive new-newsgroups))) (let* ((new-date ...) (date ...) (methods ...) (groups 0) group new-newsgroups got-new method hashtb gnus-override-subscribe-method) (unless gnus-killed-hashtb (gnus-make-hashtable-from-killed)) (while (setq method ...) (setq new-newsgroups nil gnus-override-subscribe-method method) (when ... ... ...) (when new-newsgroups ...)) (if (> groups 0) (gnus-message 5 "%d new newsgroup%s arrived" groups ...) (gnus-message 5 "No new newsgroups")) (when got-new (setq gnus-newsrc-last-checked-date new-date)) got-new) gnus-ask-server-for-new-groups() (if (or (consp check) (eq check ...)) (gnus-ask-server-for-new-groups) (let (... group new-newsgroups) (gnus-message 5 "Looking for new newsgroups...") (unless gnus-have-read-active-file ...) (setq gnus-newsrc-last-checked-date ...) (unless gnus-killed-hashtb ...) (mapatoms ... gnus-active-hashtb) (when new-newsgroups ...) (if ... ... ...))) (if (gnus-check-first-time-used) nil (if (or ... ...) (gnus-ask-server-for-new-groups) (let ... ... ... ... ... ... ... ...))) (unless (gnus-check-first-time-used) (if (or ... ...) (gnus-ask-server-for-new-groups) (let ... ... ... ... ... ... ... ...))) (let* ((gnus-subscribe-newsgroup-method gnus-subscribe-newsgroup-method) (check ...)) (unless (gnus-check-first-time-used) (if ... ... ...))) gnus-find-new-newsgroups() (progn (gnus-find-new-newsgroups)) (if (and init gnus-check-new-newsgroups (not level) (gnus-check-server gnus-select-method) (not gnus-slave) gnus-plugged) (progn (gnus-find-new-newsgroups))) (when (and init gnus-check-new-newsgroups (not level) (gnus-check-server gnus-select-method) (not gnus-slave) gnus-plugged) (gnus-find-new-newsgroups)) (let ((init ...) (nnmail-fetched-sources ...)) (when init (setq gnus-newsrc-alist nil gnus-active-hashtb nil) (gnus-read-newsrc-file rawfile)) (when gnus-message-archive-method (unless ... ...)) (when (or ... ...) (gnus-update-active-hashtb-from-killed)) (if gnus-agent (gnus-agent-read-servers-validate)) (and gnus-read-active-file (not level) (gnus-read-active-file nil dont-connect)) (unless gnus-active-hashtb (setq gnus-active-hashtb ...)) (when gnus-use-cache (gnus-cache-open)) (and init (or gnus-use-dribble-file gnus-slave) (gnus-dribble-eval-file)) (when (and init gnus-slave) (gnus-dribble-clear)) (gnus-update-format-specifications) (when (and ... ... ... ... ... gnus-read-active-file) (gnus-read-all-descriptions-files)) (when (and init gnus-check-new-newsgroups ... ... ... gnus-plugged) (gnus-find-new-newsgroups)) (when (and init gnus-check-bogus-newsgroups gnus-read-active-file ... ...) (gnus-check-bogus-newsgroups)) (when (and ... gnus-use-nocem ...) (gnus-nocem-scan-groups)) (gnus-master-read-slave-newsrc) (let (...) (gnus-get-unread-articles level))) gnus-setup-news(nil nil nil) (if (and (not dont-connect) (not did-connect)) (gnus-group-quit) (gnus-run-hooks (quote gnus-startup-hook)) (setq gnus-current-startup-file (gnus-make-newsrc-file gnus-startup-file)) (when (or gnus-slave gnus-use-dribble-file) (gnus-dribble-read-file)) (if gnus-agent (gnus-request-create-group "queue" ...)) (gnus-request-create-group "drafts" (quote ...)) (gnus-setup-news nil level dont-connect) (gnus-run-hooks (quote gnus-setup-news-hook)) (gnus-start-draft-setup) (gnus-group-list-groups level) (gnus-group-first-unread-group) (gnus-configure-windows (quote group)) (gnus-group-set-mode-line) (gnus-run-hooks (quote gnus-started-hook))) (unwind-protect (progn (unless dont-connect ...)) (if (and ... ...) (gnus-group-quit) (gnus-run-hooks ...) (setq gnus-current-startup-file ...) (when ... ...) (if gnus-agent ...) (gnus-request-create-group "drafts" ...) (gnus-setup-news nil level dont-connect) (gnus-run-hooks ...) (gnus-start-draft-setup) (gnus-group-list-groups level) (gnus-group-first-unread-group) (gnus-configure-windows ...) (gnus-group-set-mode-line) (gnus-run-hooks ...))) (let ((level ...) did-connect) (unwind-protect (progn ...) (if ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...))) (if (gnus-alive-p) (progn (switch-to-buffer gnus-group-buffer) (gnus-group-get-new-news ...)) (gnus-clear-system) (gnus-splash) (gnus-run-hooks (quote gnus-before-startup-hook)) (nnheader-init-server-buffer) (setq gnus-slave slave) (gnus-read-init-file) (when gnus-select-method (push ... gnus-predefined-server-alist)) (if gnus-agent (gnus-agentize)) (when gnus-simple-splash (setq gnus-simple-splash nil) (cond ... ...)) (let (... did-connect) (unwind-protect ... ...))) gnus-1(nil nil nil) gnus(nil) call-interactively(gnus) I'm not on the list, so please CC me. :-) -- Terje