ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/linum.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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defconst linum-version "0.9x")
#@31 Overlays used in this buffer.
(defvar linum-overlays nil (#$ . 442))
#@31 Overlays available for reuse.
(defvar linum-available nil (#$ . 517))
#@60 Functions run in each buffer before line numbering starts.
(defvar linum-before-numbering-hook nil (#$ . 593))
(byte-code "\300\301\302\"\210\303\304\305\306\307\310%\210\311\312\313\314\315DD\316\307\304\317\320&\210\321\304\322\323\307\304%\210\311\324\313\314\325DD\326\307\304\317\327&\210\311\330\313\314\331DD\332\307\304\317\327&\207" [mapc make-variable-buffer-local (linum-overlays linum-available) custom-declare-group linum nil "Show line numbers in the left margin." :group convenience custom-declare-variable linum-format funcall function #[0 "\300\207" [dynamic] 1] "Format used to display line numbers.\nEither a format string like \"%7d\", `dynamic' to adapt the width\nas needed, or a function that is called with a line number as its\nargument and should evaluate to a string to be shown on that line.\nSee also `linum-before-numbering-hook'." :type (choice (string :tag "Format string") (const :tag "Dynamic width" dynamic) (function :tag "Function")) custom-declare-face ((t :inherit (shadow default))) "Face for displaying line numbers in the display margin." linum-eager #[0 "\300\207" [t] 1] "Whether line numbers should be updated after each command.\nThe conservative setting nil might miss some buffer changes,\nand you have to scroll or press \\[recenter-top-bottom] to update the numbers." boolean linum-delay #[0 "\300\207" [nil] 1] "Delay updates to give Emacs a chance for other changes."] 8)
#@89 Non-nil if Linum mode is enabled.
Use the command `linum-mode' to change this variable.
(defvar linum-mode nil (#$ . 2026))
(make-variable-buffer-local 'linum-mode)
#@283 Toggle display of line numbers in the left margin (Linum mode).
With a prefix argument ARG, enable Linum mode if ARG is positive,
and disable it otherwise. If called from Lisp, enable the mode
if ARG is omitted or nil.
Linum mode is a buffer-local minor mode.
(fn &optional ARG)
(defalias 'linum-mode #[256 "\303 \304=\203
?\202 \305!\306V\211\203O \203- \307\310\n\203% \311\202& \312\313\314$\210\2024 \307\315\316\313\314$\210\307\317\320\313\314$\210\307\321\322\313\314$\210\307\323\312\313\314$\210\312 \210\202v \324\310\312\314#\210\324\310\311\314#\210\324\317\320\314#\210\324\315\316\314#\210\324\323\312\314#\210\324\321\322\314#\210\322 \210\325\326\203\200 \327\202\201 \330\"\210\331\332!\203\245 \303 \203\225 \211\303 \232\203\245 \333\334\335\203\240 \336\202\241 \337#\266\210\340 \210\207" [linum-mode linum-eager linum-delay current-message toggle prefix-numeric-value 0 add-hook post-command-hook linum-schedule linum-update-current nil t after-change-functions linum-after-change window-scroll-functions linum-after-scroll change-major-mode-hook linum-delete-overlays window-configuration-change-hook remove-hook run-hooks linum-mode-hook linum-mode-on-hook linum-mode-off-hook called-interactively-p any " in current buffer" message "Linum mode %sabled%s" "en" "dis" force-mode-line-update] 8 (#$ . 2198) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
#@175 Hook run after entering or leaving `linum-mode'.
No problems result if this variable is not bound.
`add-hook' automatically binds it. (This is true for all hook variables.)
(defvar linum-mode-hook nil (#$ . 3612))
(byte-code "\301\302\303\304\300!\205\n \305\211%\207" [linum-mode-map add-minor-mode linum-mode "" boundp nil] 6)
(defvar linum-mode-major-mode nil)
(byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313\314\315\316\317& \207" [make-variable-buffer-local linum-mode-major-mode custom-declare-variable global-linum-mode funcall function #[0 "\300\207" [nil] 1] "Non-nil if Global Linum mode is enabled.\nSee the `global-linum-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 `global-linum-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :group linum :type boolean] 12)
#@325 Toggle Linum mode in all buffers.
With prefix ARG, enable Global Linum mode if ARG is positive;
otherwise, disable it. If called from Lisp, enable the mode if
ARG is omitted or nil.
Linum mode is enabled in all buffers where
`linum-on' would do it.
See `linum-mode' for more information on Linum mode.
(fn &optional ARG)
(defalias 'global-linum-mode #[256 "\302 \303\300\304=\203 \305\300!?\202 \306!\307V\"\210\203. \310\311\312\"\210\310\313\314\"\210\310\315\316\"\210\202= \317\311\312\"\210\317\313\314\"\210\317\315\316\"\210\320 \211\203c \211@r\211q\210\203S \321 \210\202[ \203[ \301\322!\210)A\266\202\202? \210\323\324\305\300!\203p \325\202q \326\"\210\327\330!\203\233 \331\300!\210\302 \203\211 \211\302 \232\203\233 \332\333\334\305\300!\203\226 \335\202\227 \336#\266\210\337 \210\305\300!\207" [global-linum-mode linum-mode current-message set-default toggle default-value prefix-numeric-value 0 add-hook after-change-major-mode-hook global-linum-mode-enable-in-buffers find-file-hook global-linum-mode-check-buffers change-major-mode-hook global-linum-mode-cmhh remove-hook buffer-list linum-on -1 run-hooks global-linum-mode-hook global-linum-mode-on-hook global-linum-mode-off-hook called-interactively-p any customize-mark-as-set "" message "Global Linum mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 4584) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
#@182 Hook run after entering or leaving `global-linum-mode'.
No problems result if this variable is not bound.
`add-hook' automatically binds it. (This is true for all hook variables.)
(defvar global-linum-mode-hook nil (#$ . 6008))
(byte-code "\301\302\303\304\300!\205\n \303\211%\207" [global-linum-mode-map add-minor-mode global-linum-mode nil boundp] 6)
(defvar linum-mode-set-explicitly nil nil)
(make-variable-buffer-local 'linum-mode-set-explicitly)
(defalias 'linum-mode-set-explicitly #[0 "\301\211\207" [linum-mode-set-explicitly t] 2])
(byte-code "\300\301\302\303#\210\304\305\301\"\207" [put linum-mode-set-explicitly definition-name global-linum-mode add-hook linum-mode-hook] 4)
(defvar global-linum-mode-buffers nil)
(defalias 'global-linum-mode-enable-in-buffers #[0 "\211\2056 \211@\305!\203/ r\211q\210 \204, \n =\204, \f\203) \304\306!\210\307 \210\202, \307 \210 )A\266\202\202 \207" [global-linum-mode-buffers linum-mode-set-explicitly linum-mode-major-mode major-mode linum-mode buffer-live-p -1 linum-on] 4])
(put 'global-linum-mode-enable-in-buffers 'definition-name 'global-linum-mode)
(defalias 'global-linum-mode-check-buffers #[0 "\301 \210\302\303\304\305\"\207" [global-linum-mode-buffers global-linum-mode-enable-in-buffers nil remove-hook post-command-hook global-linum-mode-check-buffers] 3])
(put 'global-linum-mode-check-buffers 'definition-name 'global-linum-mode)
(defalias 'global-linum-mode-cmhh #[0 "p\211\235\203\f \210\202 \211B\210\301\302\303\"\207" [global-linum-mode-buffers add-hook post-command-hook global-linum-mode-check-buffers] 3])
(put 'global-linum-mode-cmhh 'definition-name 'global-linum-mode)
(defalias 'linum-on #[0 "\300 ?\205 \301\302!\207" [minibufferp linum-mode 1] 2])
#@62 Delete all overlays displaying line numbers for this buffer.
(defalias 'linum-delete-overlays #[0 "\301\302\"\210\303\304p\303\305#\211\205\" \211@\306\307\310!A#\210A\266\202\202\f \207" [linum-overlays mapc delete-overlay nil get-buffer-window-list t set-window-margins 0 window-margins] 7 (#$ . 7759)])
#@45 Update line numbers for the current buffer.
(defalias 'linum-update-current #[0 "\300p!\207" [linum-update] 2 (#$ . 8076)])
#@69 Update line numbers for all windows displaying BUFFER.
(fn BUFFER)
(defalias 'linum-update #[257 "r\211q\210\205 \303\212\304\305\306\303\307#\"\210)\304\310\n\"\210\303\211)\207" [linum-mode linum-overlays linum-available nil mapc linum-update-window get-buffer-window-list visible delete-overlay] 7 (#$ . 8206)])
(defalias 'linum--face-width #[257 "\300\301!!\302\303H\262\211\304X\203 \305H\262\207" [font-info face-font nil 11 0 10] 5 "\n\n(fn FACE)"])
#@70 Update line numbers for the portion visible in window WIN.
(fn WIN)
(defalias 'linum-update-window #[257 "\304!b\210\305 \306\307\";\203 \202) \310=\205) \311\312ed\"!G\313\311!\314Q\262\315\316\317!\210m\204\306 `W\203\306 \203H \320\321\"\322\323#\202K !\3242\201 \325``\"\211\205~ \211@\326\327\330\"\"\203w \211 >\204m \211 B\331\n\"\332\324\307\"\210A\266\202\202S \2620G]\262\211\204\267 \n\204\226 \333``\"\202\237 \334\n\211A\242``#\211 B\335\336\320\337\340\341 D##\210\335\330#\266\266\307\342y\210)T\262\202. \343 \203\331 \344\345\346\347\323!#\350 \245!\262\351\352!A#\207" [linum-format linum-overlays linum-available inhibit-point-motion-hooks window-start line-number-at-pos window-end t dynamic number-to-string count-lines "%" "d" 0 run-hooks linum-before-numbering-hook propertize format face linum visited overlays-in equal-including-properties overlay-get linum-str delq throw make-overlay move-overlay overlay-put before-string " " display (margin left-margin) nil display-graphic-p ceiling * 1.0 linum--face-width frame-char-width set-window-margins window-margins] 16 (#$ . 8683)])
(defalias 'linum-after-change #[771 "U\204 dU\204 \301\302\"\303\304\305#)\266\203\205! \306 \207" [inhibit-changing-match-data "\n" buffer-substring-no-properties nil t string-match linum-update-current] 10 "\n\n(fn BEG END LEN)"])
(defalias 'linum-after-scroll #[514 "\300\301!!\207" [linum-update window-buffer] 5 "\n\n(fn WIN START)"])
(defalias 'linum-schedule #[0 "\300\301\302\303#\207" [run-with-idle-timer 0 nil linum-update-current] 4])
#@27 Unload the Linum library.
(defalias 'linum-unload-function #[0 "\300\301!\210\302\207" [global-linum-mode -1 nil] 2 (#$ . 10297)])
(provide 'linum)
Kontol Shell Bypass