* Unable to read mail in newer pgnusiae
@ 1999-06-12 18:38 Thomas Skogestad
1999-06-13 1:39 ` Lars Magne Ingebrigtsen
0 siblings, 1 reply; 7+ messages in thread
From: Thomas Skogestad @ 1999-06-12 18:38 UTC (permalink / raw)
0.72 works fine. Later versions do not, including 0.85. Emacs is 20.3
If I have (setq gnus-secondary-select-methods
'((nnml "private")))
then Gnus will complain that "Error, unknown mail format! (Possibly
corrupted."
I've also tried
This is the trace:
Signaling: (error "Error, unknown mail format! (Possibly corrupted.)")
signal(error ("Error, unknown mail format! (Possibly corrupted.)"))
error("Error, unknown mail format! (Possibly corrupted.)") (if (not
(and ... ...)) (error "Error, unknown mail format! (Possibly
corrupted.)") (while (not ...) (setq start ... end nil)
(narrow-to-region start ...) (goto-char ...) (if ... ... ... ... ...)
(goto-char ...) (if ... ... ... ... ...) (run-hooks ...) (goto-char ...)
(widen) (setq head-end ...) (when content-length ... ... ... ...) (if
end ... ... ...) (save-excursion ...) (goto-char end))) (let
((case-fold-search t) start message-id content-length end skip head-end)
(goto-char (point-min)) (if (not ...) (error "Error, unknown mail
format! (Possibly corrupted.)") (while
... ... ... ... ... ... ... ... ... ... ... ... ... ... ...)))
nnmail-process-unix-mail-format(nnml-save-mail nnml-active-number) (cond
((or ... ...) (nnmail-process-babyl-mail-format func artnum-func))
((looking-at "\x01\x01\x01\x01") (nnmail-process-mmdf-mail-format func
artnum-func)) ((looking-at "Return-Path:")
(nnmail-process-maildir-mail-format func artnum-func)) (t
(nnmail-process-unix-mail-format func artnum-func))) (if (zerop
(buffer-size)) nil (goto-char (point-min)) (save-excursion (run-hooks
...)) (cond (... ...) (... ...) (... ...) (t ...))) (unless (zerop
(buffer-size)) (goto-char (point-min)) (save-excursion (run-hooks ...))
(cond (... ...) (... ...) (... ...) (t ...))) (save-excursion
(set-buffer (get-buffer-create " *nnmail incoming*")) (erase-buffer)
(let (...) (nnheader-insert-file-contents incoming)) (unless (zerop ...)
(goto-char ...) (save-excursion ...) (cond ... ... ... ...)) (when
exit-func (funcall exit-func)) (kill-buffer (current-buffer))) (let
((nnmail-split-methods ...)) (save-excursion (set-buffer ...)
(erase-buffer) (let ... ...) (unless ... ... ... ...) (when exit-func
...) (kill-buffer ...)))
nnmail-split-incoming("~/.emacs-mail-crash-box" nnml-save-mail nil nil
nnml-active-number) (lambda (file orig-file) (nnmail-split-incoming file
(quote nnml-save-mail) (quote nil) (nnmail-get-split-group orig-file
source) (quote nnml-active-number)))("~/.emacs-mail-crash-box"
"~/.emacs-mail-crash-box") funcall((lambda (file orig-file)
(nnmail-split-incoming file (quote nnml-save-mail) (quote nil)
(nnmail-get-split-group orig-file source) (quote nnml-active-number)))
"~/.emacs-mail-crash-box" "~/.emacs-mail-crash-box") (if (or (not ...)
(zerop ...)) (progn (when ... ...) 0) (funcall callback
mail-source-crash-box info) (when (file-exists-p mail-source-crash-box)
(if mail-source-delete-incoming ... ...)) 1)
mail-source-callback((lambda (file orig-file) (nnmail-split-incoming
file (quote nnml-save-mail) (quote nil) (nnmail-get-split-group
orig-file source) (quote nnml-active-number)))
"~/.emacs-mail-crash-box") (setq found (mail-source-callback callback
mail-source-crash-box)) (progn (message "Processing mail from %s..."
mail-source-crash-box) (setq found (mail-source-callback callback
mail-source-crash-box))) (if (file-exists-p mail-source-crash-box)
(progn (message "Processing mail from %s..." mail-source-crash-box)
(setq found ...))) (when (file-exists-p mail-source-crash-box) (message
"Processing mail from %s..." mail-source-crash-box) (setq found
(mail-source-callback callback mail-source-crash-box))) (let ((function
...) (found 0)) (unless function (error "%S is an invalid mail source
specification" source)) (when (file-exists-p mail-source-crash-box)
(message "Processing mail from %s..." mail-source-crash-box) (setq found
...)) (+ found (condition-case err ... ...))) (save-excursion (let
(... ...) (unless function ...) (when ... ... ...) (+ found ...)))
mail-source-fetch((file :path "/var/spool/mail/thomas") (lambda (file
orig-file) (nnmail-split-incoming file (quote nnml-save-mail) (quote
nil) (nnmail-get-split-group orig-file source) (quote
nnml-active-number)))) (setq new (mail-source-fetch source (\` ...)))
(if (setq new (mail-source-fetch source ...)) (progn (incf total new)
(incf i))) (when (setq new (mail-source-fetch source ...)) (incf total
new) (incf i)) (progn (nnheader-message 4 "%s: Reading incoming mail
from %s..." method (car source)) (when (setq new ...) (incf total new)
(incf i))) (if source (progn (nnheader-message 4 "%s: Reading incoming
mail from %s..." method ...) (when ... ... ...))) (when source
(nnheader-message 4 "%s: Reading incoming mail from %s..." method (car
source)) (when (setq new ...) (incf total new) (incf i))) (while (setq
source (pop sources)) (cond (... ...) (... ... nil)) (when (and
... group) (mail-source-bind ... ...)) (when nnmail-fetched-sources (if
... ... ...)) (when source (nnheader-message 4 "%s: Reading incoming
mail from %s..." method ...) (when ... ... ...))) (progn
(nnmail-activate method) (run-hooks (quote
nnmail-pre-get-new-mail-hook)) (nnmail-cache-open) (while (setq source
...) (cond ... ...) (when ... ...) (when nnmail-fetched-sources ...)
(when source ... ...)) (unless (zerop new) (nnmail-save-active ... ...)
(when exit-func ...) (run-hooks ...) (nnheader-message 4 "%s: Reading
incoming mail (%d new)...done" method total)) (nnmail-cache-close)
(run-hooks (quote nnmail-post-get-new-mail-hook))) (if (and
(nnmail-get-value "%s-get-new-mail" method) nnmail-spool-file) (progn
(nnmail-activate method) (run-hooks ...) (nnmail-cache-open) (while
... ... ... ... ...) (unless ... ... ... ... ...) (nnmail-cache-close)
(run-hooks ...))) (when (and (nnmail-get-value "%s-get-new-mail"
method) nnmail-spool-file) (nnmail-activate method) (run-hooks (quote
nnmail-pre-get-new-mail-hook)) (nnmail-cache-open) (while (setq source
...) (cond ... ...) (when ... ...) (when nnmail-fetched-sources ...)
(when source ... ...)) (unless (zerop new) (nnmail-save-active ... ...)
(when exit-func ...) (run-hooks ...) (nnheader-message 4 "%s: Reading
incoming mail (%d new)...done" method total)) (nnmail-cache-close)
(run-hooks (quote nnmail-post-get-new-mail-hook))) (let* ((sources ...)
(group-in group) (i 0) (new 0) (total 0) incoming incomings source)
(when (and ... nnmail-spool-file) (nnmail-activate method) (run-hooks
...) (nnmail-cache-open) (while ... ... ... ... ...) (unless
... ... ... ... ...) (nnmail-cache-close) (run-hooks ...)))
nnmail-get-new-mail(nnml nnml-save-nov "/mnt/windows/gnus/mail/" nil)
nnml-request-scan(nil "private") funcall(nnml-request-scan nil
"private") (let ((gnus-command-method ...) (gnus-inhibit-demon t))
(funcall (gnus-get-function gnus-command-method ...) (and group ...)
(nth 1 gnus-command-method))) (progn (let (... ...) (funcall
... ... ...))) (if gnus-plugged (progn (let ... ...))) (when
gnus-plugged (let (... ...) (funcall ... ... ...)))
gnus-request-scan(nil (nnml "private")) (progn (gnus-request-scan nil
method)) (if (gnus-check-backend-function (quote request-scan) (car
method)) (progn (gnus-request-scan nil method))) (when
(gnus-check-backend-function (quote request-scan) (car method))
(gnus-request-scan nil method)) (progn (when
(gnus-check-backend-function ... ...) (gnus-request-scan nil method))
(cond (... ...) (... t) (t ...))) (if (gnus-check-server method) (progn
(when ... ...) (cond ... ... ...))) (when (gnus-check-server method)
(when (gnus-check-backend-function ... ...) (gnus-request-scan nil
method)) (cond (... ...) (... t) (t ...))) (if (member method methods)
nil (setq where (nth 1 method) mesg (format "Reading active file%s via
%s..." ... ...)) (gnus-message 5 mesg) (when (gnus-check-server method)
(when ... ...) (cond ... ... ...))) (unless (member method methods)
(setq where (nth 1 method) mesg (format "Reading active file%s via
%s..." ... ...)) (gnus-message 5 mesg) (when (gnus-check-server method)
(when ... ...) (cond ... ... ...))) (while (setq method (pop methods))
(unless (member method methods) (setq where ... mesg ...) (gnus-message
5 mesg) (when ... ... ...))) (save-excursion (set-buffer
nntp-server-buffer) (while (setq method ...) (unless ... ... ... ...)))
(let ((methods ...) method where mesg list-type) (setq
gnus-have-read-active-file nil) (save-excursion (set-buffer
nntp-server-buffer) (while ... ...))) gnus-read-active-file(nil nil)
(and gnus-read-active-file (not level) (gnus-read-active-file nil
dont-connect)) (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 (setq
gnus-server-alist ...) (push ... gnus-server-alist)) (when (or ... ...)
(gnus-update-active-hashtb-from-killed)) (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 gnus-use-nocem ... ...)
(gnus-nocem-scan-groups)) (gnus-master-read-slave-newsrc) (let (...)
(gnus-get-unread-articles level)) (when (and init
gnus-check-bogus-newsgroups gnus-read-active-file ... ...)
(gnus-check-bogus-newsgroups))) 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)) (when
gnus-use-grouplens (bbb-login) (add-hook ... ...)) (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 ... ...) (when gnus-use-grouplens ... ...) (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-simple-splash (setq gnus-simple-splash
nil) (cond ... ...)) (let (... did-connect) (unwind-protect ... ...)))
gnus-1(nil nil nil) gnus() command-line-1(("-f" "gnus")) command-line()
normal-top-level()
--
thomas.skogestad@jusstud.uio.no
You know you've been in Norway too long, when...
It seems nice to spend a week in a small wooden cottage up in the
mountains, with no running water and no electricity
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Unable to read mail in newer pgnusiae
1999-06-12 18:38 Unable to read mail in newer pgnusiae Thomas Skogestad
@ 1999-06-13 1:39 ` Lars Magne Ingebrigtsen
1999-06-13 2:29 ` Thomas Skogestad
0 siblings, 1 reply; 7+ messages in thread
From: Lars Magne Ingebrigtsen @ 1999-06-13 1:39 UTC (permalink / raw)
Thomas Skogestad <tskogest@jusstud.uio.no> writes:
> then Gnus will complain that "Error, unknown mail format! (Possibly
> corrupted."
This probably means that whatever is in your ~/.emacs-mail-crash-box
is something that Gnus isn't able to recognize.
--
(domestic pets only, the antidote for overdose, milk.)
larsi@gnus.org * Lars Magne Ingebrigtsen
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Unable to read mail in newer pgnusiae
1999-06-13 1:39 ` Lars Magne Ingebrigtsen
@ 1999-06-13 2:29 ` Thomas Skogestad
1999-06-13 4:45 ` Lars Magne Ingebrigtsen
0 siblings, 1 reply; 7+ messages in thread
From: Thomas Skogestad @ 1999-06-13 2:29 UTC (permalink / raw)
* Lars Magne Ingebrigtsen
| This probably means that whatever is in your ~/.emacs-mail-crash-box is
| something that Gnus isn't able to recognize.
Huh! Deleted that file and upgrading to 0.85 (from 0.72) works
fine. Or...
Well, I'm not able to acess my draft files. Trying to enter
nndraft:drafts results in
Couldn't request group nndraft:drafts:
(There's nothing after the last colon; though I could have sworn there was
before I just restarted Emacs. Maybe it's just because it's "late".)
And: It does work in 0.84, which I've just tested.
nndraft-directory's value is
"~/News/drafts/"
nndraft-current-directory's value is
"~/News/drafts/drafts"
And that is also where the draft files are stored, but I just copied them
to ~/News/drafts/ and that didn't anything. And I've never touched these
variables, they seem to be default values.
However, saving drafts still work; and it's stored in
~/News/drafts/drafts.
The trace is:
Signaling: (error "Couldn't request group nndraft:drafts: Opened server
using directory ~/News/drafts/") signal(error ("Couldn't request group
nndraft:drafts: Opened server using directory ~/News/drafts/"))
error("Couldn't request group %s: %s" "nndraft:drafts" "Opened server
using directory ~/News/drafts/") (progn (when (equal major-mode ...)
(kill-buffer ...)) (error "Couldn't request group %s: %s" group
(gnus-status-message group))) (or (and entry (not ...))
(gnus-activate-group group) (progn (when ... ...) (error "Couldn't
request group %s: %s" group ...))) (let* ((entry ...)
(gnus-summary-ignore-duplicates ...) (info ...) articles
fetched-articles cached) (unless (gnus-check-server ...) (error
"Couldn't open server")) (or (and entry ...) (gnus-activate-group group)
(progn ... ...)) (unless (gnus-request-group group t) (when ... ...)
(error "Couldn't request group %s: %s" group ...)) (setq
gnus-newsgroup-name group) (setq gnus-newsgroup-unselected nil) (setq
gnus-newsgroup-unreads (gnus-list-of-unread-articles group))
(gnus-summary-setup-default-charset) (when info
(gnus-adjust-marked-articles info)) (when (gnus-virtual-group-p group)
(setq cached gnus-newsgroup-cached)) (setq gnus-newsgroup-unreads
(gnus-set-difference ... gnus-newsgroup-dormant)) (setq
gnus-newsgroup-processable nil) (gnus-update-read-articles group
gnus-newsgroup-unreads) (if (setq articles select-articles) (setq
gnus-newsgroup-unselected ...) (setq articles ...)) (cond (... ...)
(... nil) (t
... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...)))
gnus-select-newsgroup("nndraft:drafts" nil nil) (and new-group
(gnus-select-newsgroup group show-all select-articles)) (let*
((new-group ...) (quit-config ...) (did-select ...)) (cond
(... ... ... ... ... ... ... t) (... ... ... nil) (... ... ... ... ...)
(t ... ... ... ... ... ... ... ... ... ... ... ... ...)))
gnus-summary-read-group-1("nndraft:drafts" nil t nil nil nil) (or
(gnus-summary-read-group-1 group show-all no-article kill-buffer
no-display select-articles) (setq show-all nil select-articles nil))
(let ((gnus-auto-select-next nil)) (or (gnus-summary-read-group-1 group
show-all no-article kill-buffer no-display select-articles) (setq
show-all nil select-articles nil))) (setq result (let (...) (or
... ...))) (null (setq result (let ... ...))) (and group (null (setq
result ...)) (eq gnus-auto-select-next (quote quietly))) (while (and
group (null ...) (eq gnus-auto-select-next ...)) (set-buffer
gnus-group-buffer) (when backward (gnus-group-prev-unread-group 2)) (if
(not ...) (setq group ...) (setq group nil))) (let (result) (while (and
group ... ...) (set-buffer gnus-group-buffer) (when backward ...) (if
... ... ...)) result) gnus-summary-read-group("nndraft:drafts" nil t nil
nil nil nil) (let ((no-display ...) (group ...) number active marked
entry) (when (eq all 0) (setq all nil)) (unless group (error "No group
on current line")) (setq marked (gnus-info-marks ...)) (setq number
(cond ... ... ...)) (gnus-summary-read-group group (or all ...)
no-article nil no-display nil select-articles))
gnus-group-read-group(nil t) gnus-group-select-group(nil) (if
(gnus-group-topic-p) (let (...) (gnus-topic-fold all))
(gnus-group-select-group all)) gnus-topic-select-group(nil) *
call-interactively(gnus-topic-select-group)
--
thomas.skogestad@jusstud.uio.no
ftp://ftp.splode.com/pub/users/friedman/emacs-lisp/kill-a-lawyer.el
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Unable to read mail in newer pgnusiae
1999-06-13 2:29 ` Thomas Skogestad
@ 1999-06-13 4:45 ` Lars Magne Ingebrigtsen
1999-06-14 15:38 ` Drafts not working in pgnus 0.85+ (was Re: Unable to read mail in newer pgnusiae) Thomas Skogestad
0 siblings, 1 reply; 7+ messages in thread
From: Lars Magne Ingebrigtsen @ 1999-06-13 4:45 UTC (permalink / raw)
Thomas Skogestad <tskogest@jusstud.uio.no> writes:
> The trace is:
>
> Signaling: (error "Couldn't request group nndraft:drafts: Opened server
> using directory ~/News/drafts/") signal(error ("Couldn't request group
> nndraft:drafts: Opened server using directory ~/News/drafts/"))
> error("Couldn't request group %s: %s" "nndraft:drafts" "Opened server
Are you filling the backtraces? It's certainly totally unreadable.
Anyway, does `M-g' on the drafts group do anything?
--
(domestic pets only, the antidote for overdose, milk.)
larsi@gnus.org * Lars Magne Ingebrigtsen
^ permalink raw reply [flat|nested] 7+ messages in thread
* Drafts not working in pgnus 0.85+ (was Re: Unable to read mail in newer pgnusiae)
1999-06-13 4:45 ` Lars Magne Ingebrigtsen
@ 1999-06-14 15:38 ` Thomas Skogestad
1999-07-03 8:45 ` Lars Magne Ingebrigtsen
1999-09-26 21:50 ` Thomas Skogestad
0 siblings, 2 replies; 7+ messages in thread
From: Thomas Skogestad @ 1999-06-14 15:38 UTC (permalink / raw)
* Lars Magne Ingebrigtsen
| Anyway, does `M-g' on the drafts group do anything?
Nah.
M-g gir, avhengig av om hvorvidt draft-gruppen er sist i gruppe-bufferet
eller ikke:
No more newsgroups
eller
nndraft:drafts error: Opened server using directory ~/News/drafts/
Heller ikke i 0.87 går det an å lese draft-gruppen, og da får jeg denne
backtrace:
(Whoops. That was Norwegian. But with all those translation sites on the
net, translating should be a cinch...)
Signaling: (error "Couldn't request group nndraft:drafts: Opened server using directory ~/News/drafts/")
signal(error ("Couldn't request group nndraft:drafts: Opened server using directory ~/News/drafts/"))
error("Couldn't request group %s: %s" "nndraft:drafts" "Opened server using directory ~/News/drafts/")
(progn (when (equal major-mode ...) (kill-buffer ...)) (error "Couldn't request group %s: %s" group (gnus-status-message group)))
(or (and entry (not ...)) (gnus-activate-group group) (progn (when ... ...) (error "Couldn't request group %s: %s" group ...)))
(let* ((entry ...) (gnus-summary-ignore-duplicates ...) (info ...) articles fetched-articles cached) (unless (gnus-check-server ...) (error "Couldn't open server")) (or (and entry ...) (gnus-activate-group group) (progn ... ...)) (unless (gnus-request-group group t) (when ... ...) (error "Couldn't request group %s: %s" group ...)) (setq gnus-newsgroup-name group) (setq gnus-newsgroup-unselected nil) (setq gnus-newsgroup-unreads (gnus-list-of-unread-articles group)) (gnus-summary-setup-default-charset) (when info (gnus-adjust-marked-articles info)) (when (gnus-virtual-group-p group) (setq cached gnus-newsgroup-cached)) (setq gnus-newsgroup-unreads (gnus-set-difference ... gnus-newsgroup-dormant)) (setq gnus-newsgroup-processable nil) (gnus-update-read-articles group gnus-newsgroup-unreads) (if (setq articles select-articles) (setq gnus-newsgroup-unselected ...) (setq articles ...)) (cond (... ...) (... nil) (t ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...))
)
gnus-select-newsgroup("nndraft:drafts" nil nil)
(and new-group (gnus-select-newsgroup group show-all select-articles))
(let* ((new-group ...) (quit-config ...) (did-select ...)) (cond (... ... ... ... ... ... ... t) (... ... ... nil) (... ... ... ... ...) (t ... ... ... ... ... ... ... ... ... ... ... ... ...)))
gnus-summary-read-group-1("nndraft:drafts" nil t nil nil nil)
(or (gnus-summary-read-group-1 group show-all no-article kill-buffer no-display select-articles) (setq show-all nil select-articles nil))
(let ((gnus-auto-select-next nil)) (or (gnus-summary-read-group-1 group show-all no-article kill-buffer no-display select-articles) (setq show-all nil select-articles nil)))
(setq result (let (...) (or ... ...)))
(null (setq result (let ... ...)))
(and group (null (setq result ...)) (eq gnus-auto-select-next (quote quietly)))
(while (and group (null ...) (eq gnus-auto-select-next ...)) (set-buffer gnus-group-buffer) (when backward (gnus-group-prev-unread-group 2)) (if (not ...) (setq group ...) (setq group nil)))
(let (result) (while (and group ... ...) (set-buffer gnus-group-buffer) (when backward ...) (if ... ... ...)) result)
gnus-summary-read-group("nndraft:drafts" nil t nil nil nil nil)
(let ((no-display ...) (group ...) number active marked entry) (when (eq all 0) (setq all nil)) (unless group (error "No group on current line")) (setq marked (gnus-info-marks ...)) (setq number (cond ... ... ...)) (gnus-summary-read-group group (or all ...) no-article nil no-display nil select-articles))
gnus-group-read-group(nil t)
gnus-group-select-group(nil)
(if (gnus-group-topic-p) (let (...) (gnus-topic-fold all)) (gnus-group-select-group all))
gnus-topic-select-group(nil)
* call-interactively(gnus-topic-select-group)
--
thomas.skogestad@jusstud.uio.no
http://quimby.gnus.org/circus/problem.gif
ftp://ftp.splode.com/pub/users/friedman/emacs-lisp/kill-a-lawyer.el
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Drafts not working in pgnus 0.85+ (was Re: Unable to read mail in newer pgnusiae)
1999-06-14 15:38 ` Drafts not working in pgnus 0.85+ (was Re: Unable to read mail in newer pgnusiae) Thomas Skogestad
@ 1999-07-03 8:45 ` Lars Magne Ingebrigtsen
1999-09-26 21:50 ` Thomas Skogestad
1 sibling, 0 replies; 7+ messages in thread
From: Lars Magne Ingebrigtsen @ 1999-07-03 8:45 UTC (permalink / raw)
Thomas Skogestad <tskogest@jusstud.uio.no> writes:
> Signaling: (error "Couldn't request group nndraft:drafts: Opened server using directory ~/News/drafts/")
I this still a problem in 0.90?
--
(domestic pets only, the antidote for overdose, milk.)
larsi@gnus.org * Lars Magne Ingebrigtsen
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: Drafts not working in pgnus 0.85+ (was Re: Unable to read mail in newer pgnusiae)
1999-06-14 15:38 ` Drafts not working in pgnus 0.85+ (was Re: Unable to read mail in newer pgnusiae) Thomas Skogestad
1999-07-03 8:45 ` Lars Magne Ingebrigtsen
@ 1999-09-26 21:50 ` Thomas Skogestad
1 sibling, 0 replies; 7+ messages in thread
From: Thomas Skogestad @ 1999-09-26 21:50 UTC (permalink / raw)
Anyway: If I byte comile the .el files everything works, but I can't
access the drafts group if I haven't compiled the files.
--
thomas.skogestad@jusstud.uio.no
http://quimby.gnus.org/circus/problem.gif
ftp://ftp.splode.com/pub/users/friedman/emacs-lisp/kill-a-lawyer.el
^ permalink raw reply [flat|nested] 7+ messages in thread
end of thread, other threads:[~1999-09-26 21:50 UTC | newest]
Thread overview: 7+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1999-06-12 18:38 Unable to read mail in newer pgnusiae Thomas Skogestad
1999-06-13 1:39 ` Lars Magne Ingebrigtsen
1999-06-13 2:29 ` Thomas Skogestad
1999-06-13 4:45 ` Lars Magne Ingebrigtsen
1999-06-14 15:38 ` Drafts not working in pgnus 0.85+ (was Re: Unable to read mail in newer pgnusiae) Thomas Skogestad
1999-07-03 8:45 ` Lars Magne Ingebrigtsen
1999-09-26 21:50 ` Thomas Skogestad
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).