Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.47
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
emacs /
27.1 /
lisp /
term /
[ HOME SHELL ]
Name
Size
Permission
Action
AT386.elc
1
KB
-rw-r--r--
README
10.95
KB
-rw-r--r--
bobcat.elc
596
B
-rw-r--r--
common-win.elc
14.47
KB
-rw-r--r--
cygwin.elc
561
B
-rw-r--r--
internal.elc
18.3
KB
-rw-r--r--
iris-ansi.elc
7.47
KB
-rw-r--r--
konsole.elc
634
B
-rw-r--r--
linux.elc
787
B
-rw-r--r--
lk201.elc
2.32
KB
-rw-r--r--
news.elc
1.23
KB
-rw-r--r--
ns-win.elc
22.09
KB
-rw-r--r--
pc-win.elc
9.26
KB
-rw-r--r--
rxvt.elc
4.84
KB
-rw-r--r--
screen.elc
1.11
KB
-rw-r--r--
sun.elc
3.3
KB
-rw-r--r--
tmux.elc
1.1
KB
-rw-r--r--
tty-colors.elc
29.5
KB
-rw-r--r--
tvi970.elc
3.4
KB
-rw-r--r--
vt100.elc
2.51
KB
-rw-r--r--
vt200.elc
718
B
-rw-r--r--
w32-win.elc
12.91
KB
-rw-r--r--
w32console.elc
2.02
KB
-rw-r--r--
wyse50.elc
2.16
KB
-rw-r--r--
x-win.elc
27.21
KB
-rw-r--r--
xterm.elc
31.52
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : ns-win.elc
;ELC ;;; Compiled ;;; in Emacs version 27.1 ;;; with all optimizations. ;;; This file contains utf-8 non-ASCII characters, ;;; and so cannot be loaded into Emacs 22 or earlier. (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (string-lessp emacs-version "23") (error "`%s' was compiled for Emacs 23 or later" #$)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\301\302!\204 \303\304\"\210\305\306!\210\305\307!\210\305\310!\210\305\311!\210\305\312!\210\305\313!\210\305\314!\210\315\302\316\317\320\321%\207" [invocation-name featurep ns error "%s: Loading ns-win.el but not compiled for GNUstep/macOS" require frame mouse faces menu-bar fontset dnd ucs-normalize custom-declare-group nil "GNUstep/macOS specific features." :group environment] 6) #@30 (fn SWITCH &optional TEMP) (defalias 'ns-handle-nxopen #[513 "\303\203\n \304\202 \305\"\303 \n\211A\242C\"\211\207" [unread-command-events ns-input-file x-invocation-args append (ns-open-temp-file) (ns-open-file)] 6 (#$ . 810)]) #@15 (fn SWITCH) (defalias 'ns-handle-nxopentemp #[257 "\300\301\"\207" [ns-handle-nxopen t] 4 (#$ . 1054)]) #@15 (fn SWITCH) (defalias 'ns-ignore-1-arg #[257 "A\211\207" [x-invocation-args] 3 (#$ . 1167)]) #@195 Parse a Nextstep-style geometry string GEOM. Returns an alist of the form ((top . TOP), (left . LEFT) ... ). The properties returned may include `top', `left', `height', and `width'. (fn GEOM) (defalias 'ns-parse-geometry #[257 "\300\301\"\205J \302\303\304\305\306\307\"!BC\306\310\"\205$ \311\305\306\310\"!BC\306\312\"\2056 \313\305\306\312\"!BC\306\314\"\205H \315\305\306\314 \"!BCF\"\207" [string-match "\\([0-9]+\\)\\( \\([0-9]+\\)\\( \\([0-9]+\\)\\( \\([0-9]+\\) ?\\)?\\)?\\)?" apply append top string-to-number match-string 1 3 left 5 height 7 width] 11 (#$ . 1271)]) (byte-code "\301\302\303\304#\210\305\211\203( \211@\302N\203! \303N\204! \306\303\302N#\210A\266\202\202 \210\307\302\303\310#\210\311\312\313#\210\311\314\315#\210\311\316\317#\210\311\320\321#\210\311\322\323#\210\311\324\325#\210\311\326\327#\210\311\330\331#\210\311\332\333#\210\311\334\335#\210\311\336\337#\210\311\340\341#\210\311\342\343#\210\311\344\345#\210\311\346\347#\210\311\350\351#\210\311\352\353#\210\311\354\355#\210\311\356\357#\210\311\360\361#\210\311\362\363#\210\311\364\365#\210\311\366\367#\210\311\370\367#\210\311\371\372#\210\311\373\333#\210\311\374\375#\210\311\376\377#\210\311\201@ \201A #\210\311\201B \201C #\210\311\201D \201E #\210\311\201F \201G #\210\311\201H \201I #\210\311\201J \201K #\210\311\201L \201M #\210\311\201N \201O #\210\311\201P \201Q #\210\311\201R \201S #\210\311\201T \201U #\210\311\201V \201W #\210\311\201X \201Y #\210\311\201Z \201Y #\210\311\201[ \201Y #\210\311\201\\ \201Y #\210\311\201] \201^ #\210\311\201_ \201^ #\210\311\201` \201a #\210\311\201b \201c #\210\311\201d \321#\210\311\201e \201f #\210\311\201g \201h #\210\311\201i \201f #\210\311\201j \201h #\210\311\201k \201l #\210\311\201m \201n #\210\311\201o \201p #\210\201q \201r !\210\311\201s \201G #\210\311\201t \201u #\210\311\201v \201w #\210\311\201x \201y #\210\311\201z \201{ #\210\311\201| \201} #\210\311\201~ \201A #\210\311\201 \201\200 #\210\311\201\201 \313#\210\301\201\202 \201\203 \"\210\301\201\204 \201\205 \"\210\301\201\206 \201\207 \"\210\301\201\210 \201\211 \"\210\301\201\212 \201\213 \"\210\301\201\214 \201\215 \"\210\301\201\216 \201\217 \"\210\301\201\220 \201\221 \"\210\201\222 \201\223 \201\224 \"\207" [global-map defvaralias ns-alternatives-map x-alternatives-map nil (saved-value saved-variable-comment) put make-obsolete-variable "24.1" define-key [8388652] customize [8388647] next-window-any-frame [8388704] other-frame [8388734] ns-prev-frame [8388653] center-line [8388666] ispell [8388671] info [8388702] kill-some-buffers [8388646] kill-current-buffer [8388675] ns-popup-color-panel [8388676] dired [8388677] edit-abbrevs [8388684] shell-command [8388685] manual-entry [8388691] ns-write-file-using-panel [8388705] mark-whole-buffer [8388707] ns-copy-including-secondary [8388708] isearch-repeat-backward [8388709] isearch-yank-kill [8388710] isearch-forward [8388711] isearch-repeat-forward [8388712] ns-do-hide-emacs [8388680] ns-do-hide-others [142606440] [8388714] exchange-point-and-mark [8388715] [8388716] goto-line [8388717] iconify-frame [8388718] make-frame [8388719] ns-open-file-using-panel [8388720] ns-print-buffer [8388721] save-buffers-kill-emacs [8388723] save-buffer [8388724] ns-popup-font-panel [8388725] revert-buffer [8388726] yank [8388727] delete-frame [8388728] kill-region [8388729] ns-paste-secondary [8388730] undo [8388651] text-scale-adjust [8388669] [8388653] [8388656] [8388732] shell-command-on-region [s-kp-bar] [75497504] ns-do-show-character-palette [s-right] ns-next-frame [s-left] [home] beginning-of-buffer [end] end-of-buffer [kp-home] [kp-end] [kp-prior] scroll-down-command [kp-next] scroll-up-command [S-mouse-1] mouse-save-then-kill global-unset-key [S-down-mouse-1] [ns-power-off] [ns-open-file] ns-find-file [ns-open-temp-file] [ns-open-file] [ns-change-font] ns-respond-to-change-font [ns-open-file-line] ns-open-file-select-line [ns-spi-service-call] ns-spi-service-call [ns-new-frame] [ns-toggle-toolbar] ns-toggle-toolbar [ns-show-prefs] mac-allow-anti-aliasing ns-antialias-text mac-command-modifier ns-command-modifier mac-right-command-modifier ns-right-command-modifier mac-control-modifier ns-control-modifier mac-right-control-modifier ns-right-control-modifier mac-option-modifier ns-option-modifier mac-right-option-modifier ns-right-option-modifier mac-function-modifier ns-function-modifier defalias do-applescript ns-do-applescript] 7) #@13 (fn PATH) (defalias 'ns-define-service #[257 "\301\302\303\304#\305\306\307\310\302\303\311 B\312##!\313\314\315\316\317\320!\321\"\322\323\324&\"\210\325\"\203q A\203\\ \317\305@!C\"\262\326\325\"!\204U \327@\330@!B#\210A\262\202. \317\305@!C\"\262\327@B#\210\207" [global-map [menu-bar services] mapconcat identity "/" intern subst-char-in-string 32 45 "ns-service" "-" defalias make-byte-code 257 "\211;\203 \211\202 \205 \303 \304 {\305\300\";\203 \211\202> \211\205> \203. \230?\205> \2038 \303 \304 |\210\211c\210\306\211\207" vconcat vector [mark-active deactivate-mark region-beginning region-end ns-perform-service nil] 5 "\n\n(fn ARG)" "p" lookup-key keymapp define-key make-sparse-keymap] 13 (#$ . 5806)]) #@82 Open multiple files when selecting a multiline string FILENAMES. (fn FILENAMES) (defalias 'ns-open-file-service #[257 "\300\301\302\303$\211\211\205 \211@\304\305\"\210A\266\202\202 \262\207" [split-string "[\n ]+" t "[ ]+" dnd-open-file nil] 7 (#$ . 6575)]) #@31 Respond to a service request. (defalias 'ns-spi-service-call #[0 "\302\230\203 \303\304\305!!\210 c\207\306\230\203 \307 !\207\310\230\203+ \311 \210\312 \210\313y\210 c\207\314\230\2035 \311 !\207\315\316\"\207" [ns-input-spi-name ns-input-spi-arg "open-selection" switch-to-buffer generate-new-buffer "*untitled*" "open-file" ns-open-file-service "mail-selection" compose-mail rfc822-goto-eoh 1 "mail-to" error "Service %s not recognized"] 3 (#$ . 6850) nil]) (custom-declare-face 'ns-working-text-face '((t :underline t)) "Face used to highlight working text during compose sequence insert." :group 'ns) #@151 Overlay used to highlight working text during compose sequence insert. When text is in th echo area, this just stores the length of the working text. (defvar ns-working-overlay nil (#$ . 7471)) #@102 Whether, for purposes of inserting working composition text, the minibuffer is currently being used. (defalias 'ns-in-echo-area #[0 "\206> \203 \302 \206> \303`\304\"\206> o?\205> \303`\305\"\203- \303`S\305\"\303`\305\"=\206> \303`\306\"\205> \303`S\306\"\303`\306\"=\207" [isearch-mode cursor-in-echo-area current-message get-char-property invisible display composition] 4 (#$ . 7672)]) (defalias 'ns-put-working-text #[0 "\300 \203 \301 \207\302 \207" [ns-in-echo-area ns-echo-working-text ns-insert-working-text] 1 nil nil]) (defalias 'ns-unput-working-text #[0 "\300 \207" [ns-delete-working-text] 1 nil nil]) #@203 Insert contents of `ns-working-text' as UTF-8 string and mark with `ns-working-overlay'. Any previously existing working text is cleared first. The overlay is assigned the face `ns-working-text-face'. (defalias 'ns-insert-working-text #[0 "\302 \210`c\210\303\304`p\305\306%\211\307\310#\207" [ns-working-text ns-working-overlay ns-delete-working-text overlay-put make-overlay nil t face ns-working-text-face] 8 (#$ . 8298) nil]) #@91 Echo contents of `ns-working-text' in message display area. See `ns-insert-working-text'. (defalias 'ns-echo-working-text #[0 "\303 \210\304 \211G\305 G P\262\306\211\n\\\307\310%\210\311\312\")\207" [message-log-max ns-working-text ns-working-overlay ns-delete-working-text current-message nil put-text-property face ns-working-text-face message "%s"] 8 (#$ . 8738)]) #@53 Delete working text and clear `ns-working-overlay'. (defalias 'ns-delete-working-text #[0 "\302!\203\" \303!\203\" r\303!q\210\304!\305!|\210\306!\210)\202< \250\203< \307 \310\311\312GZ#\262\313\314\"\210)\210\310\211\207" [ns-working-overlay message-log-max overlayp overlay-buffer overlay-start overlay-end delete-overlay current-message nil substring 0 message "%s"] 6 (#$ . 9121) nil]) (byte-code "\301=\203 \302\303\304\"\210\305\306!\210\301\207" [system-type darwin define-coding-system-alias utf-8-nfd utf-8-hfs set-file-name-coding-system utf-8-hfs-unix] 3) #@136 Insert contents of file `ns-input-file' like insert-file but with less prompting. If file is a directory perform a `find-file' on it. (defalias 'ns-insert-file #[0 "\211A\242\301!\203 \302!\202 \303`\304!A@\\!\207" [ns-input-file file-directory-p find-file push-mark insert-file-contents] 5 (#$ . 9712) nil]) #@70 Overlay used to highlight areas in files requested by Nextstep apps. (defvar ns-select-overlay nil (#$ . 10035)) (make-variable-buffer-local 'ns-select-overlay) #@104 Open a buffer containing the file `ns-input-file'. Lines are highlighted according to `ns-input-line'. (defalias 'ns-open-file-select-line #[0 "\302 \210\203+ \303 \203+ \203 \304 !\305 \210eb\210:\203' @A^\202( Sy\207\203u \204> \306\307ee\"\211\310\311#\210\212eb\210\312:\203P @A^\202Q !)\212eb\210\312:\203e @A]\202f T!)\313 #\210\305 \210b\207 \205~ \304 !\211\207" [ns-input-line ns-select-overlay ns-find-file buffer-modified-p delete-overlay deactivate-mark overlay-put make-overlay face highlight line-beginning-position move-overlay] 6 (#$ . 10203) nil]) #@54 Removes any Nextstep highlight a buffer may contain. (defalias 'ns-unselect-line #[0 "\205 \301!\211\207" [ns-select-overlay delete-overlay] 2 (#$ . 10797)]) (add-hook 'first-change-hook 'ns-unselect-line) #@18 (fn ARG1 ARG2) (defalias 'get-lisp-resource #[514 "\300\"\211\204\f \301\202% \211\226\302\230\203 \303\202% \211\226\304\230\203\" \305\202% \306!\207" [ns-get-resource unbound "YES" t "NO" nil read] 5 (#$ . 11013)]) #@82 SKIP: real doc in xfns.c. (fn PROMPT DIR DEFAULT_FILENAME MUSTMATCH ONLY_DIR_P) (defalias 'x-file-dialog #[1285 "\300%\207" [ns-read-file-name] 11 (#$ . 11243)]) #@58 Pop up open-file panel, and load the result in a buffer. (defalias 'ns-open-file-using-panel #[0 "\301\302\303\304\303$\211\205 C\211\205 \305 \207" [ns-input-file ns-read-file-name "Select File to Load" nil t ns-find-file] 6 (#$ . 11418) nil]) #@60 Pop up save-file panel, and save buffer in resulting name. (defalias 'ns-write-file-using-panel #[0 "\300\301\302\300\211\211$\262\303!\210\211\205 \304!\207" [nil ns-read-file-name "Save As" message write-file] 6 (#$ . 11674) nil]) (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \207" [custom-declare-variable ns-pop-up-frames funcall function #[0 "\300\207" [fresh] 1] "Non-nil means open files upon request from the Workspace in a new frame.\nIf t, always do so. Any other non-nil value means open a new frame\nunless the current buffer is a scratch buffer." :type (choice (const :tag "Never" nil) (const :tag "Always" t) (other :tag "Except for scratch buffer" fresh)) :version "23.1" :group ns] 10) #@56 Do a `find-file' with the `ns-input-file' as argument. (defalias 'ns-find-file #[0 "\304\305\211A\242 \"!\306!\307\310\"\307\311\310\"\203+ \312\313!!\210\314\313!!\210\315!\202h \n\316=\203O \211\203O \317\320!\210\312\313!!\210\314\313!!\210\315!\210\321!\202h \n\203a \317\320!\210\322\323\324\")\202h \317\320!\210\321!\207" [ns-input-file command-line-default-directory ns-pop-up-frames pop-up-frames file-truename expand-file-name find-file-noselect get-buffer-window visible "*scratch*" select-frame window-frame raise-frame select-window fresh ns-hide-emacs activate find-file t pop-to-buffer nil] 7 (#$ . 12406) nil]) #@165 Edit the files listed in the drag-n-drop EVENT. Switch to a buffer editing the last file dropped, or insert the string dropped into the current buffer. (fn EVENT) (defalias 'ns-drag-n-drop #[257 "\300!\211@\262AA@\211@A@AA\301\302\303#\304\305\"\210\306 \210\307 \262\310>\203V \311=\203M \211\205H \211@\312\313\314P#\210A\266\202\2022 \262\202\211 \315\313#\202\211 \316>\203\203 \211\205~ \211@\312\313\311=\203t \314P\202u #\210A\266\202\202] \262\202\211 \315\313#\207" [event-start mapconcat identity "\n" set-frame-selected-window nil raise-frame selected-window ns-drag-operation-generic file dnd-handle-one-url private "file:" dnd-insert-text ns-drag-operation-copy] 14 (#$ . 13055) "e"]) (byte-code "\300\301\302\"\210\303\304\305\"\210\303\306\307\"\207" [global-set-key [drag-n-drop] ns-drag-n-drop defvaralias ns-option-modifier ns-alternate-modifier ns-right-option-modifier ns-right-alternate-modifier] 3) (defalias 'ns-do-hide-emacs #[0 "\300\301!\207" [ns-hide-emacs t] 2 nil nil]) (defalias 'ns-do-hide-others #[0 "\300 \207" [ns-hide-others] 1 nil nil]) (defalias 'ns-do-emacs-info-panel #[0 "\300 \207" [ns-emacs-info-panel] 1 nil nil]) (defalias 'ns-do-show-character-palette #[0 "\300 \207" [ns-show-character-palette] 1 nil nil]) #@31 Switch to next visible frame. (defalias 'ns-next-frame #[0 "\300\301!\207" [other-frame 1] 2 (#$ . 14348) nil]) #@35 Switch to previous visible frame. (defalias 'ns-prev-frame #[0 "\300\301!\207" [other-frame -1] 2 (#$ . 14466) nil]) (add-hook 'after-make-frame-functions 'select-frame) #@132 Switches the tool bar on and off in frame FRAME. If FRAME is nil, the change applies to the selected frame. (fn &optional FRAME) (defalias 'ns-toggle-toolbar #[256 "\301\302\303\302\"\206 \304\304V\203 \304\202 \305BC\"\210?\205! \300\306!\207" [tool-bar-mode modify-frame-parameters tool-bar-lines frame-parameter 0 1 t] 7 (#$ . 14643) nil]) #@76 Interactive front-end to `print-buffer': asks for user confirmation first. (defalias 'ns-print-buffer #[0 "\302\303!\203: <\204 \304\305 !!\203: \306\307 !>\203: <\203$ \202% \310\311\312\313\314 \"!\2035 \315 \2028 \316\317!)\207\315 \207" [last-nonmenu-event last-command-event called-interactively-p interactive char-or-string-p event-basic-type super event-modifiers (mouse-1 POSITION 1) y-or-n-p format "Print buffer %s? " buffer-name print-buffer error "Canceled"] 4 (#$ . 15000) nil]) (byte-code "\301\302\303\304\305#\210\302\306\304\305#\207" [scalable-fonts-allowed t defalias x-select-font ns-popup-font-panel "Pop up the font panel.\nThis function has been overloaded in Nextstep." mouse-set-font] 4) #@94 Respond to changeFont: event, expecting `ns-input-font' and `ns-input-fontsize' of new font. (defalias 'ns-respond-to-change-font #[0 "\302\303 \304BC\"\210\302\303 \305 BC\"\210\306 !\207" [ns-input-fontsize ns-input-font modify-frame-parameters selected-frame fontsize font set-frame-font] 4 (#$ . 15725) nil]) #@212 String of fontset spec of the standard fontset. This defines a fontset consisting of the Courier and other fonts that come with macOS. See the documentation of `create-fontset-from-fontset-spec' for the format. (defvar ns-standard-fontset-spec (mapconcat 'identity '("-ns-*-*-*-*-*-10-*-*-*-*-*-fontset-standard" "latin:-*-Courier-*-*-*-*-10-*-*-*-*-*-iso10646-1" "han:-*-Kai-*-*-*-*-10-*-*-*-*-*-iso10646-1" "cyrillic:-*-Trebuchet$MS-*-*-*-*-10-*-*-*-*-*-iso10646-1") ",") (#$ . 16046)) (byte-code "\301\302\303\304\305#\210\306\303\304\307#\207" [ns-reg-to-script (("iso8859-1" . latin) ("iso8859-2" . latin) ("iso8859-3" . latin) ("iso8859-4" . latin) ("iso8859-5" . cyrillic) ("microsoft-cp1251" . cyrillic) ("koi8-r" . cyrillic) ("iso8859-6" . arabic) ("iso8859-7" . greek) ("iso8859-8" . hebrew) ("iso8859-9" . latin) ("iso8859-10" . latin) ("iso8859-11" . thai) ("tis620" . thai) ("iso8859-13" . latin) ("iso8859-14" . latin) ("iso8859-15" . latin) ("iso8859-16" . latin) ("viscii1.1-1" . latin) ("jisx0201" . kana) ("jisx0208" . han) ("jisx0212" . han) ("jisx0213" . han) ("gb2312.1980" . han) ("gb18030" . han) ("gbk-0" . han) ("big5" . han) ("cns11643" . han) ("sisheng_cwnn" . bopomofo) ("ksc5601.1987" . hangul) ("ethiopic-unicode" . ethiopic) ("is13194-devanagari" . indian-is13194) ("iso10646.indian-1" . devanagari)) defalias ns-store-cut-buffer-internal gui-set-selection nil make-obsolete "24.1"] 4) (defalias 'ns-copy-including-secondary #[0 "\300\301!\210\302\303`\304\305!{\"\207" [call-interactively kill-ring-save gui-set-selection SECONDARY mark t] 5 nil nil]) (defalias 'ns-paste-secondary #[0 "\300\301!c\207" [gui-get-selection SECONDARY] 2 nil nil]) (byte-code "\302\303\304\"\210\302\305\306\"\210\307\310!\210\307\311!\210\307\312!\210\307\313!\210\314\315!\203> \316\317\"\210\320\321\322\"!\211\323Y\203= \324\325\301\326\327\301J!C#\210\210\324\207" [ns-version-string mouse-wheel-progressive-speed global-set-key [vertical-scroll-bar down-mouse-1] scroll-bar-toolkit-scroll [horizontal-scroll-bar down-mouse-1] scroll-bar-toolkit-horizontal-scroll global-unset-key [vertical-scroll-bar mouse-1] [vertical-scroll-bar drag-mouse-1] [horizontal-scroll-bar mouse-1] [horizontal-scroll-bar drag-mouse-1] featurep cocoa string-match "^appkit-\\([^ -]*\\)" string-to-number match-string 1 1138 nil put customized-value custom-quote] 6) #@12 (fn POS) (defalias 'ns-face-at-pos #[257 "\211@A@AAB\301@A#\302\"\303!\304!\204\" \305\202\221 \306\267\2020 \307\202\221 \310\202\221 :\203\220 rq\210\311\312!@A@B\313!\314 !S\305\n&@\211\315!=\203a \316\202\212 \203w \317 W\203w \211\320 W\203w \321\202\212 \322\323#\211:\203\207 \211@\202\210 \211\262\262)\202\221 \305\207" [mark-active window-at coordinates-in-window-p window-buffer window-edges nil #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (mode-line 40 vertical-line 44)) mode-line default compute-motion window-start window-end window-width window-point cursor region-beginning region-end region get-char-property face] 15 (#$ . 18418)]) (defalias 'ns-suspend-error #[0 "\300\301\302\303 \">\205 \304\305!\207" [ns mapcar window-system frame-list error "Cannot suspend Emacs while an NS GUI frame exists"] 4]) (byte-code "\302\211\303\207" [frame-title-format icon-title-format "%b" nil] 2) #@53 Non-nil if Nextstep windowing has been initialized. (defvar ns-initialized nil (#$ . 19406)) (byte-code "\300\301\302\303\302\304%\210\305\306\307\"\210\300\310\302\311\302\312%\210\300\313\302\314\302\315%\210\300\316\302\317\302\320%\210\300\321\302\322\302\323%\210\300\324\302\325\302\326%\210\300\327\302\330\302\331%\210\332\333!\210\332\334!\207" [cl-generic-define-method window-system-initialization nil (&context (window-system ns) &optional _display) #[256 "\203 \306\307!\210\310 !\311 \210\3121 \313\n\314\"0\202% \315\316\317\320\"\321#\262\210\322\323 \206- \324 \314#\210\325\326!\203X \327\330 \331\332;B#\210\330 \333\334#\210\330 \335\336#\210\330 \337\340\341\340!B#\210\342 \211\203\202 \211@\211@\343=\203o \344A!\210\202{ \345 \346@!\344A!#\210A\266\202\202Z \210\347\350\351\"\314=\203\232 \347\350\352\"\314=\203\232 \353\354\355\"\210\356\347\350\357\"\203\246 \360\202\247 \361!\210<\362=\203\265 \353\363\364\"\210\365\350\366\367#\210\370 \210\353\371\372\"\210\314\211\207" [ns-initialized command-line-args ns-standard-fontset-spec x-command-line-resources menu-bar-final-items global-map cl--assertion-failed (not ns-initialized) x-handle-args create-default-fontset (error) create-fontset-from-fontset-spec t display-warning initialization format "Creation of the standard fontset failed: %s" :error x-open-connection system-name "" featurep gnustep (buffer services hide-app quit) bindings--define-key [menu-bar help-menu] "Info" [menu-bar quit] (menu-item "Quit" save-buffers-kill-emacs :help "Save unsaved buffers, then exit") [menu-bar hide-app] (menu-item "Hide" ns-do-hide-emacs :help "Hide Emacs") [menu-bar services] "Services" make-sparse-keymap ns-list-services undefined ns-define-service define-key vector get-lisp-resource nil "NXAutoLaunch" "HideOnAutoLaunch" add-hook after-init-hook ns-do-hide-emacs menu-bar-mode "Menus" 1 -1 darwin before-init-hook #[0 "\302\303\211\207" [locale-coding-system default-process-coding-system utf-8-unix (utf-8-unix . utf-8-unix)] 2] ns-set-resource "ApplePressAndHoldEnabled" "NO" x-apply-session-resources suspend-hook ns-suspend-error menu-bar-help-menu system-type] 8 "Initialize Emacs for Nextstep (Cocoa / GNUstep) windowing.\n\n(fn &optional DISPLAY)"] add-to-list display-format-alist (".*" . ns) handle-args-function (args &context (window-system ns)) #[257 "\300!\207" [x-handle-args] 3 "\n\n(fn ARGS)"] frame-creation-function (params &context (window-system ns)) #[257 "\300!\207" [x-create-frame-with-faces] 3 "\n\n(fn PARAMS)"] gui-backend-set-selection (selection value &context (window-system ns)) #[514 "\211\203 \300\"\207\301!\207" [ns-own-selection-internal ns-disown-selection-internal] 5 "\n\n(fn SELECTION VALUE)"] gui-backend-selection-owner-p (selection &context (window-system ns)) #[257 "\300!\207" [ns-selection-owner-p] 3 "\n\n(fn SELECTION)"] gui-backend-selection-exists-p (selection &context (window-system ns)) #[257 "\300!\207" [ns-selection-exists-p] 3 "\n\n(fn SELECTION)"] gui-backend-get-selection (selection-symbol target-type &context (window-system ns)) #[514 "\300\"\207" [ns-get-selection] 5 "\n\n(fn SELECTION-SYMBOL TARGET-TYPE)"] provide ns-win term/ns-win] 6)
Close
