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-expand.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.

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

(byte-code "\300\301!\210\300\302!\210\300\303!\207" [require url-methods url-util url-parse] 2)
#@13

(fn NAME)
(defalias 'url-expander-remove-relative-links #[257 "\211\300\232\203�\300\207\301\302\"\204�\303P\202�\211\301\304\"\203\"�\211\303P\262\301\305\"\203:�\306\307\310\224#\306\310\225\"P\262\202\"�\301\311\"\203R�\306\307\310\224#\306\310\225\"P\262\202:�\301\312\"\203d�\306\310\224\313#\262\202R�\211\207" ["" string-match "^/" "/" "/\\.+$" "/\$\\./\$" substring 0 1 "/\$[^/]*/\\.\\./\$" "^/\\.\\.\$/\$" nil] 6 (#$ . 505)])
#@334 Convert URL to a fully specified URL, and canonicalize it.
Second arg DEFAULT is a URL to start with if URL is relative.
If DEFAULT is nil or missing, the current buffer's URL is used.
Path components that are `.' are removed, and
path components followed by `..' are removed, along with the `..' itself.

(fn URL &optional DEFAULT)
(defalias 'url-expand-file-name #[513 "\203�\304\305\"\204�\306\307\310#\262\311!>\203�\211\202>�\211\203(�\312!\202>�	\2030�	\202>�\304\n\"\203;�\313\202>�\314\315!\262G\316U\203K�\317!\207\304\n\"\203T�\207\312!\320\321\311!>\204i�\322\323\324D\"\210\325H\326\"\304\327\"\203\220�\312\311!>\204\206�\322\323\324D\"\210\325H\330Q!\262\211\"\210\317!)\207" [cl-struct-url-tags url-current-object url-nonrelative-link inhibit-file-name-handlers string-match "^#" mapconcat #[257 "\211\300>\203�\301\207\302!\207" [(32 10 13) #1="" char-to-string] 3 "\n\n(fn X)"] #1# type-of url-generic-parse-url nil error "url-expand-file-name confused - no default?" 0 url-recreate-url t url-scheme-get-property signal wrong-type-argument url 1 expand-file-name "^//" ":"] 9 (#$ . 973)])
#@22

(fn URLOBJ DEFOBJ)
(defalias 'url-identity-expander #[514 "\301!>\204�\302\303\304D\"\210\211\305\301!>\204\"�\302\303\304D\"\210\305H\206;�\301!>\2048�\302\303\304D\"\210\305HI\207" [cl-struct-url-tags type-of signal wrong-type-argument url 1] 9 (#$ . 2121)])
#@22

(fn URLOBJ DEFOBJ)
(defalias 'url-default-expander #[514 "\301!>\204�\302\303\304D\"\210\305H?\205b\301!>\204%�\302\303\304D\"\210\211\305\301!>\2048�\302\303\304D\"\210\305H\206Q�\301!>\204N�\302\303\304D\"\210\305HI\266\301!>\204d�\302\303\304D\"\210\211\211\306\301!>\204x�\302\303\304D\"\210\306H\206\354�\301!>\204\217�\302\303\304D\"\210\305H\301!>\204\243�\302\303\304D\"\210\305H\230\205\354�\301!>\204\272�\302\303\304D\"\210\211\306H\206\352�\301!>\204\317�\302\303\304D\"\210\211\305H\205\352�\307\301!>\204\345�\302\303\304D\"\210\305H\310\"\262I\266\301!>\204\376�\302\303\304D\"\210\305H\311\230\204D\301!>\204\302\303\304D\"\210\211\312\301!>\204(\302\303\304D\"\210\312H\206A\301!>\204>\302\303\304D\"\210\312HI\266\301!>\204S\302\303\304D\"\210\305H\313\230\203\231\301!>\204j\302\303\304D\"\210\211\314\301!>\204}\302\303\304D\"\210\314H\206\226\301!>\204\223\302\303\304D\"\210\314HI\266\301!>\204\250\302\303\304D\"\210\315H\204\326\301!>\204\275\302\303\304D\"\210\211\315\301!>\204\320\302\303\304D\"\210\315HI\266\316!\316!@A\206\353\211\317\232\205\353A\320\321\301!>\204\376\302\303\304\nD\"\210\322H\"\203\323!\262\202=\323\317\232\203!\316!@\206:\317\202:\324\301!>\2043\302\303\304	D\"\210\322H!P!\262\301!>\204N\302\303\304D\"\210\211\322\203\\\325Q\202]I\262\266\204\207" [cl-struct-url-tags type-of signal wrong-type-argument url 1 5 url-scheme-get-property default-port "file" 4 "ftp" 2 9 url-path-and-query "" string-match "^/" 6 url-expander-remove-relative-links url-file-directory "?"] 12 (#$ . 2405)])
(provide 'url-expand)

${this.title}

Code Editor : url-expand.elc