Mercurial > emacs

comparison lisp/gnus/html2text.el @ 57243:c5e16264557d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-575 Merge from gnus--rel--5.10 Patches applied: * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-34 Merge from emacs--cvs-trunk--0 * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-35 - miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-36 Update from CVS
author Miles Bader <miles@gnu.org>
date Mon, 27 Sep 2004 07:44:44 +0000
parents 55fd4f77387a
children 6a65cb24e1be
comparison
equal deleted inserted replaced
57242:ffd8d52f457c 57243:c5e16264557d
1 ;;; html2text.el --- a simple html to plain text converter 1 ;;; html2text.el --- a simple html to plain text converter
2 ;; Copyright (C) 2002, 2003 Free Software Foundation, Inc. 2 ;; Copyright (C) 2002, 2003, 2004 Free Software Foundation, Inc.
3 3
4 ;; Author: Joakim Hove <hove@phys.ntnu.no> 4 ;; Author: Joakim Hove <hove@phys.ntnu.no>
5 5
6 ;; This file is part of GNU Emacs. 6 ;; This file is part of GNU Emacs.
7 7
40 (require 'cl)) 40 (require 'cl))
41 41
42 (defvar html2text-format-single-element-list '(("hr" . html2text-clean-hr))) 42 (defvar html2text-format-single-element-list '(("hr" . html2text-clean-hr)))
43 43
44 (defvar html2text-replace-list 44 (defvar html2text-replace-list
45 '(("&nbsp;" . " ") ("&gt;" . ">") ("&lt;" . "<") ("&quot;" . "\"")) 45 '(("&nbsp;" . " ") ("&gt;" . ">") ("&lt;" . "<") ("&quot;" . "\"")
46 ("&amp;" . "&") ("&apos;" . "'"))
46 "The map of entity to text. 47 "The map of entity to text.
47 48
48 This is an alist were each element is a dotted pair consisting of an 49 This is an alist were each element is a dotted pair consisting of an
49 old string, and a replacement string. This replacement is done by the 50 old string, and a replacement string. This replacement is done by the
50 function \"html2text-substitute\" which basically performs a 51 function \"html2text-substitute\" which basically performs a