;ELC
;;; Compiled
;;; in Emacs version 26.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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
#@30 List all timers in a buffer.
(defalias 'list-timers #[(&optional _ignore-auto _nonconfirm) "\306\307\310!!\210\311\312 \210\313 \210\314 \n\"\315\211 \203\231 \f@\316\317 \320H\203( \321\202) \322\323 \324H \325H \326HE! \316\327 \320H\203B
\202Q \323 \324H \325H \326HE!\323 Z\") \330H\211 \"\247\203g \316\327\"\331\245\"\202u \"\204p \332\202u \316\333\"\")\334\315 # $\335 \336H!*%c\210\337\340 \340 T\303 $\210\341c\210\fA\211\204 +eb\207" [inhibit-read-only timer-list timer-idle-list timer --dolist-tail-- time pop-to-buffer-same-window get-buffer-create "*timer-list*" t erase-buffer timer-list-mode append nil format "%4s %10s %8s %s" 7 "*" " " float-time 1 2 3 "%.2f" 4 60 "-" "%s" static cl-prin1-to-string 5 put-text-property line-beginning-position "\n" repeat cl-print-compiled-button cl-print-compiled] 11 (#$ . 408) nil])
(defvar timer-list-mode-map (byte-code "\301 \302\303\304#\210\302\305\306#\210\302\307\310#\210\311\312\313\314$\210)\207" [map make-sparse-keymap define-key "c" timer-list-cancel "n" next-line "p" previous-line easy-menu-do-define nil "" ("Timers" ["Cancel" timer-list-cancel t])] 5))
(defvar timer-list-mode-hook nil)
(byte-code "\300\301N\204\f \302\300\301\303#\210\304\305!\204 \302\305\306\307#\210\300\207" [timer-list-mode-hook variable-documentation put "Hook run after entering Timer-List mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp timer-list-mode-map definition-name timer-list-mode] 4)
(defvar timer-list-mode-map (make-sparse-keymap))
(byte-code "\301\302N\204 \303\301\302\304\305!#\210\306\307!\204 \303\307\310\311#\210\312\313 !\210\307\302N\204- \303\307\302\304\314!#\210\306\300!\204B \303\300\310\311#\210\315\316\300\317\"\210!\210\300\302N\204P \303\300\302\304\320!#\210\303\311\321\322#\207" [timer-list-mode-abbrev-table timer-list-mode-map variable-documentation put purecopy "Keymap for `timer-list-mode'." boundp timer-list-mode-syntax-table definition-name timer-list-mode (lambda (#1=#:def-tmp-var) (defvar timer-list-mode-syntax-table #1#)) make-syntax-table "Syntax table for `timer-list-mode'." (lambda (#1#) (defvar timer-list-mode-abbrev-table #1#)) define-abbrev-table nil "Abbrev table for `timer-list-mode'." derived-mode-parent special-mode] 5)
#@243 Mode for listing and controlling timers.
In addition to any hooks its parent mode `special-mode' might have run,
this mode runs the hook `timer-list-mode-hook', as the final or penultimate step
during initialization.
\{timer-list-mode-map}
(defalias 'timer-list-mode #[nil "\306\300!\210\307\310 \210\311\312\310\313N\203 \314\311\313\310\313N#\210\315 !\204' \316 \317 \"\210\320\f!\211 \2036
\321 =\203< \322\f\323 \"\210)\324%\325\"\204V %&=\204V \326%\325&C#\210\327 !\210\330\f!\210%&\331'\307(\332 \210\306\333!\210\334\307)\335\336\337\340\341\342%*)\343\344!\207" [delay-mode-hooks major-mode mode-name timer-list-mode-map timer-list-mode-syntax-table parent make-local-variable t special-mode timer-list-mode "Timer-List" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table left-to-right buffer-disable-undo revert-buffer-function list-timers format "%4s %10s %8s %s" "Idle" "Next" "Repeat" "Function" run-mode-hooks timer-list-mode-hook timer-list-mode-abbrev-table local-abbrev-table bidi-paragraph-direction truncate-lines buffer-read-only header-line-format] 7 (#$ . 2756) nil])
#@43 Cancel the timer on the line under point.
(defalias 'timer-list-cancel #[nil "\302\303 \301\"\304\211\204 \305\306!\210\307 !\210\303 \303\310!|*\207" [inhibit-read-only timer get-text-property line-beginning-position t error "No timer on the current line" cancel-timer 2] 4 (#$ . 4036) nil])
(provide 'timer-list)
|