MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 18.117.158.174
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/url/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/url/url-domsuf.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:08:19 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/url/url-domsuf.el
;;; in Emacs version 24.3.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.

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


(defvar url-domsuf-domains nil)
(defalias 'url-domsuf-parse-file #[nil "\306\307!rq\210\310\216\311\312\313	\"!\210\314\211\211m\204i\315\316!\204cg\317=\204,\314\2021\320\321u\210`\322 {\323\324\"\203P\325\314O\211\326\327\"GTB\fB\202c\n\203]\320B\fB\202c\314B\fB\321y\210\202\f\237\211.\207" [#1=#:temp-buffer data-directory exception domain domains url-domsuf-domains generate-new-buffer " *temp*" ((byte-code "\301!\203\n\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) insert-file-contents expand-file-name "publicsuffix.txt" nil looking-at "[/\n	 ]" 33 t 1 line-end-position string-match "\\`\\*\\." 2 split-string "[.]"] 5])
(defalias 'url-domsuf-cookie-allowed-p #[(domain) "\204\306 \210\307\310\n\311\"\211G\312\313A\314#\315\211\315\211\203x@\211@A\211\204F\n\230\203F\315\202o\307=\203Y\n\230\203Y\307\202o\247\203o\fU\203o
\230\203o\315A\211\204(*	.\207" [url-domsuf-domains allowedp domain domain-bits length upper-domain url-domsuf-parse-file t split-string "[.]" mapconcat identity "." nil entry modifier elem --dolist-tail--] 5])
(provide 'url-domsuf)

MMCT - 2023