projects
/
gnus
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
gnus-art.el (gnus-mime-buttonize-attachments-in-header): Improve criterion that finds...
[gnus]
/
lisp
/
html2text.el
diff --git
a/lisp/html2text.el
b/lisp/html2text.el
index
4e05f1a
..
78cecd9
100644
(file)
--- a/
lisp/html2text.el
+++ b/
lisp/html2text.el
@@
-1,6
+1,6
@@
-;;; html2text.el --- a simple html to plain text converter
+;;; html2text.el --- a simple html to plain text converter
-*- coding: utf-8 -*-
-;; Copyright (C) 2002-201
3
Free Software Foundation, Inc.
+;; Copyright (C) 2002-201
4
Free Software Foundation, Inc.
;; Author: Joakim Hove <hove@phys.ntnu.no>
;; Author: Joakim Hove <hove@phys.ntnu.no>
@@
-65,14
+65,14
@@
("–" . "-")
("‰" . "%%")
("±" . "+-")
("–" . "-")
("‰" . "%%")
("±" . "+-")
- ("£" . "£")
+ ("£" . "
Â
£")
(""" . "\"")
("»" . ">>")
("&rdquo" . "\"")
("®" . "(R)")
("›" . ")")
("’" . "'")
(""" . "\"")
("»" . ">>")
("&rdquo" . "\"")
("®" . "(R)")
("›" . ")")
("’" . "'")
- ("§" . "§")
+ ("§" . "
Â
§")
("¹" . "^1")
("²" . "^2")
("³" . "^3")
("¹" . "^1")
("²" . "^2")
("³" . "^3")
@@
-204,7
+204,7
@@
formatting, and then moved afterward.")
;; size=3
((string-match "[^ ]=[^ ]" this)
(let ((attr (nth 0 (split-string this "=")))
;; size=3
((string-match "[^ ]=[^ ]" this)
(let ((attr (nth 0 (split-string this "=")))
- (value (substring
prev
(1+ (string-match "=" this)))))
+ (value (substring
this
(1+ (string-match "=" this)))))
(setq attr-list (cons (list attr value) attr-list))))
;; size =3
((string-match "\\`=[^ ]" this)
(setq attr-list (cons (list attr value) attr-list))))
;; size =3
((string-match "\\`=[^ ]" this)