| 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/linum.elc |
;ELC ;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:24 2024 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/linum.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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defconst linum-version "0.9x") #@31 Overlays used in this buffer. (defvar linum-overlays nil (#$ . 580)) #@31 Overlays available for reuse. (defvar linum-available nil (#$ . 655)) #@60 Functions run in each buffer before line numbering starts. (defvar linum-before-numbering-hook nil (#$ . 731)) (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 "\n\n(fn)"] "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 "\n\n(fn)"] "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 "\n\n(fn)"] "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 (#$ . 2199)) (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\242 \303 \203\225 \211\303 \232\203\242 \333\334\203\237 \335\202\240 \336\"\210\210\337 \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 message "Linum mode %sabled" "en" "dis" force-mode-line-update] 8 (#$ . 2371) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)]) (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 "\n\n(fn)"] "Non-nil if Global-Linum mode is enabled.\nSee the command `global-linum-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 `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=\203 ?\202 \304!\305V\211\203. \306\307\310\"\210\306\311\310\"\210\306\312\313\"\210\306\314\315\"\210\202B \316\307\310\"\210\316\311\310\"\210\316\312\313\"\210\316\314\315\"\210\317 \211\203h \211@r\211q\210\203X \320 \210\202` \203` \301\321!\210)A\266\202\202D \210\322\323\203s \324\202t \325\"\210\326\327!\203\231 \330\300!\210\302 \203\214 \211\302 \232\203\231 \331\332\203\226 \333\202\227 \334\"\210\210\335 \210\207" [global-linum-mode linum-mode current-message toggle prefix-numeric-value 0 add-hook after-change-major-mode-hook global-linum-mode-enable-in-buffers change-major-mode-after-body-hook 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" "en" "dis" force-mode-line-update] 7 (#$ . 4517) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)]) (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 global-linum-mode-buffers nil) (defalias 'global-linum-mode-enable-in-buffers #[0 "\211\2054 \211@\304!\203- r\211q\210 \n=\204, \203' \303\305!\210\306 \210\n\202, \306 \210\n)A\266\202\202 \207" [global-linum-mode-buffers linum-mode-major-mode major-mode linum-mode buffer-live-p -1 linum-on] 4 "\n\n(fn)"]) (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 "\n\n(fn)"]) (put 'global-linum-mode-check-buffers 'definition-name 'global-linum-mode) (defalias 'global-linum-mode-cmhh #[0 "\300\301p\"\210\302\303\304\"\207" [add-to-list global-linum-mode-buffers add-hook post-command-hook global-linum-mode-check-buffers] 3 "\n\n(fn)"]) (put 'global-linum-mode-cmhh 'definition-name 'global-linum-mode) (defalias 'linum-on #[0 "\300 ?\205 \301\302!\207" [minibufferp linum-mode 1] 2 "\n\n(fn)"]) #@68 Delete all overlays displaying line numbers for this buffer. (fn) (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 (#$ . 7113)]) #@51 Update line numbers for the current buffer. (fn) (defalias 'linum-update-current #[0 "\300p!\207" [linum-update] 2 (#$ . 7436)]) #@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 (#$ . 7572)]) #@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\241 `X\203\241 \203H \320\321\"\322\323#\202K !\324\325\326\315\327\330\331!\332\"\333\334%D\215G]\262\211\204\222 \204q \335``\"\202z \336 \211A@``#\211\nB\337\340\320\341\342\343 D##\210\337\344#\266\266\307\345y\210)T\262\202. \346\347!A#\207" [linum-format linum-available linum-overlays 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 funcall make-byte-code "\303``\"\211\205/ \211@\304\305\306\"\300\"\203( \211 >\204 \211 B\307\n\"\310\311\312\"\210A\266\202\202 \207" vconcat vector [linum-overlays linum-available overlays-in equal-including-properties overlay-get linum-str delq throw visited t] 6 "\n\n(fn)" make-overlay move-overlay overlay-put before-string " " display (margin left-margin) linum-str nil set-window-margins window-margins] 16 (#$ . 7901)]) (defalias 'linum-after-change #[771 "U\204 dU\204 \304\305\"\306\307\310\n #,\205\" \311 \207" [start string regexp inhibit-changing-match-data "\n" buffer-substring-no-properties nil t string-match linum-update-current] 7 "\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 "\n\n(fn)"]) #@33 Unload the Linum library. (fn) (defalias 'linum-unload-function #[0 "\300\301!\210\302\207" [global-linum-mode -1 nil] 2 (#$ . 9562)]) (provide 'linum)