%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/local/share/emacs/27.2/lisp/gnus/
Upload File :
Create Path :
Current File : //usr/local/share/emacs/27.2/lisp/gnus/nnnil.elc

;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'nnheader)
(defvar nnnil-status-string "")
(defalias 'nnnil-retrieve-headers #[(articles &optional group server fetch-old) "rq\210\301 \210)\302\207" [nntp-server-buffer erase-buffer nov] 1])
(defalias 'nnnil-open-server #[(server &optional definitions) "\300\207" [t] 1])
(defalias 'nnnil-close-server #[(&optional server) "\300\207" [t] 1])
(defalias 'nnnil-request-close #[nil "\300\207" [t] 1])
(defalias 'nnnil-server-opened #[(&optional server) "\300\207" [t] 1])
(defalias 'nnnil-status-message #[(&optional server) "\207" [nnnil-status-string] 1])
(defalias 'nnnil-request-article #[(article &optional group server to-buffer) "\301\302\207" [nnnil-status-string "No such group" nil] 1])
(defalias 'nnnil-request-group #[(group &optional server fast info) "\303r	q\210\304 \210\305c\210*\306\303\207" [deactivate-mark nntp-server-buffer nnnil-status-string nil erase-buffer "411 no such news group\n" "No such group"] 1])
(defalias 'nnnil-close-group #[(group &optional server) "\300\207" [t] 1])
(defalias 'nnnil-request-list #[(&optional server) "rq\210\301 \210)\302\207" [nntp-server-buffer erase-buffer t] 1])
(defalias 'nnnil-request-post #[(&optional server) "\301\302\207" [nnnil-status-string "Read-only server" nil] 1])
(provide 'nnnil)

Zerion Mini Shell 1.0