aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2008-03-12 19:20:33 +0000
committerStefan Monnier2008-03-12 19:20:33 +0000
commit944c87e0619c80ea22a795fd9df4755ed0b2f7b5 (patch)
tree3a3034b409dcbc7ddcac9222082fa2a528ed8814
parent2ec9cf150b73eae888975249c180ac5400ee67e7 (diff)
downloademacs-944c87e0619c80ea22a795fd9df4755ed0b2f7b5.tar.gz
emacs-944c87e0619c80ea22a795fd9df4755ed0b2f7b5.zip
(nnweb-insert-html): Remove use of nnheader-string-as-multibyte.
-rw-r--r--lisp/gnus/ChangeLog3
-rw-r--r--lisp/gnus/nnweb.el8
2 files changed, 9 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 026b2779ec6..fa1f94e4753 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,8 @@
12008-03-12 Stefan Monnier <monnier@iro.umontreal.ca> 12008-03-12 Stefan Monnier <monnier@iro.umontreal.ca>
2 2
3 * nnweb.el (nnweb-insert-html):
4 Remove use of nnheader-string-as-multibyte.
5
3 * nnheader.el (nnheader-init-server-buffer): Use with-current-buffer. 6 * nnheader.el (nnheader-init-server-buffer): Use with-current-buffer.
4 (nnheader-string-as-multibyte): Remove. 7 (nnheader-string-as-multibyte): Remove.
5 8
diff --git a/lisp/gnus/nnweb.el b/lisp/gnus/nnweb.el
index 56a287ef5e7..3609c90a36d 100644
--- a/lisp/gnus/nnweb.el
+++ b/lisp/gnus/nnweb.el
@@ -544,7 +544,11 @@ Valid types include `google', `dejanews', and `gmane'.")
544(defun nnweb-insert-html (parse) 544(defun nnweb-insert-html (parse)
545 "Insert HTML based on a w3 parse tree." 545 "Insert HTML based on a w3 parse tree."
546 (if (stringp parse) 546 (if (stringp parse)
547 (insert (nnheader-string-as-multibyte parse)) 547 ;; We used to call nnheader-string-as-multibyte here, but it cannot
548 ;; be right, so I removed it. If a bug shows up because of this change,
549 ;; please do not blindly revert the change, but help me find the real
550 ;; cause of the bug instead. --Stef
551 (insert parse)
548 (insert "<" (symbol-name (car parse)) " ") 552 (insert "<" (symbol-name (car parse)) " ")
549 (insert (mapconcat 553 (insert (mapconcat
550 (lambda (param) 554 (lambda (param)
@@ -610,5 +614,5 @@ Valid types include `google', `dejanews', and `gmane'.")
610 614
611(provide 'nnweb) 615(provide 'nnweb)
612 616
613;;; arch-tag: f59307eb-c90f-479f-b7d2-dbd8bf51b697 617;; arch-tag: f59307eb-c90f-479f-b7d2-dbd8bf51b697
614;;; nnweb.el ends here 618;;; nnweb.el ends here