From 5741583f54a756a4a2a89313c869a9cc78de1787 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Tue, 25 Apr 2023 10:08:34 -0400 Subject: [PATCH] ; Auto-commit of loaddefs files. --- lisp/ldefs-boot.el | 254 ++++++++++++++++++++++++++------------------- 1 file changed, 147 insertions(+), 107 deletions(-) diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el index acf8a1d2556..ddaa3f83fbb 100644 --- a/lisp/ldefs-boot.el +++ b/lisp/ldefs-boot.el @@ -2918,11 +2918,6 @@ and corresponding effects. (register-definition-prefixes "semantic/bovine/c" '("semantic")) - -;;; Generated autoloads from progmodes/c-ts-common.el - -(register-definition-prefixes "c-ts-common" '("c-ts-common-")) - ;;; Generated autoloads from progmodes/c-ts-mode.el @@ -2965,6 +2960,10 @@ To use tree-sitter C/C++ modes by default, evaluate in your configuration. +Since this mode uses a parser, unbalanced brackets might cause +some breakage in indentation/fontification. Therefore, it's +recommended to enable `electric-pair-mode' with this mode. + (fn)" t) (autoload 'c-or-c++-ts-mode "c-ts-mode" "\ Analyze buffer and enable either C or C++ mode. @@ -5129,8 +5128,6 @@ evaluate `compilation-shell-minor-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. -\\{compilation-shell-minor-mode-map} - (fn &optional ARG)" t) (autoload 'compilation-minor-mode "compile" "\ Toggle Compilation minor mode. @@ -5154,8 +5151,6 @@ evaluate `compilation-minor-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. -\\{compilation-minor-mode-map} - (fn &optional ARG)" t) (autoload 'compilation-next-error-function "compile" "\ Advance to the next error message and visit the file where the error was. @@ -8618,7 +8613,7 @@ A second call of this function without changing point inserts the next match. A call with prefix PREFIX reads the symbol to insert from the minibuffer with completion. -(fn PREFIX)" t) +(fn PREFIX)" '("P")) (autoload 'ebrowse-tags-loop-continue "ebrowse" "\ Repeat last operation on files in tree. FIRST-TIME non-nil means this is not a repetition, but the first time. @@ -9230,24 +9225,25 @@ Turn on EDT Emulation." t) ;;; Generated autoloads from progmodes/eglot.el -(push (purecopy '(eglot 1 13)) package--builtin-versions) +(push (purecopy '(eglot 1 14)) package--builtin-versions) (autoload 'eglot "eglot" "\ -Start LSP server in support of PROJECT's buffers under MANAGED-MAJOR-MODE. +Start LSP server for PROJECT's buffers under MANAGED-MAJOR-MODES. -This starts a Language Server Protocol (LSP) server suitable for the -buffers of PROJECT whose `major-mode' is MANAGED-MAJOR-MODE. -CLASS is the class of the LSP server to start and CONTACT specifies -how to connect to the server. +This starts a Language Server Protocol (LSP) server suitable for +the buffers of PROJECT whose `major-mode' is among +MANAGED-MAJOR-MODES. CLASS is the class of the LSP server to +start and CONTACT specifies how to connect to the server. -Interactively, the command attempts to guess MANAGED-MAJOR-MODE -from the current buffer's `major-mode', CLASS and CONTACT from -`eglot-server-programs' looked up by the major mode, and PROJECT from -`project-find-functions'. The search for active projects in this -context binds `eglot-lsp-context' (which see). +Interactively, the command attempts to guess MANAGED-MAJOR-MODES, +CLASS, CONTACT, and LANGUAGE-IDS from `eglot-server-programs', +according to the current buffer's `major-mode'. PROJECT is +guessed from `project-find-functions'. The search for active +projects in this context binds `eglot-lsp-context' (which see). -If it can't guess, it prompts the user for the mode and the server. -With a single \\[universal-argument] prefix arg, it always prompts for COMMAND. -With two \\[universal-argument], it also always prompts for MANAGED-MAJOR-MODE. +If it can't guess, it prompts the user for the mode and the +server. With a single \\[universal-argument] prefix arg, it +always prompts for COMMAND. With two \\[universal-argument], it +also always prompts for MANAGED-MAJOR-MODE. The LSP server of CLASS is started (or contacted) via CONTACT. If this operation is successful, current *and future* file @@ -9265,12 +9261,12 @@ CONTACT specifies how to contact the server. It is a keyword-value plist used to initialize CLASS or a plain list as described in `eglot-server-programs', which see. -LANGUAGE-ID is the language ID string to send to the server for -MANAGED-MAJOR-MODE, which matters to a minority of servers. +LANGUAGE-IDS is a list of language ID string to send to the +server for each element in MANAGED-MAJOR-MODES. INTERACTIVE is ignored and provided for backward compatibility. -(fn MANAGED-MAJOR-MODE PROJECT CLASS CONTACT LANGUAGE-ID &optional INTERACTIVE)" t) +(fn MANAGED-MAJOR-MODES PROJECT CLASS CONTACT LANGUAGE-IDS &optional INTERACTIVE)" t) (autoload 'eglot-ensure "eglot" "\ Start Eglot session for current buffer if there isn't one.") (put 'eglot-workspace-configuration 'safe-local-variable 'listp) @@ -9400,7 +9396,7 @@ Describe CTR if it is a class constructor. ;;; Generated autoloads from emacs-lisp/eldoc.el -(push (purecopy '(eldoc 1 13 0)) package--builtin-versions) +(push (purecopy '(eldoc 1 14 0)) package--builtin-versions) ;;; Generated autoloads from elec-pair.el @@ -9526,15 +9522,6 @@ optional prefix argument REINIT is non-nil. (fn &optional REINIT)" t) (register-definition-prefixes "elint" '("elint-")) - -;;; Generated autoloads from progmodes/elixir-ts-mode.el - -(autoload 'elixir-ts-mode "elixir-ts-mode" "\ -Major mode for editing Elixir, powered by tree-sitter. - -(fn)" t) -(register-definition-prefixes "elixir-ts-mode" '("elixir-ts-")) - ;;; Generated autoloads from emacs-lisp/elp.el @@ -9830,6 +9817,8 @@ FACTOR is the multiplication factor for the size. (fn &optional FACTOR)" t) (autoload 'emoji-zoom-decrease "emoji" "\ Decrease the size of the character under point." t) +(autoload 'emoji-zoom-reset "emoji" "\ +Reset the size of the character under point." t) (register-definition-prefixes "emoji" '("emoji-")) @@ -10207,9 +10196,10 @@ Look at CONFIG and try to expand GROUP. ;;; Generated autoloads from erc/erc.el -(push (purecopy '(erc 5 5)) package--builtin-versions) +(push (purecopy '(erc 5 6 -4)) package--builtin-versions) (autoload 'erc-select-read-args "erc" "\ -Prompt the user for values of nick, server, port, and password.") +Prompt the user for values of nick, server, port, and password. +With prefix arg, also prompt for user and full name.") (autoload 'erc "erc" "\ ERC is a powerful, modular, and extensible IRC client. This function is the main entry point for ERC. @@ -10235,7 +10225,7 @@ for the values of the other parameters. See `erc-tls' for the meaning of ID. -(fn &key (SERVER (erc-compute-server)) (PORT (erc-compute-port)) (NICK (erc-compute-nick)) (USER (erc-compute-user)) PASSWORD (FULL-NAME (erc-compute-full-name)) ID)" t) +(fn &key SERVER PORT NICK USER PASSWORD FULL-NAME ID)" '((erc-select-read-args))) (defalias 'erc-select #'erc) (autoload 'erc-tls "erc" "\ ERC is a powerful, modular, and extensible IRC client. @@ -10279,11 +10269,11 @@ Example usage: When present, ID should be a symbol or a string to use for naming the server buffer and identifying the connection unequivocally. -See Info node `(erc) Network Identifier' for details. Like USER -and CLIENT-CERTIFICATE, this parameter cannot be specified +See Info node `(erc) Network Identifier' for details. Like +CLIENT-CERTIFICATE, this parameter cannot be specified interactively. -(fn &key (SERVER (erc-compute-server)) (PORT (erc-compute-port \\='ircs-u)) (NICK (erc-compute-nick)) (USER (erc-compute-user)) PASSWORD (FULL-NAME (erc-compute-full-name)) CLIENT-CERTIFICATE ID)" t) +(fn &key SERVER PORT NICK USER PASSWORD FULL-NAME CLIENT-CERTIFICATE ID)" '((let ((erc-default-port erc-default-port-tls)) (erc-select-read-args)))) (autoload 'erc-handle-irc-url "erc" "\ Use ERC to IRC on HOST:PORT in CHANNEL. If ERC is already connected to HOST:PORT, simply /join CHANNEL. @@ -10363,7 +10353,7 @@ Customize `erc-url-connect-function' to override this. ;;; Generated autoloads from erc/erc-imenu.el -(register-definition-prefixes "erc-imenu" '("erc-unfill-notice")) +(register-definition-prefixes "erc-imenu" '("erc-")) ;;; Generated autoloads from erc/erc-join.el @@ -10512,9 +10502,7 @@ it has to be wrapped in `(eval (quote ...))'. If NAME is already defined as a test and Emacs is running in batch mode, an error is signaled. -(fn NAME () [DOCSTRING] [:expected-result RESULT-TYPE] [:tags \\='(TAG...)] BODY...)" nil t) -(function-put 'ert-deftest 'doc-string-elt 3) -(function-put 'ert-deftest 'lisp-indent-function 2) +(fn NAME () [DOCSTRING] [:expected-result RESULT-TYPE] [:tags \\='(TAG...)] BODY...)" nil 'macro) (autoload 'ert-run-tests-batch "ert" "\ Run the tests specified by SELECTOR, printing results to the terminal. @@ -10649,9 +10637,10 @@ information on Eshell, see Info node `(eshell)Top'. (fn &optional ARG)" t) (autoload 'eshell-command "eshell" "\ Execute the Eshell command string COMMAND. -With prefix ARG, insert output into the current buffer at point. +If TO-CURRENT-BUFFER is non-nil (interactively, with the prefix +argument), then insert output into the current buffer at point. -(fn &optional COMMAND ARG)" t) +(fn COMMAND &optional TO-CURRENT-BUFFER)" t) (autoload 'eshell-command-result "eshell" "\ Execute the given Eshell COMMAND, and return the result. The result might be any Lisp object. @@ -12352,7 +12341,7 @@ Variables of interest include: If non-nil, always attempt to create the other file if it was not found. - `ff-quiet-mode' - If non-nil, traces which directories are being searched. + If non-nil, does not trace which directories are being searched. - `ff-special-constructs' A list of regular expressions specifying how to recognize special @@ -12620,7 +12609,7 @@ lines. ;;; Generated autoloads from progmodes/flymake.el -(push (purecopy '(flymake 1 2 2)) package--builtin-versions) +(push (purecopy '(flymake 1 3 4)) package--builtin-versions) (autoload 'flymake-log "flymake" "\ Log, at level LEVEL, the message MSG formatted with ARGS. LEVEL is passed to `display-warning', which is used to display @@ -12719,8 +12708,6 @@ evaluate `flymake-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. -\\{flymake-mode-map} - (fn &optional ARG)" t) (autoload 'flymake-mode-on "flymake" "\ Turn Flymake mode on.") @@ -15127,15 +15114,6 @@ Prefix arg sets default accept amount temporarily. (fn &optional ARG)" t) (register-definition-prefixes "hashcash" '("hashcash-")) - -;;; Generated autoloads from progmodes/heex-ts-mode.el - -(autoload 'heex-ts-mode "heex-ts-mode" "\ -Major mode for editing HEEx, powered by tree-sitter. - -(fn)" t) -(register-definition-prefixes "heex-ts-mode" '("heex-ts-")) - ;;; Generated autoloads from help-at-pt.el @@ -16306,15 +16284,6 @@ values. (register-definition-prefixes "semantic/html" '("semantic-")) - -;;; Generated autoloads from textmodes/html-ts-mode.el - -(autoload 'html-ts-mode "html-ts-mode" "\ -Major mode for editing Html, powered by tree-sitter. - -(fn)" t) -(register-definition-prefixes "html-ts-mode" '("html-ts-mode-")) - ;;; Generated autoloads from htmlfontify.el @@ -16388,8 +16357,7 @@ inlined into the compiled format versions. This means that if you change its definition, you should explicitly call `ibuffer-recompile-formats'. -(fn SYMBOL (&key NAME INLINE PROPS SUMMARIZER) &rest BODY)" nil t) -(function-put 'define-ibuffer-column 'lisp-indent-function 'defun) +(fn SYMBOL (&key NAME INLINE PROPS SUMMARIZER) &rest BODY)" nil 'macro) (autoload 'define-ibuffer-sorter "ibuf-macs" "\ Define a method of sorting named NAME. DOCUMENTATION is the documentation of the function, which will be called @@ -16400,9 +16368,7 @@ For sorting, the forms in BODY will be evaluated with `a' bound to one buffer object, and `b' bound to another. BODY should return a non-nil value if and only if `a' is \"less than\" `b'. -(fn NAME DOCUMENTATION (&key DESCRIPTION) &rest BODY)" nil t) -(function-put 'define-ibuffer-sorter 'lisp-indent-function 1) -(function-put 'define-ibuffer-sorter 'doc-string-elt 2) +(fn NAME DOCUMENTATION (&key DESCRIPTION) &rest BODY)" nil 'macro) (autoload 'define-ibuffer-op "ibuf-macs" "\ Generate a function which operates on a buffer. OP becomes the name of the function; if it doesn't begin with @@ -16441,9 +16407,7 @@ BODY define the operation; they are forms to evaluate per each marked buffer. BODY is evaluated with `buf' bound to the buffer object. -(fn OP ARGS DOCUMENTATION (&key INTERACTIVE MARK MODIFIER-P DANGEROUS OPSTRING ACTIVE-OPSTRING BEFORE AFTER COMPLEX) &rest BODY)" nil t) -(function-put 'define-ibuffer-op 'lisp-indent-function 2) -(function-put 'define-ibuffer-op 'doc-string-elt 3) +(fn OP ARGS DOCUMENTATION (&key INTERACTIVE MARK MODIFIER-P DANGEROUS OPSTRING ACTIVE-OPSTRING BEFORE AFTER COMPLEX) &rest BODY)" nil 'macro) (autoload 'define-ibuffer-filter "ibuf-macs" "\ Define a filter named NAME. DOCUMENTATION is the documentation of the function. @@ -16458,9 +16422,7 @@ not a particular buffer should be displayed or not. The forms in BODY will be evaluated with BUF bound to the buffer object, and QUALIFIER bound to the current value of the filter. -(fn NAME DOCUMENTATION (&key READER DESCRIPTION) &rest BODY)" nil t) -(function-put 'define-ibuffer-filter 'lisp-indent-function 2) -(function-put 'define-ibuffer-filter 'doc-string-elt 2) +(fn NAME DOCUMENTATION (&key READER DESCRIPTION) &rest BODY)" nil 'macro) (register-definition-prefixes "ibuf-macs" '("ibuffer-")) @@ -17271,8 +17233,8 @@ Put image IMAGE in front of POS in the current buffer. IMAGE must be an image created with `create-image' or `defimage'. IMAGE is displayed by putting an overlay into the current buffer with a `before-string' STRING that has a `display' property whose value is the -image. STRING is defaulted if you omit it. -The overlay created will have the `put-image' property set to t. +image. STRING defaults to \"x\" if it's nil or omitted. +The overlay created by this function has the `put-image' property set to t. POS may be an integer or marker. AREA is where to display the image. AREA nil or omitted means display it in the text area, a value of `left-margin' means @@ -17406,14 +17368,31 @@ Cut a rectangle from the image under point, filling it with COLOR. COLOR defaults to the value of `image-cut-color'. Interactively, with prefix argument, prompt for COLOR to use. +This command presents the image with a rectangular area superimposed +on it, and allows moving and resizing the area to define which +part of it to cut. + +While moving/resizing the cutting area, the following key bindings +are available: + +`q': Exit without changing anything. +`RET': Crop/cut the image. +`m': Make mouse movements move the rectangle instead of altering the + rectangle shape. +`s': Same as `m', but make the rectangle into a square first. + +After cutting the image, you can save it by `M-x image-save' or +\\\\[image-save] when point is over the image. + (fn &optional COLOR)" t) (autoload 'image-crop "image-crop" "\ Crop the image under point. -If CUT is non-nil, remove a rectangle from the image instead of -cropping the image. In that case CUT should be the name of a -color to fill the rectangle. +This command presents the image with a rectangular area superimposed +on it, and allows moving and resizing the area to define which +part of it to crop. -While cropping the image, the following key bindings are available: +While moving/resizing the cropping area, the following key bindings +are available: `q': Exit without changing anything. `RET': Crop/cut the image. @@ -17421,9 +17400,13 @@ While cropping the image, the following key bindings are available: rectangle shape. `s': Same as `m', but make the rectangle into a square first. -After cropping an image, you can save it by `M-x image-save' or +After cropping the image, you can save it by `M-x image-save' or \\\\[image-save] when point is over the image. +When called from Lisp, if CUT is non-nil, remove a rectangle from +the image instead of cropping the image. In that case, CUT should +be the name of a color to fill the rectangle. + (fn &optional CUT)" t) (register-definition-prefixes "image-crop" '("image-c")) @@ -18534,6 +18517,11 @@ sequence inside of a word. Standard ispell choices are then available. +This command uses a word-list file specified +by `ispell-alternate-dictionary' or by `ispell-complete-word-dict'; +if none of those name an existing word-list file, this command +signals an error. + (fn &optional INTERIOR-FRAG)" t) (autoload 'ispell-complete-word-interior-frag "ispell" "\ Completes word matching character sequence inside a word." t) @@ -22466,7 +22454,7 @@ Coloring: ;;; Generated autoloads from org/org.el -(push (purecopy '(org 9 6 2)) package--builtin-versions) +(push (purecopy '(org 9 6 4)) package--builtin-versions) (autoload 'org-babel-do-load-languages "org" "\ Load the languages defined in `org-babel-load-languages'. @@ -23458,8 +23446,7 @@ If PACKAGE is a `package-desc' object, MIN-VERSION is ignored. (autoload 'package-install "package" "\ Install the package PKG. PKG can be a `package-desc' or a symbol naming one of the -available packages in an archive in `package-archives'. When -called interactively, prompt for the package name. +available packages in an archive in `package-archives'. Mark the installed package as selected by adding it to `package-selected-packages'. @@ -23471,6 +23458,10 @@ non-nil, install the package but do not add it to If PKG is a `package-desc' and it is already installed, don't try to install it but still mark it as selected. +If the command is invoked with a prefix argument, it will allow +upgrading of built-in packages, as if `package-install-upgrade-built-in' +had been enabled. + (fn PKG &optional DONT-SELECT)" t) (autoload 'package-update "package" "\ Update package NAME if a newer version exists. @@ -24433,6 +24424,11 @@ they are not by default assigned to keys." t) (defalias 'edit-picture 'picture-mode) (register-definition-prefixes "picture" '("picture-")) + +;;; Generated autoloads from language/pinyin.el + +(register-definition-prefixes "pinyin" '("pinyin-character-map")) + ;;; Generated autoloads from textmodes/pixel-fill.el @@ -26280,8 +26276,6 @@ evaluate `rectangle-mark-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. -\\{rectangle-mark-mode-map} - (fn &optional ARG)" t) (register-definition-prefixes "rect" '("apply-on-rectangle" "clear-rectangle-line" "delete-" "extract-rectangle-" "killed-rectangle" "ope" "rectangle-" "spaces-string" "string-rectangle-")) @@ -27439,16 +27433,6 @@ Major mode for editing Ruby code. (dolist (name (list "ruby" "rbx" "jruby" "ruby1.9" "ruby1.8")) (add-to-list 'interpreter-mode-alist (cons (purecopy name) 'ruby-mode))) (register-definition-prefixes "ruby-mode" '("ruby-")) - -;;; Generated autoloads from progmodes/ruby-ts-mode.el - -(push (purecopy '(ruby-ts-mode 0 2)) package--builtin-versions) -(autoload 'ruby-ts-mode "ruby-ts-mode" "\ -Major mode for editing Ruby, powered by tree-sitter. - -(fn)" t) -(register-definition-prefixes "ruby-ts-mode" '("ruby-ts-")) - ;;; Generated autoloads from ruler-mode.el @@ -32922,7 +32906,8 @@ Build and install the tree-sitter language grammar library for LANG. Interactively, if `treesit-language-source-alist' doesn't already have data for building the grammar for LANG, prompt for its -repository URL and the C/C++ compiler to use. +repository URL and the C/C++ compiler to use. Non-interactively, +signal an error when there's no recipe for LANG. This command requires Git, a C compiler and (sometimes) a C++ compiler, and the linker to be installed and on PATH. It also requires that the @@ -32931,7 +32916,12 @@ recipe for LANG exists in `treesit-language-source-alist'. See `exec-path' for the current path where Emacs looks for executable programs, such as the C/C++ compiler and linker. -(fn LANG)" t) +Interactively, prompt for the directory in which to install the +compiled grammar files. Non-interactively, use OUT-DIR; if it's +nil, the grammar is installed to the standard location, the +\"tree-sitter\" directory under `user-emacs-directory'. + +(fn LANG &optional OUT-DIR)" t) (register-definition-prefixes "treesit" '("treesit-")) @@ -33157,7 +33147,15 @@ Major mode for editing TypeScript. (fn)" t) (autoload 'tsx-ts-mode "typescript-ts-mode" "\ -Major mode for editing TypeScript. +Major mode for editing TSX and JSX documents. + +This major mode defines two additional JSX-specific faces: +`typescript-ts-jsx-attribute-face' and +`typescript-ts-jsx-attribute-face' that are used for HTML tags +and attributes, respectively. + +The JSX-specific faces are used when `treesit-font-lock-level' is +at least 3 (which is the default value). (fn)" t) (register-definition-prefixes "typescript-ts-mode" '("typescript-ts-mode-")) @@ -37163,6 +37161,48 @@ run a specific program. The program must be a member of (fn &optional PGM)" t) (register-definition-prefixes "zone" '("zone-")) + + +;;; Generated autoloads from progmodes/ruby-ts-mode.el + +(push (purecopy '(ruby-ts-mode 0 2)) package--builtin-versions) +(autoload 'ruby-ts-mode "ruby-ts-mode" "\ +Major mode for editing Ruby, powered by tree-sitter. + +(fn)" t) +(register-definition-prefixes "ruby-ts-mode" '("ruby-ts-")) + + +;;; Generated autoloads from textmodes/html-ts-mode.el + +(autoload 'html-ts-mode "html-ts-mode" "\ +Major mode for editing Html, powered by tree-sitter. + +(fn)" t) +(register-definition-prefixes "html-ts-mode" '("html-ts-mode-")) + + +;;; Generated autoloads from progmodes/c-ts-common.el + +(register-definition-prefixes "c-ts-common" '("c-ts-common-")) + + +;;; Generated autoloads from progmodes/elixir-ts-mode.el + +(autoload 'elixir-ts-mode "elixir-ts-mode" "\ +Major mode for editing Elixir, powered by tree-sitter. + +(fn)" t) +(register-definition-prefixes "elixir-ts-mode" '("elixir-ts-")) + + +;;; Generated autoloads from progmodes/heex-ts-mode.el + +(autoload 'heex-ts-mode "heex-ts-mode" "\ +Major mode for editing HEEx, powered by tree-sitter. + +(fn)" t) +(register-definition-prefixes "heex-ts-mode" '("heex-ts-")) ;;; End of scraped data -- 2.39.2