| Current Path : /usr/share/emacs/24.3/lisp/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/emacs/24.3/lisp/t-mouse.elc |
;ELC ;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:31 2024 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/t-mouse.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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@58 Try to enable gpm mouse support on the current terminal. (defalias 'gpm-mouse-enable #[nil "\302\303\216\304\305!\204 \306\307!\210 \205 \305 \210\310\302\311\312#\210\312\211*\207" [activated gpm-mouse-mode nil ((byte-code "\204 \301 \210\301\207" [activated 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] 4 (#$ . 550)]) #@59 Try to disable gpm mouse support on the current terminal. (defalias 'gpm-mouse-disable #[nil "\300\301!\203 \301 \210\302\303\304\303#\207" [fboundp gpm-mouse-stop set-terminal-parameter nil gpm-mouse-active] 4 (#$ . 981)]) (byte-code "\300\301\302\303#\210\304\301\302\305#\210\306\302\307\310\311\312\313\314\315\316\317\320& \207" [defalias t-mouse-mode gpm-mouse-mode nil make-obsolete "23.1" custom-declare-variable t "Non-nil if Gpm-Mouse mode is enabled.\nSee the command `gpm-mouse-mode' for 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 :group mouse :type boolean] 12) #@394 Toggle mouse support in GNU/Linux consoles (GPM Mouse mode). With a prefix argument ARG, enable GPM Mouse mode if ARG is positive, and disable it otherwise. If called from Lisp, enable the mode if ARG is omitted or nil. 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. (defalias 'gpm-mouse-mode #[(&optional arg) "\306 \307=\203 \n?\202 \310 !\311V\312 \313\211 \203V \f@\314 !\315=\203O \n\316 \317\"=\204O \320 p #\321\216\322\323 !@\324\"\210\n\203K \325 \210\202N \326 \210+\fA\211\204 *\327\330\n\203a \331\202b \332\"\210\333\334!\203\207 \335\302!\210\306 \203z \306 \232\203\207 \336\337\n\203\204 \340\202\205 \341\"\210)\342 \210\n\207" [#1=#:last-message arg gpm-mouse-mode terminal --dolist-tail-- #2=#:old-buffer current-message toggle prefix-numeric-value 0 terminal-list nil terminal-live-p t terminal-parameter gpm-mouse-active selected-frame ((byte-code "\302!\203 \303\304\"\210\305 !\203 q\210\302\207" [#3=#:old-frame #2# 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" "en" "dis" force-mode-line-update #3#] 5 (#$ . 1777) (list (or current-prefix-arg 'toggle))]) (byte-code "\301\302\303\304\300!\205\n \303\211%\210\305\306!\207" [gpm-mouse-mode-map add-minor-mode gpm-mouse-mode nil boundp provide t-mouse] 6)