Linux ns8.secondary29.go.th 2.6.32-754.28.1.el6.x86_64 #1 SMP Wed Mar 11 18:38:45 UTC 2020 x86_64
Apache/2.2.15 (CentOS)
: 122.154.134.11 | : 122.154.134.9
Cant Read [ /etc/named.conf ]
5.6.40
apache
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
emacs /
23.1 /
lisp /
org /
[ HOME SHELL ]
Name
Size
Permission
Action
org-agenda.elc
214.7
KB
-rw-r--r--
org-archive.elc
11.75
KB
-rw-r--r--
org-attach.elc
14.21
KB
-rw-r--r--
org-bbdb.elc
7.37
KB
-rw-r--r--
org-bibtex.elc
4.13
KB
-rw-r--r--
org-clock.elc
35.05
KB
-rw-r--r--
org-colview.elc
41.45
KB
-rw-r--r--
org-compat.elc
7.48
KB
-rw-r--r--
org-exp.elc
149.66
KB
-rw-r--r--
org-export-latex.elc
44.23
KB
-rw-r--r--
org-faces.elc
20.18
KB
-rw-r--r--
org-footnote.elc
13.77
KB
-rw-r--r--
org-gnus.elc
5.74
KB
-rw-r--r--
org-id.elc
16.92
KB
-rw-r--r--
org-info.elc
1.68
KB
-rw-r--r--
org-install.elc
635
B
-rw-r--r--
org-irc.elc
5.89
KB
-rw-r--r--
org-jsinfo.elc
5.39
KB
-rw-r--r--
org-list.elc
32.5
KB
-rw-r--r--
org-mac-message.elc
2.27
KB
-rw-r--r--
org-macs.elc
7.83
KB
-rw-r--r--
org-mew.elc
2.92
KB
-rw-r--r--
org-mhe.elc
5.16
KB
-rw-r--r--
org-mouse.elc
32.83
KB
-rw-r--r--
org-plot.elc
10.28
KB
-rw-r--r--
org-publish.elc
20.43
KB
-rw-r--r--
org-remember.elc
31.7
KB
-rw-r--r--
org-rmail.elc
2.82
KB
-rw-r--r--
org-table.elc
136.62
KB
-rw-r--r--
org-timer.elc
7.61
KB
-rw-r--r--
org-vm.elc
2.91
KB
-rw-r--r--
org-w3m.elc
3.88
KB
-rw-r--r--
org-wl.elc
2.82
KB
-rw-r--r--
org.elc
505.8
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : org-footnote.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:45 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/org/org-footnote.el ;;; in Emacs version 23.1.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`org-footnote.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\207" [require org-macs org-compat] 2) #@44 Regular expression for matching footnotes. (defconst org-footnote-re "[^][\n]\\[\\(?:\\([0-9]+\\)\\|\\(fn:\\([-_[:word:]]+?\\)?\\)\\(?::\\([^]]*?\\)\\)?\\)\\]" (#$ . 692)) #@59 Regular expression matching the definition of a footnote. (defconst org-footnote-definition-re "^\\(\\[\\([0-9]+\\|fn:[-_[:word:]]+\\)\\]\\)" (#$ . 870)) #@563 Outline heading containing footnote definitions before export. This can be nil, to place footnotes locally at the end of the current outline node. If can also be the name of a special outline heading under which footnotes should be put. This variable defines the place where Org puts the definition automatically, i.e. when creating the footnote, and when sorting the notes. However, by hand you may place definitions *anywhere*. If this is a string, during export, all subtrees starting with this heading will be removed after extracting footnote definitions. (custom-declare-variable 'org-footnote-section '"Footnotes" '(#$ . 1031) :group 'org-footnotes :type '(choice (string :tag "Collect fotnotes under heading") (const :tag "Define footnotes locally" nil))) #@397 Tag marking the beginning of footnote section. The Org-mode footnote engine can be used in arbitrary text files as well as in Org-mode. Outside Org-mode, new footnotes are always placed at the end of the file. When you normalize the notes, any line containing only this tag will be removed, a new one will be inserted at the end of the file, followed by the collected and normalized footnotes. (custom-declare-variable 'org-footnote-tag-for-non-org-mode-files '"Footnotes:" '(#$ . 1803) :group 'org-footnotes :type 'string) #@258 Non-nil means, define footnotes inline, at reference location. When nil, footnotes will be defined in a special section near the end of the document. When t, the [fn:label:definition] notation will be used to define the footnote at the reference position. (custom-declare-variable 'org-footnote-define-inline 'nil '(#$ . 2336) :group 'org-footnote :type 'boolean) #@429 Non-nil means, define automatically new labels for footnotes. Possible values are: nil prompt the user for each label t create unique labels of the form [fn:1], [fn:2], ... confirm like t, but let the user edit the created value. In particular, the label can be removed from the minibuffer, to create an anonymous footnote. plain Automatically create plain number labels like [1] (custom-declare-variable 'org-footnote-auto-label 't '(#$ . 2708) :group 'org-footnote :type '(choice (const :tag "Frompt for label" nil) (const :tag "Create automatic [fn:N]" t) (const :tag "Offer automatic [fn:N] for editing" confirm) (const :tag "Create automatic [N]" plain))) #@240 Non-nil means, fill paragraphs after extracting footnotes. When extracting inline footnotes, the lengths of lines can change a lot. When this option is set, paragraphs from which an inline footnote has been extracted will be filled again. (custom-declare-variable 'org-footnote-fill-after-inline-note-extraction 'nil '(#$ . 3424) :group 'org-footnote :type 'boolean) #@120 Is the cursor at a footnote reference? If yes, return the beginning position, the label, and the definition, if local. (defalias 'org-footnote-at-reference-p #[nil "\301\302\"\205 \303\224\304\305!\206 \304\306!\307\232?\205 \304\306!\304\310!E\207" [org-footnote-re org-in-regexp 15 0 match-string 1 2 "fn:" 4] 4 (#$ . 3798)]) #@381 Is the cursor at a footnote definition. This matches only pure definitions like [1] or [fn:name] at the beginning of a line. It does not a references like [fn:name:definition], where the footnote text is included and defined locally. The return value will be nil if not at a footnote definition, and a list with start and label of the footnote if there is a definition at point. (defalias 'org-footnote-at-definition-p #[nil "\212\302\210\212\303\304\305\306#)\303 \306#\205 \307\224\310\311!D*\207" [lim org-footnote-definition-re 1 re-search-backward "^\\*+ \\|^[ ]*$" nil t 0 match-string 2] 4 (#$ . 4137)]) #@55 Find the definition of the footnote with label LABEL. (defalias 'org-footnote-goto-definition #[(label) "\303 \210\304!\305\306\211#\307\212\310\n\307\311#\2061 eb\203% \310\n\307\311#\2061 ~\210eb\2051 \310\n\307\311#) \204> \312\313\"\202H b\210\314\315!\210\316\317!*\207" [label pos re org-mark-ring-push org-footnote-normalize-label format "^\\[%s\\]\\|.\\[%s:" nil re-search-forward t error "Cannot find definition of footnote %s" org-show-context link-search message "Edit definition and go back with `C-c &' or, if unique, with `C-c C-c'."] 4 (#$ . 4760) "sLabel: "]) #@55 Find the definition of the footnote with label LABEL. (defalias 'org-footnote-goto-next-reference #[(label) "\304 \210\305!\306\307\"`\310\212\311 \310\312#\206? eb\203& \311 \310\312#\206? ~\210\nb\2035 \311 \310\312#\206? eb\205? \311 \310\312#) \203N b\210\313\314!\202R \315\316\"+\207" [label pos p0 re org-mark-ring-push org-footnote-normalize-label format ".\\[%s[]:]" nil re-search-forward t org-show-context link-search error "Cannot find reference of footnote %s"] 4 (#$ . 5350) "sLabel: "]) (defalias 'org-footnote-normalize-label #[(label) "\247\203 \301!\302\303\"\204 \304P\207" [label number-to-string string-match "^[0-9]+$\\|^$\\|^fn:" "fn:"] 3]) #@62 Return list with all defined foot labels used in the buffer. (defalias 'org-footnote-all-labels #[nil "\306\211\212\214~\210eb\210\307\n\306\310#\203) \311\306 \312\f \"*\211\203 \313\301\"\210\202 eb\210\307 \306\310#\203\\ \314\306 \312\f \"*\206I \311\306 \312\f \"*\211\203, \315\232\204, \313\301\"\210\202, * *\207" [l rtn org-footnote-definition-re string num org-footnote-re nil re-search-forward t 2 match-string-no-properties add-to-list 1 "fn:"] 5 (#$ . 6038)]) #@100 Return a new unique footnote label. The returns the firsts fn:N labels that is currently not used. (defalias 'org-footnote-unique-label #[(&optional current) "\204 \304 \305=\203 \306\202 \307\310\311 \n\"\235\203$ \nT\202 \311 \n\"*\207" [current org-footnote-auto-label cnt fmt org-footnote-all-labels plain "%d" "fn:%d" 1 format] 3 (#$ . 6530)]) #@55 History of footnote labels entered in current buffer. (defvar org-footnote-label-history nil (#$ . 6896)) (make-variable-buffer-local 'org-footnote-label-history) #@222 Insert a new footnote. This command prompts for a label. If this is a label referencing an existing label, only insert the label. If the footnote label is empty or new, let the user edit the definition of the footnote. (defalias 'org-footnote-new #[nil "\305 \306!\n\307\235\203 \202# \310\311\312\313\"\314\211\n\315=\205 \316&\317 !\211\320\232\2036 \321c\210\322u\202` \235\203H \323 \324\261\210\325\326!\202` \f\203W \323 \327\261\210\322u\202` \323 \324\261\210\330 !+\207" [labels propose org-footnote-auto-label label org-footnote-define-inline org-footnote-all-labels org-footnote-unique-label (t plain) completing-read "Label (leave empty for anonymous): " mapcar list nil confirm org-footnote-label-history org-footnote-normalize-label "" "[fn:: ]" -1 "[" "]" message "New reference to existing note" ": ]" org-footnote-create-definition] 8 (#$ . 7066) nil]) #@54 Start the definition of a footnote with label LABEL. (defalias 'org-footnote-create-definition #[(label) "\305!\306\n\307=\2036 \2030 \310 \311Q\312 \306\313#\2040 ~\210\312 \306\313#\2040 db\210\314 \315\261\210\316 \210\202] \317\f\311Q\312 \306\313#\204V db\210\320\306x\210\321c\210`d|\210\f\315\261\210db\210\320\306x\210\321c\210\322\323\261\210\324\325!)\207" [label re major-mode org-footnote-section org-footnote-tag-for-non-org-mode-files org-footnote-normalize-label nil org-mode "^\\*+[ ]+" "[ ]*$" re-search-forward t "\n\n* " "\n" org-footnote-goto-local-insertion-point "^" " \n" "\n\n" "[" "] " message "Edit definition and go back with `C-c &' or, if unique, with `C-c C-c'."] 4 (#$ . 7960) "sLabel: "]) #@277 Do the right thing for footnotes. When at a footnote reference, jump to the definition. When at a definition, jump to the refernces. When neither at definition or reference, create a new footnote, interactively. With prefix arg SPECIAL, offer additional commands in a menu. (defalias 'org-footnote-action #[(&optional special) "\303\211\n\2038 \304\305!\210\306 \211\307\232\203 \310\311!\202d \312\232\203& \310 \202d \313\232\2031 \314 \202d \315\316\"\202d \317 \211\203S A@\203M \320 A@!\202d \321\224b\202d \322 \211\203b \323 A@!\202d \324 *\207" [c tmp special nil message "Footnotes: [s]ort | convert to [n]umeric | [d]elete" read-char-exclusive 115 org-footnote-normalize sort 110 100 org-footnote-delete error "No such footnote command %c" org-footnote-at-reference-p org-footnote-goto-definition 4 org-footnote-at-definition-p org-footnote-goto-next-reference org-footnote-new] 4 (#$ . 8702) "P"]) #@299 Collect the footnotes in various formats and normalize them. This find the different sorts of footnotes allowed in Org, and normalizes them to the usual [N] format that is understood by the Org-mode exporters. When SORT-ONLY is set, only sort the footnote definitions into the referenced sequence. (defalias 'org-footnote-normalize #[(&optional sort-only for-preprocessor) "\306\307\211\211\211\211\211\211\211\211\211 5 6 7 8 9\212eb\210\310:\307\311#\203 \312`\313\"\204 \314\315!\21176\314\316!\206@ \314\317!8\320\306\224f!8\321\232\203R \30788\203z \32285\"\211\203z \nA@\317\n8\204\203 \n\211 ;AA)7\240\210\202\203 \3239T\2119!\324 <\325\2167\203\227 \3267!7\202\323 \212eb\210\310\327\3308!\331Q\307\311#\204\257 \3077\202\322 \306\224\306\225\310\332\307\333#\210\f\306\224\206\302 d{7 b\210\334\307x\210`T\306\224|\210)*=\204\356 \335 \336 \337R!\2106\203\356 >\203\356 \340 \210\n\204 8 7E5B5\202 eb\210?\341=\203`@\203@\310\342\330@!\343Q\307\311#\203@A\204'@\204.\335\344!\210\202\206\345\311!\210\316y\210``\346\311!|\210\202\206db\210A\204\206@\203\206n\204T\347c\210\350@\347\261\210`\202\206\310\351\330B!\343Q\307\311#\203r\335\344!\210db\210\352\307x\210`d|\210\353B\347\261\210`\206\213db\210\3545!5=\203\242\355\307\356\3575\"\"5\356\3605\"5?\341=\203\277@\204\277=\203\277A\203\325\361\3625\353#75\205\332\3477\353\261\202\332\363\3645\".\f\207" [ins-point before a marker beg1 beg 0 nil re-search-forward t get-text-property org-protected match-string 4 1 2 char-to-string "fn:" assoc number-to-string match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) org-trim "^\\[" regexp-quote "\\]" "^[ ]*$\\|^\\*+ \\|^\\[\\([0-9]+\\|fn:[-_[:word:]]+\\)\\]" move " \n " replace-match "[" "]" fill-paragraph org-mode "^\\*[ ]+" "[ ]*$" "" org-back-to-heading org-end-of-subtree "\n" "* " "^" " \n " "\n\n" reverse delq mapcar #[(x) "@\205 @\301\232?\205 \207" [x "fn:"] 2] #[(x) "\3018\204 \211AA)\302\303@\"\240\210\202# \211AA)\304\3018!\240\210\207" [x 2 format "FOOTNOTE DEFINITION NOT FOUND: %s" org-trim] 5] mapconcat #[(x) "\302\303\203\n \304\202 \305 8\306\307 8!#\207" [sort-only x format "[%s] %s" 0 1 org-trim 2] 6] mapc org-insert-footnote-reference-near-definition ref-table idef def ref count org-footnote-re x save-match-data-internal sort-only org-footnote-fill-after-inline-note-extraction major-mode org-footnote-section for-preprocessor org-footnote-tag-for-non-org-mode-files] 12 (#$ . 9634)]) #@114 Find first reference of footnote ENTRY and insert the definition there. ENTRY is (fn-label num-mark definition). (defalias 'org-insert-footnote-reference-near-definition #[(entry) "@\205\" eb\210\301\302\303\304@!\"\305\306#\205\" \307 \210\302\310@\3118#c\207" [entry re-search-forward format ".\\[%s[]:]" regexp-quote nil t org-footnote-goto-local-insertion-point "\n\n[%s] %s" 2] 5 (#$ . 12228)]) #@70 Find insertion point for footnote, just before next outline heading. (defalias 'org-footnote-goto-local-insertion-point #[nil "\300 \210n\204\n \301 \210\302\303!\210o\204 \304f\305U\203 \302\303!\210\202 \306\307!\203* \302\310!\210\311\210\312\304x\207" [outline-next-heading newline beginning-of-line 0 nil 35 looking-at "#\\+TBLFM:" 2 1 "\n "] 2 (#$ . 12638)]) #@145 Delete the footnote at point. This will remove the definition (even multiple definitions if they exist) and all references of a footnote label. (defalias 'org-footnote-delete #[(&optional label) "\300\301\215\207" [done (byte-code "\306\211\211\211\211\307\211 \204S \310 \211\203: A@\211\203* \311\232\203: \307\224T\307\225|\210\312\313!\210\314\315\316\"\210 \204K \317 \211\203K A@ \204S \320\321!\210\212\214eb\210\322 \306\316#\203~ \323\324!\206j \323\325!\211 \232\203X \307\224T\307\225|\210 T\202X eb\210\326\327 !\330Q\322\n\306\316#\203\257 \307\224\322\331\306\316#\203\242 \307\224b\210\202\245 db\210 `|\210T\202\210 *\312\332 $.\207" [ndef nref def-re beg l label nil 0 org-footnote-at-reference-p "fn:" message "Anonymous footnote removed" throw done t org-footnote-at-definition-p error "Don't know which footnote to remove" re-search-forward match-string 1 2 "^\\[" regexp-quote "\\]" "^\\[\\|^[ ]*$\\|^\\*+ " "%d definition(s) of and %d reference(s) of footnote %s removed" x org-footnote-re] 8)] 2 (#$ . 13016)]) (provide 'org-footnote)
Close
