Commit 3c08d668 authored by Katsumi Yamaoka's avatar Katsumi Yamaoka
Browse files

Remove nnwarchive by Lars Magne Ingebrigtsen <larsi@gnus.org>.

parent c4d82de8
......@@ -695,7 +695,6 @@ Browsing the Web
 
* Archiving Mail::
* Web Searches:: Creating groups from articles that match a string.
* Web Archive:: Reading mailing list archived on web.
* RSS:: Reading RDF site summary.
* Customizing W3:: Doing stuff to Emacs/W3 from Gnus.
 
......@@ -17395,7 +17394,6 @@ interfaces to these sources.
@menu
* Archiving Mail::
* Web Searches:: Creating groups from articles that match a string.
* Web Archive:: Reading mailing list archived on web.
* RSS:: Reading RDF site summary.
* Customizing W3:: Doing stuff to Emacs/W3 from Gnus.
@end menu
......@@ -17538,43 +17536,6 @@ Format string URL to fetch an article by @code{Message-ID}.
@end table
 
 
@node Web Archive
@subsection Web Archive
@cindex nnwarchive
@cindex Web Archive
Some mailing lists only have archives on Web servers, such as
@uref{http://www.egroups.com/} and
@uref{http://www.mail-archive.com/}. It has a quite regular and nice
interface, and it's possible to get the information Gnus needs to keep
groups updated.
@findex gnus-group-make-warchive-group
The easiest way to get started with @code{nnwarchive} is to say
something like the following in the group buffer: @kbd{M-x
gnus-group-make-warchive-group RET @var{an_egroup} RET egroups RET
www.egroups.com RET @var{your@@email.address} RET}. (Substitute the
@var{an_egroup} with the mailing list you subscribed, the
@var{your@@email.address} with your email address.), or to browse the
back end by @kbd{B nnwarchive RET mail-archive RET}.
The following @code{nnwarchive} variables can be altered:
@table @code
@item nnwarchive-directory
@vindex nnwarchive-directory
The directory where @code{nnwarchive} stores its files. The default is@*
@file{~/News/warchive/}.
@item nnwarchive-login
@vindex nnwarchive-login
The account name on the web server.
@item nnwarchive-passwd
@vindex nnwarchive-passwd
The password for your account on the web server.
@end table
@node RSS
@subsection RSS
@cindex nnrss
......@@ -29163,10 +29124,9 @@ Gnus not to use @acronym{NOV}.
As the variables for the other back ends, there are
@code{nndiary-nov-is-evil}, @code{nndir-nov-is-evil},
@code{nnfolder-nov-is-evil}, @code{nnimap-nov-is-evil},
@code{nnml-nov-is-evil}, @code{nnspool-nov-is-evil}, and
@code{nnwarchive-nov-is-evil}. Note that a non-@code{nil} value for
@code{gnus-nov-is-evil} overrides all those variables.@footnote{Although
+the back ends @code{nnkiboze}, and
@code{nnml-nov-is-evil}, and @code{nnspool-nov-is-evil}. Note that a
non-@code{nil} value for @code{gnus-nov-is-evil} overrides all those
variables.@footnote{Although the back ends @code{nnkiboze}, and
@code{nnwfm} don't have their own nn*-nov-is-evil.}
@end table
 
2010-08-31 Lars Magne Ingebrigtsen <larsi@gnus.org>
* nnwarchive.el: Removed.
* gnus-soup.el: Removed.
* nnsoup.el: Removed.
......
......@@ -3083,42 +3083,6 @@ If there is, use Gnus to create an nnrss group"
(nnrss-save-server-data nil))
(error "No feeds found for %s" url))))
(defvar nnwarchive-type-definition)
(defvar gnus-group-warchive-type-history nil)
(defvar gnus-group-warchive-login-history nil)
(defvar gnus-group-warchive-address-history nil)
(defun gnus-group-make-warchive-group ()
"Create a nnwarchive group."
(interactive)
(require 'nnwarchive)
(let* ((group (gnus-read-group "Group name: "))
(default-type (or (car gnus-group-warchive-type-history)
(symbol-name (caar nnwarchive-type-definition))))
(type
(gnus-string-or
(completing-read
(format "Warchive type (default %s): " default-type)
(mapcar (lambda (elem) (list (symbol-name (car elem))))
nnwarchive-type-definition)
nil t nil 'gnus-group-warchive-type-history)
default-type))
(address (read-string "Warchive address: "
nil 'gnus-group-warchive-address-history))
(default-login (or (car gnus-group-warchive-login-history)
user-mail-address))
(login
(gnus-string-or
(read-string
(format "Warchive login (default %s): " user-mail-address)
default-login 'gnus-group-warchive-login-history)
user-mail-address))
(method
`(nnwarchive ,address
(nnwarchive-type ,(intern type))
(nnwarchive-login ,login))))
(gnus-group-make-group group method)))
(defun gnus-group-make-archive-group (&optional all)
"Create the (ding) Gnus archive group of the most recent articles.
Given a prefix, create a full group."
......
......@@ -1747,7 +1747,6 @@ slower."
("nnweb" none)
("nnrss" none)
("nnwfm" none)
("nnwarchive" none)
("nnlistserv" none)
("nnagent" post-mail)
("nnimap" post-mail address prompt-address physical-address)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment