%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/local/share/emacs/27.2/lisp/url/
Upload File :
Create Path :
Current File : //usr/local/share/emacs/27.2/lisp/url/url-proxy.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.

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


(byte-code "\300\301!\210\302\303\304\"\207" [require url-parse autoload url-warn "url"] 3)
(defalias 'url-default-find-proxy-for-url #[(urlobj host) "\304\305\"\203\306\304\305\"A	\"\204)\307\n!>\204!\310\311\312\nD\"\210\n\313H\314\232\203+\315\207\304\307\n!>\204;\310\311\312\nD\"\210\n\313H\"A\203]\316\304\307\n!>\204U\310\311\312\nD\"\210\n\313H\"AP\207\315\207" [url-proxy-services host urlobj cl-struct-url-tags assoc "no_proxy" string-match type-of signal wrong-type-argument url 1 "www" "DIRECT" "PROXY "] 6])
(defvar url-proxy-locator 'url-default-find-proxy-for-url)
(defalias 'url-find-proxy-for-url #[(url host) "\306	\n\"\307\"\310\311\211<\203
@\202
\312\313\f\"\203$\310\202Q\312\314\f\"\2036\315\316\f\317\225\"\320Q\202Q\312\321\f\"\203G\322\316\f\317\225\"P\202Q\323\301\324\325\f\"\326#\210\310+\207" [url-proxy-locator url host case-fold-search proxy proxies split-string " *; *" nil t string-match "^direct" "^proxy +" "http://" substring 0 "/" "^socks +" "socks://" url-warn format "Unknown proxy directive: %s" critical] 6])
(autoload 'url-http "url-http")
(defalias 'url-proxy #[(url callback &optional cbargs) "\305!\306!	>\204\307\310\302D\"\210\311H\312\230\203!\313\n\f#\207\314\315\"\207" [url-using-proxy cl-struct-url-tags url callback cbargs url-generic-parse-url type-of signal wrong-type-argument 1 "http" url-http error "Don't know how to use proxy `%s'"] 4])
(provide 'url-proxy)

Zerion Mini Shell 1.0