comparison lisp/gnus/nntp.el @ 42:8b8b7f3559a2 r19-15b104

Import from CVS: tag r19-15b104
author cvs
date Mon, 13 Aug 2007 08:54:51 +0200
parents e04119814345
children 8d2a9b52c682
comparison
equal deleted inserted replaced
41:5d6df4963a99 42:8b8b7f3559a2
596 596
597 (deffoo nntp-server-opened (&optional server) 597 (deffoo nntp-server-opened (&optional server)
598 "Say whether a connection to SERVER has been opened." 598 "Say whether a connection to SERVER has been opened."
599 (and (nnoo-current-server-p 'nntp server) 599 (and (nnoo-current-server-p 'nntp server)
600 nntp-server-buffer 600 nntp-server-buffer
601 (gnus-buffer-live-p nntp-server-buffer) 601 (buffer-live-p nntp-server-buffer)
602 (nntp-find-connection nntp-server-buffer))) 602 (nntp-find-connection nntp-server-buffer)))
603 603
604 (deffoo nntp-open-server (server &optional defs connectionless) 604 (deffoo nntp-open-server (server &optional defs connectionless)
605 (nnheader-init-server-buffer) 605 (nnheader-init-server-buffer)
606 (if (nntp-server-opened server) 606 (if (nntp-server-opened server)