403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.216.141
Web Server : Apache
System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64
User : sws1073854427 ( 1073854427)
PHP Version : 8.4.23
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /usr/share/emacs/28.2/lisp/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/emacs/28.2/lisp//t-mouse.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



#@58 Try to enable gpm mouse support on the current terminal.
(defalias 'gpm-mouse-enable #[0 "\301C\302\303\"\216\304\305!\204\306\307!\210\205!\305 \210\310\301\311\312#\210\211\312\240)\207" [gpm-mouse-mode nil make-closure #[0 "\300\242?\205\301 \207" [V0 gpm-mouse-disable] 1] fboundp gpm-mouse-start error "Emacs must be built with Gpm to use this mode" set-terminal-parameter gpm-mouse-active t] 5 (#$ . 84)])
#@59 Try to disable gpm mouse support on the current terminal.
(defalias 'gpm-mouse-disable #[0 "\300\301!\203	\301 \210\302\303\304\303#\207" [fboundp gpm-mouse-stop set-terminal-parameter nil gpm-mouse-active] 4 (#$ . 509)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315&\207" [custom-declare-variable gpm-mouse-mode funcall function #[0 "\300\207" [t] 1 ""] "Non-nil if Gpm-Mouse mode is enabled.\nSee the `gpm-mouse-mode' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `gpm-mouse-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean :group mouse] 12)
#@998 Toggle mouse support in GNU/Linux consoles (GPM Mouse mode).

This is a minor mode.  If called interactively, toggle the `Gpm-Mouse
mode' mode.  If the prefix argument is positive, enable the mode, and
if it is zero or negative, disable the mode.

If called from Lisp, toggle the mode if ARG is `toggle'.  Enable the
mode if ARG is nil, omitted, or is a positive number.  Disable the
mode if ARG is a negative number.

To check whether the minor mode is enabled in the current buffer,
evaluate `(default-value \='gpm-mouse-mode)'.

The mode's hook is called both when the mode is enabled and when it is
disabled.

This allows the use of the mouse when operating on a GNU/Linux console,
in the same way as you can use the mouse under X11.
It relies on the `gpm' daemon being activated.

Note that when `gpm-mouse-mode' is enabled, you cannot use the
mouse to transfer text between Emacs and other programs which use
GPM.  This is due to limitations in GPM and the Linux kernel.

(fn &optional ARG)
(defalias 'gpm-mouse-mode #[256 "\302 \303\301\304=\203\305\301!?\202!\247\203 \306W\203 \307\202!\310\"\210\311\300!\2038\312\301\"\305\301!\2038\301B\313 \211\203y\211@\314!\310=\203r	\315\316\"=\204r\317 p\320\321#\216\322\323!@\324\"\210	\203l\325 \210\202o\326 \210)\266A\266\202\202:\210\327\330\305\301!\203\206\331\202\207\332\"\210\333\334!\203\257\335\301!\210\302 \203\237\211\302 \232\203\257\336\337\305\301!\203\253\340\202\254\341\342#\210\210\343 \210\305\301!\207" [global-minor-modes gpm-mouse-mode current-message set-default toggle default-value 1 nil t boundp delq terminal-list terminal-live-p terminal-parameter gpm-mouse-active selected-frame make-closure #[0 "\302\300!\203\303\300\304\"\210\305\301!\205\301q\207" [V0 V1 frame-live-p select-frame norecord buffer-live-p] 3] select-frame frames-on-display-list norecord gpm-mouse-enable gpm-mouse-disable run-hooks gpm-mouse-mode-hook gpm-mouse-mode-on-hook gpm-mouse-mode-off-hook called-interactively-p any customize-mark-as-set message "Gpm-Mouse mode %sabled%s" "en" "dis" "" force-mode-line-update] 10 (#$ . 1265) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar gpm-mouse-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\210\314\315!\207" [gpm-mouse-mode-map gpm-mouse-mode-hook variable-documentation put "Hook run after entering or leaving `gpm-mouse-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode gpm-mouse-mode boundp provide t-mouse] 6)

Youez - 2016 - github.com/yon3zu
LinuXploit