Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
url-about.elc	2.51 KB	-rw-r--r--
url-auth.elc	20.29 KB	-rw-r--r--
url-cache.elc	6.7 KB	-rw-r--r--
url-cid.elc	1.24 KB	-rw-r--r--
url-cookie.elc	23.96 KB	-rw-r--r--
url-dav.elc	20.14 KB	-rw-r--r--
url-dired.elc	2.78 KB	-rw-r--r--
url-domsuf.elc	1.78 KB	-rw-r--r--
url-expand.elc	4.04 KB	-rw-r--r--
url-file.elc	7.18 KB	-rw-r--r--
url-ftp.elc	778 B	-rw-r--r--
url-future.elc	9.17 KB	-rw-r--r--
url-gw.elc	6.68 KB	-rw-r--r--
url-handlers.elc	20.17 KB	-rw-r--r--
url-history.elc	5.46 KB	-rw-r--r--
url-http.elc	38.02 KB	-rw-r--r--
url-imap.elc	1.93 KB	-rw-r--r--
url-irc.elc	2.52 KB	-rw-r--r--
url-ldap.elc	6.06 KB	-rw-r--r--
url-mailto.elc	2.94 KB	-rw-r--r--
url-methods.elc	4.1 KB	-rw-r--r--
url-misc.elc	3.27 KB	-rw-r--r--
url-news.elc	7.36 KB	-rw-r--r--
url-nfs.elc	4.23 KB	-rw-r--r--
url-parse.elc	17.39 KB	-rw-r--r--
url-privacy.elc	1.61 KB	-rw-r--r--
url-proxy.elc	1.82 KB	-rw-r--r--
url-queue.elc	14.9 KB	-rw-r--r--
url-tramp.elc	2.97 KB	-rw-r--r--
url-util.elc	17.34 KB	-rw-r--r--
url-vars.elc	14.89 KB	-rw-r--r--
url.elc	9.12 KB	-rw-r--r--

Code Editor : url-methods.elc

;ELC���
;;; Compiled
;;; in Emacs version 27.1
;;; 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 'url-parse)
(defvar url-scheme-registry (make-hash-table :size 7 :test 'equal))
#@57 Assoc-list of methods that each URL loader can provide.
(defconst url-scheme-methods '((default-port . variable) (asynchronous-p . variable) (expand-file-name . function) (file-exists-p . function) (file-attributes . function) (parse-url . function) (file-symlink-p . function) (file-writable-p . function) (file-directory-p . function) (file-executable-p . function) (directory-files . function) (file-truename . function)) (#$ . 497))
(defconst url-scheme-default-properties (list 'name "unknown" 'loader 'url-scheme-default-loader 'default-port 0 'expand-file-name 'url-identity-expander 'parse-url 'url-generic-parse-url 'asynchronous-p nil 'file-directory-p 'ignore 'file-truename #[(&rest args) "\301@!\207" [args url-recreate-url] 2] 'file-exists-p 'ignore 'file-attributes 'ignore))
#@44 Signal an error for an unknown URL scheme.
(defalias 'url-scheme-default-loader #[(url &optional callback cbargs) "\302\303\304!	>\204�\305\306\300D\"\210\307H\"\207" [url cl-struct-url-tags error "Unknown URL scheme: %s" type-of signal wrong-type-argument 1] 6 (#$ . 1295)])
(defvar url-scheme--registering-proxy nil)
#@75 Automatically find a proxy for SCHEME and put it in `url-proxy-services'.
(defalias 'url-scheme-register-proxy #[(scheme) "\306P\307	\226!\206�\307	\227!\310\"\311\312!\n;\203'�\n\313\230\203'�\311\f\204
\n\203
\314\315\n\"\203\226�\316\311!\317
!\">\204J�\320\321\322
D\"\210
\211#\323\324I\210)\317
!\">\204c�\320\321\322
D\"\210
\211$\325\326\323\n\"I\210)
%\317%!\">\204\204�\320\321\322%D\"\210%\211&\327\330\326\331\n\"!I\210*\202
\314'\n\"\203\327�\316\n!\317
!\">\204\262�\320\321\322
D\"\210
\211(\323\324I\210)\317
!\">\204\313�\320\321\322
D\"\210
\211)\332\311I\210)\202
\316\311!\317
!\">\204\353�\320\321\322
D\"\210
\211*\323\324I\210)\317
!\">\204\320\321\322
D\"\210
\211+\325\nI\210)\f?\205z
\205z\333\334\317
!\">\204)\320\321\322
D\"\210
\325H
\317!\">\204=\320\321\322D\"\210\211\327H\206o\317!\">\204S\320\321\322D\"\210\211\323H\205o\335\317!\">\204j\320\321\322D\"\210\323H\336\"\262#BB\337\340\"-\207" [scheme env-var env-proxy url-proxy-services cur-proxy urlobj "_proxy" getenv assoc nil t "" string-match "^\$[^:]+\$:\$[0-9]+\$$" url-generic-parse-url type-of signal wrong-type-argument url 1 "http" 4 match-string 5 string-to-number 2 7 format "%s:%d" url-scheme-get-property default-port message "Using a proxy for %s..." url-scheme--registering-proxy cl-struct-url-tags #1=#:v #2=#:v #3=#:v #4=#:v url-nonrelative-link #5=#:v #6=#:v #7=#:v #8=#:v] 11 (#$ . 1624)])
#@126 Get PROPERTY of a URL SCHEME.
Will automatically try to load a backend from url-SCHEME.el if
it has not already been loaded.
(defalias 'url-scheme-get-property #[(scheme property) "\227\306	\"\211\204\254�\307P\310!\3111)�\312\313\232\203#�\314\202$�\f!0\202-�\210\202.�\210\315\f!\203\253�
\204<�\316!\210\317\304\fF\320\211\203\244�@\321\322\323@#!A\211\203\232�\324\267\202\224�\315!\203\232�\325\n@#\202\232�\326!\203\232�\325\n@J#\202\232�\327\330\"\210*A\211\204M�*\331\n	#\210*\332\n \"\206\272�\332! \")\207" [scheme url-scheme-registry desc stub loader url-scheme--registering-proxy gethash "url-" intern (error) require "https" url-http fboundp url-scheme-register-proxy name nil intern-soft format "%s-%s" #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (function 109 variable 128)) plist-put boundp error "Malformed url-scheme-methods entry: %S" puthash plist-get url-scheme-methods cell --dolist-tail-- type symbol property url-scheme-default-properties] 6 (#$ . 3093)])
(provide 'url-methods)

${this.title}

Code Editor : url-methods.elc