• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.9.5/emacs-92/emacs/lisp/gnus/

Lines Matching +defs:start +defs:open

72 (defvoo nntp-open-connection-function 'nntp-open-network-stream
82 - `nntp-open-network-stream' (the default),
83 - `nntp-open-ssl-stream',
84 - `nntp-open-tls-stream',
85 - `nntp-open-telnet-stream'.
88 - `nntp-open-via-rlogin-and-telnet',
89 - `nntp-open-via-telnet-and-telnet'.")
95 `nntp-open-connection-function' to `nntp-open-ssl-stream' for example.
96 Note that the `nntp-open-connection-functions-never-echo-commands'
99 (defvoo nntp-open-connection-functions-never-echo-commands
100 '(nntp-open-network-stream)
102 Add or set a function which you set to `nntp-open-connection-function'
107 "*Pre-command to use with the various nntp-open-via-* methods.
112 This command is used by the various nntp-open-via-* methods.")
120 using an indirect connection method (nntp-open-via-*).")
124 This command is used by the `nntp-open-via-rlogin-and-telnet' method.
136 This command is used by the `nntp-open-via-telnet-and-telnet' method.")
143 This variable is used by the `nntp-open-via-telnet-and-telnet' method.")
147 This variable is used by the `nntp-open-via-telnet-and-telnet' method.")
151 This variable is used by the `nntp-open-via-rlogin-and-telnet' and
152 `nntp-open-via-telnet-and-telnet' methods.")
160 This variable is used by the `nntp-open-via-telnet-and-telnet' method.")
191 then use this hook to rsh to the remote machine and start a proxy NNTP
193 `nntp-open-connection-function'")
242 (defvar nntp-process-start-point nil)
300 (or (memq (process-status process) '(open run))
326 "Throws out to nntp-with-open-group-error so that the connection may
332 (throw 'nntp-with-open-group-error t))
341 (memq (process-status process) '(open run)))
357 ((not (memq (process-status process) '(open run)))
401 (if (memq (process-status process) '(open run))
421 (nntp-open-connection buffer))))
444 (nnheader-report 'nntp "Couldn't open connection to %s: %s"
450 (nnheader-report 'nntp "Couldn't open connection to %s" address))))
471 ;; or the value of `nntp-open-connection-function' is in
472 ;; `nntp-open-connection-functions-never-echo-commands', so we
477 nntp-open-connection-function
478 nntp-open-connection-functions-never-echo-commands))
487 (nnheader-report 'nntp "Couldn't open connection to %s."
511 (nnheader-report 'nntp "Couldn't open connection to %s."
540 (nnheader-report 'nntp "Couldn't open connection to %s."
586 (defvar nntp-with-open-group-internal nil)
589 (defmacro nntp-with-open-group (group server &optional connectionless &rest forms)
597 nntp-with-open-group, opens a new connection then re-issues the NNTP
605 (nntp-with-open-group-internal nil))
606 (while (catch 'nntp-with-open-group-error
631 (setq nntp-with-open-group-internal
641 nntp-with-open-group-internal))
645 (nntp-with-open-group
709 (nntp-with-open-group
799 (nntp-with-open-group
881 (nntp-with-open-group
887 (nntp-with-open-group
892 (nntp-with-open-group
906 (nntp-with-open-group
916 (nntp-with-open-group
923 (nntp-with-open-group
939 (deffoo nntp-open-server (server &optional defs connectionless)
951 (nntp-open-connection nntp-server-buffer)))))
957 (when (memq (process-status process) '(open run))
960 (unless (eq nntp-open-connection-function 'nntp-open-network-stream)
973 (when (memq (process-status process) '(open run))
976 (unless (eq nntp-open-connection-function 'nntp-open-network-stream)
985 (nntp-with-open-group
990 (nntp-with-open-group
995 (nntp-with-open-group
1017 (nntp-with-open-group
1132 (set (make-local-variable 'nntp-process-start-point) nil)
1136 (defun nntp-open-connection (buffer)
1150 (funcall nntp-open-connection-function pbuffer))
1165 (memq (process-status process) '(open run)))
1180 (defun nntp-open-network-stream (buffer)
1181 (open-network-stream "nntpd" buffer nntp-address nntp-port-number))
1186 (autoload 'open-tls-stream "tls"))
1188 (defun nntp-open-ssl-stream (buffer)
1190 (proc (start-process "nntpd" buffer
1206 (defun nntp-open-tls-stream (buffer)
1207 (let ((proc (open-tls-stream "nntpd" buffer nntp-address nntp-port-number)))
1242 nntp-process-start-point (point-max))
1258 (if (memq (process-status proc) '(open run))
1287 (goto-char nntp-process-start-point)
1299 nntp-process-wait-for nntp-process-start-point t)
1307 (start nntp-process-start-point)
1314 (insert-buffer-substring buf start)
1352 (memq (process-status process) '(open run)))
1363 (nntp-open-server server nil connectionless)))
1367 (nntp-open-connection nntp-server-buffer))))
1661 (memq (process-status proc) '(open run))
1669 ;; Obsolete nntp-open-* connection methods -- drv
1672 (defvoo nntp-open-telnet-envuser nil
1683 "*Parameters to `nntp-open-rlogin'.
1684 That function may be used as `nntp-open-connection-function'. In that
1692 "*Parameters to `nntp-open-telnet'.
1693 That function may be used as `nntp-open-connection-function'. In that
1703 (defun nntp-open-telnet (buffer)
1708 'start-process
1711 (when (memq (process-status proc) '(open run))
1715 ((and nntp-open-telnet-envuser nntp-telnet-user-name)
1716 (process-send-string proc (concat "open " "-l" nntp-telnet-user-name
1719 (process-send-string proc (concat "open " nntp-address "\n"))))
1721 ((not nntp-open-telnet-envuser)
1751 (defun nntp-open-rlogin (buffer)
1754 (apply 'start-process
1758 (apply 'start-process
1770 ;; Replacements for the nntp-open-* functions -- drv
1773 (defun nntp-open-telnet-stream (buffer)
1789 (setq proc (apply 'start-process "nntpd" buffer command))
1797 (defun nntp-open-via-rlogin-and-telnet (buffer)
1824 (setq proc (apply 'start-process "nntpd" buffer command))
1828 (process-send-string proc (concat "open " nntp-address
1843 (defun nntp-open-via-telnet-and-telnet (buffer)
1869 (setq proc (apply 'start-process "nntpd" buffer command))
1870 (when (memq (process-status proc) '(open run))
1875 (process-send-string proc (concat "open " "-l" nntp-via-user-name
1878 (process-send-string proc (concat "open " nntp-via-address