comparison lisp/gnus/nntp.el @ 44:8d2a9b52c682 r19-15prefinal

Import from CVS: tag r19-15prefinal
author cvs
date Mon, 13 Aug 2007 08:55:10 +0200
parents 8b8b7f3559a2
children 131b0175ea99
comparison
equal deleted inserted replaced
43:23cafc5d2038 44:8d2a9b52c682
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 (buffer-live-p nntp-server-buffer) 601 (gnus-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)