Mercurial > emacs

comparison lisp/gnus/nnsoup.el @ 49598:0d8b17d428b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Trailing whitepace deleted.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 04 Feb 2003 13:24:35 +0000
parents eb2699620e9c
children 695cf19ef79e d7ddb3e565de
comparison
equal deleted inserted replaced
49597:e88404e8f2cf 49598:0d8b17d428b5
255 (let ((kind (gnus-soup-encoding-kind 255 (let ((kind (gnus-soup-encoding-kind
256 (gnus-soup-area-encoding 256 (gnus-soup-area-encoding
257 (nth 1 (nnsoup-article-to-area 257 (nth 1 (nnsoup-article-to-area
258 article nnsoup-current-group)))))) 258 article nnsoup-current-group))))))
259 (cond ((= kind ?m) 'mail) 259 (cond ((= kind ?m) 'mail)
260 ((= kind ?n) 'news) 260 ((= kind ?n) 'news)
261 (t 'unknown))))) 261 (t 'unknown)))))
262 262
263 (deffoo nnsoup-close-group (group &optional server) 263 (deffoo nnsoup-close-group (group &optional server)
264 ;; Kill all nnsoup buffers. 264 ;; Kill all nnsoup buffers.
265 (let ((buffers nnsoup-buffers) 265 (let ((buffers nnsoup-buffers)