Migration path?

Migration path?

[dave-mlist]

Is there a tutorial for migrating from GNUS to Pteradactl Gnus?
I attempted the switch but came so close to loosing my sanity that
I had to revert.  Sadly, my .newsrc.eld got thrashed so I have to reconstruct
all my group themes...  :-(  :-(

Here is the .gnus file I tried to use for pgnus.  Why wasn't gnus able to read
my mail?  It does fine in GNUS...

;;;  .gnus	
;;;  
;;;  David Wuertele	Tues Oct  20 18:11:51 1999

;;;  Steal This Program!!!

;;; MISC
(set-language-environment 'Japanese)
(setq quail-japanese-use-double-n t)
(setq gnus-directory "~/Gnus/")
;(setq message-directory "~/Gnus/")
(setq gnus-kill-files-directory (concat gnus-directory "score/"))
(setq gnus-startup-file "~/Gnus/.newsrc")
(setq nnmail-crash-box "~/Gnus/.gnus-crash-box")
(setq nnmail-message-id-cache-file "~/Gnus/.nnmail-cache")
(setq nnmail-treat-duplicates 'delete)
;(setq gnus-nntp-server "news.rad.directint.net")
(setq gnus-nntp-server nil)
(add-hook 'gnus-article-display-hook 'gnus-article-display-x-face)
(setq gnus-read-active-file 'some)
(setq system-name "knave.bfnet.com")


;;; USER INFO
(setq mail-host-address "bfnet.com")
(setq message-from-style nil)
(setq message-generic-domain "bfnet.com")
(setq message-user-organization "Direct Internet Corporation")


;;; THREAD SORTING
(setq gnus-thread-sort-functions
      '(gnus-thread-sort-by-number
	gnus-thread-sort-by-subject
	gnus-thread-sort-by-date))


;;; GROUP SORTING
(add-hook 'gnus-group-mode-hook 'gnus-topic-mode)


;;; FROM: SETTER
(defun mail-set-user-mail-address ()
  (save-excursion
    (kill-buffer (get-buffer-create " new-buffer"))
    (let ((new-buffer (get-buffer-create " new-buffer")))
      (call-process "/home/dave/perl/make-mail-date" nil new-buffer nil)
      (set-buffer new-buffer)
      (let* ((output (buffer-string))
	     (names  (list (list "dave@directint.net" 1)
                           (list "dave@wuertele.com" 1)
			   (list "dnstech@directint.net" 1)
			   (list "dave@bfnet.com" 2)
			   (list "dave-mlist@bfnet.com" 3)
			   (list "dave-netscape@bfnet.com" 3)
			   (list "dave-gnus@bfnet.com" 4)
			   (list "dave-private@bfnet.com" 5)
			   (list "dave-shorts@bfnet.com" 6)
			   (list "dave-bg@bfnet.com" 7)
			   (list "dave-dns@bfnet.com" 8)
			   (list "dave-dns@wuertele.com" 8)
			   (list "lex-luthor@bfnet.com" 9)
			   (list "tomoko@bfnet.com" 10)
			   (list output 2)))
	     (use-this (completing-read "Sent by: " names nil t "dave")))
	(setq user-mail-address use-this)
	(setenv "QMAILUSER" user-mail-address)
	(setenv "MAILUSER" user-mail-address)
	(setenv "LOGNAME" user-mail-address)
	(setenv "REPLYTO" user-mail-address)
	(setq mail-default-reply-to user-mail-address)
	(kill-buffer new-buffer))))
  (setq message-qmail-inject-args (list "-f" (getenv "MAILUSER"))))

(add-hook 'message-setup-hook 'mail-set-user-mail-address)

;;; QMAIL
;; This sets the correct mail envelope for e.g. bouncing mail:
(setq message-send-mail-function 'message-send-mail-with-qmail) 
(setq mail-user-agent 'message-user-agent)
;(setq message-qmail-inject-program "/home/dave/perl/qmail-inject-wrapper")
(setq message-qmail-inject-program "/var/qmail/bin/qmail-inject")


;;; READING MAIL
;; These two lines set up gnus to ONLY read mail, never read news:
(setq gnus-secondary-select-methods nil)
;(setq gnus-secondary-select-methods '((nntp "u10.advapro.com" (nntp-port-number 15))))

(setq mail-sources
      '((directory :path "~/Gnus/procmail/spools/")))

(add-hook 'gnus-get-new-news-hook
          (lambda () (call-process "/usr/bin/fetchmail")))


;;; SUPERCITE
(require 'filladapt)
(setq sc-load-hook 'sc-setup-filladapt)
(autoload 'sc-cite-original "supercite" "Supercite 3.1" t)
(setq message-cite-function 'sc-cite-original)
;(setq news-reply-header-hook nil)
(setq sc-auto-fill-region-p nil)
(setq sc-citation-leader "")
;(setq gnus-use-sc t)


;;; ARCHIVING
;; Save all outgoing mail with Gcc: as follows:
(setq gnus-message-archive-method
      '(nnml "archive" 
                 (nnml-directory "~/Gnus/archive/")
                 (nnml-active-file "~/Gnus/archive/active")
                 (nnml-get-new-mail nil)
                 (nnml-inhibit-expiry t)))

(setq gnus-message-archive-group
      '((if (message-news-p)
	    "outgoing.news"
	  "outgoing.mail")))

(setq gnus-permanently-visible-groups "\\(dave\\|admin\\|private\\|misc\\|old\\|archive\\|dic\\|hns\\)")


;;; DISPLAY HOOKS
(setq gnus-article-display-hook
      '(gnus-article-highlight
	gnus-article-hide-headers-if-wanted 
	gnus-article-hide-boring-headers 
	gnus-article-treat-overstrike 
	gnus-article-hide-pgp
	gnus-article-strip-leading-blank-lines
	gnus-article-remove-trailing-blank-lines
	)
      )

;;
;; hiliting citations properly.
;;
(remove-hook 'gnus-article-display-hook 'gnus-article-maybe-highlight)

;(setq gnus-group-line-format "%M%S%p%P%5y: %(%g%)%l\n")
(setq gnus-group-line-format "%M%m%S%p%P%5y/%-5t(%N,%I,%T,%R): %(%G%)\n")

;;; Local Variables:
;;; mode:lisp-interaction
;;; mode:font-lock
;;; End:

Re: Migration path?

[Kai Großjohann]

dave-mlist@bfnet.com writes:

> Is there a tutorial for migrating from GNUS to Pteradactl Gnus?
> I attempted the switch but came so close to loosing my sanity that
> I had to revert.  Sadly, my .newsrc.eld got thrashed so I have to reconstruct
> all my group themes...  :-(  :-(

What happened when you tried pgnus?  I can't see anything wrong with
your file.

(Well, there is now a bunch of gnus-treat-* variables which you are
supposed to twiddle rather than having lots of things in
gnus-article-display-hook, but that can't be the problem, can it?)

kai
-- 
Life is hard and then you die.

Re: Migration path?

[dave-mlist]

>> Is there a tutorial for migrating from GNUS to Pteradactl Gnus?
>> I attempted the switch but came so close to loosing my sanity that
>> I had to revert.  Sadly, my .newsrc.eld got thrashed so I have to reconstruct
>> all my group themes...  :-(  :-(

Kai> What happened when you tried pgnus?  I can't see anything wrong with
Kai> your file.

1.  I got a lot of "xxx is editing yyy, steal it?" messges, even though that
    emacs process was the only process editing the file.  This may have
    something to do with the fact that I had a 20.3 and a 20.4 running at the
    same time...

2.  Gnus didn't even attempt to read my mail...  It interpreted the contents of
    the newsrc.eld file as always, but didn't seem to be able to find the mail.

Dave

Re: Migration path?

[Kai Großjohann]

dave-mlist@bfnet.com writes:

> 1.  I got a lot of "xxx is editing yyy, steal it?" messges, even
> though that emacs process was the only process editing the file.
> This may have something to do with the fact that I had a 20.3 and a
> 20.4 running at the same time...

Hm.  Maybe the other Emacs was still editing files without you knowing
it?

> 2.  Gnus didn't even attempt to read my mail...  It interpreted the
> contents of the newsrc.eld file as always, but didn't seem to be
> able to find the mail.

Define `read mail'.  Are you saying it didn't fetch the mail from your
system mail drop (I forget whether it was POP or /var/mail/jrl)?  If
so, what is the value of mail-sources, and what is the value of
nnmail-spool-file?  Does it help to make sure that one of them is nil?

kai
-- 
Life is hard and then you die.