From: Eli Zaretskii Date: Sat, 17 Jun 2023 09:27:03 +0000 (-0400) Subject: ; Auto-commit of loaddefs files. X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=30d5f1e62c0769a8d8ec41d0cd49e87b6ae45d40;p=emacs.git ; Auto-commit of loaddefs files. --- diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el index ddaa3f83fbb..898dcd55f58 100644 --- a/lisp/ldefs-boot.el +++ b/lisp/ldefs-boot.el @@ -2428,7 +2428,12 @@ narrowed. (fn &optional BUFFER)" t) (autoload 'browse-url-of-dired-file "browse-url" "\ -In Dired, ask a WWW browser to display the file named on this line." t) +In Dired, ask a WWW browser to display the file named on this line. +With prefix arg, use the secondary browser instead (e.g. EWW if +`browse-url-secondary-browser-function' is set to +`eww-browse-url'. + +(fn &optional SECONDARY)" t) (autoload 'browse-url-of-region "browse-url" "\ Use a web browser to display the current region. See `browse-url' for details. @@ -2918,6 +2923,11 @@ 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 @@ -4919,6 +4929,16 @@ The variable `native-comp-async-jobs-number' specifies the number of (commands) to run simultaneously. (fn FILES &optional RECURSIVELY LOAD SELECTOR)") +(autoload 'comp-function-type-spec "comp" "\ +Return the type specifier of FUNCTION. + +This function returns a cons cell whose car is the function +specifier, and cdr is a symbol, either `inferred' or `know'. +If the symbol is `inferred', the type specifier is automatically +inferred from the code itself by the native compiler; if it is +`know', the type specifier comes from `comp-known-type-specifiers'. + +(fn FUNCTION)") (register-definition-prefixes "comp" '("comp-" "make-comp-edge" "native-" "no-native-compile")) @@ -7274,7 +7294,7 @@ the context menu will contain an item that searches the word at mouse click. (fn MENU CLICK)") -(register-definition-prefixes "dictionary" '("dictionary-" "global-dictionary-tooltip-mode")) +(register-definition-prefixes "dictionary" '("dictionary-" "global-dictionary-tooltip-mode" "help-word")) ;;; Generated autoloads from cedet/srecode/dictionary.el @@ -9225,7 +9245,7 @@ Turn on EDT Emulation." t) ;;; Generated autoloads from progmodes/eglot.el -(push (purecopy '(eglot 1 14)) package--builtin-versions) +(push (purecopy '(eglot 1 15)) package--builtin-versions) (autoload 'eglot "eglot" "\ Start LSP server for PROJECT's buffers under MANAGED-MAJOR-MODES. @@ -9269,6 +9289,11 @@ INTERACTIVE is ignored and provided for backward compatibility. (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.") +(autoload 'eglot-upgrade-eglot "eglot" "\ +Update Eglot to latest version. + +(fn &rest _)" t) +(define-obsolete-function-alias 'eglot-update 'eglot-upgrade-eglot "29.1") (put 'eglot-workspace-configuration 'safe-local-variable 'listp) (put 'eglot--debbugs-or-github-bug-uri 'bug-reference-url-format t) (defun eglot--debbugs-or-github-bug-uri nil (format (if (string= (match-string 2) "github") "https://github.com/joaotavora/eglot/issues/%s" "https://debbugs.gnu.org/%s") (match-string 3))) @@ -9522,6 +9547,15 @@ 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 @@ -11327,7 +11361,7 @@ fourth arg NOSEP non-nil inhibits this. ;;; Generated autoloads from net/eww.el -(defvar eww-suggest-uris '(eww-links-at-point thing-at-point-url-at-point eww-current-url) "\ +(defvar eww-suggest-uris '(eww-links-at-point thing-at-point-url-at-point eww-current-url eww-bookmark-urls) "\ List of functions called to form the list of default URIs for `eww'. Each of the elements is a function returning either a string or a list of strings. The results will be joined into a single list with @@ -15114,6 +15148,15 @@ 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 @@ -16284,6 +16327,15 @@ 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 @@ -20684,15 +20736,17 @@ Uppercasify ARG chars starting from point. Point doesn't move. (fn ARG)" t) (autoload 'forward-to-word "misc" "\ -Move forward until encountering the beginning of a word. -With argument, do this that many times. +Move forward until encountering the beginning of the ARGth word. +ARG defaults to 1. When called interactively, ARG is the prefix +numeric argument. -(fn ARG)" t) +(fn &optional ARG)" t) (autoload 'backward-to-word "misc" "\ -Move backward until encountering the end of a word. -With argument, do this that many times. +Move backward until encountering the end of the ARGth word. +ARG defaults to 1. When called interactively, ARG is the prefix +numeric argument. -(fn ARG)" t) +(fn &optional ARG)" t) (autoload 'butterfly "misc" "\ Use butterflies to flip the desired bit on the drive platter. Open hands and let the delicate wings flap once. The disturbance @@ -22454,7 +22508,7 @@ Coloring: ;;; Generated autoloads from org/org.el -(push (purecopy '(org 9 6 4)) package--builtin-versions) +(push (purecopy '(org 9 6 6)) package--builtin-versions) (autoload 'org-babel-do-load-languages "org" "\ Load the languages defined in `org-babel-load-languages'. @@ -23463,15 +23517,21 @@ 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. +(autoload 'package-upgrade "package" "\ +Upgrade package NAME if a newer version exists. (fn NAME)" t) -(autoload 'package-update-all "package" "\ +(autoload 'package-upgrade-all "package" "\ Refresh package list and upgrade all packages. -If QUERY, ask the user before updating packages. When called +If QUERY, ask the user before upgrading packages. When called interactively, QUERY is always true. +Currently, packages which are part of the Emacs distribution are +not upgraded by this command. To enable upgrading such a package +using this command, first upgrade the package to a newer version +from ELPA by either using `\\[package-upgrade]' or +`\\\\[package-menu-mark-install]' after `\\[list-packages]'. + (fn &optional QUERY)" t) (autoload 'package-install-from-buffer "package" "\ Install a package from the current buffer. @@ -23556,10 +23616,10 @@ DESC must be a `package-desc' object. (autoload 'package-vc-install-selected-packages "package-vc" "\ Ensure packages specified in `package-vc-selected-packages' are installed." t) -(autoload 'package-vc-update-all "package-vc" "\ -Attempt to update all installed VC packages." t) -(autoload 'package-vc-update "package-vc" "\ -Attempt to update the package PKG-DESC. +(autoload 'package-vc-upgrade-all "package-vc" "\ +Attempt to upgrade all installed VC packages." t) +(autoload 'package-vc-upgrade "package-vc" "\ +Attempt to upgrade the package PKG-DESC. (fn PKG-DESC)" t) (autoload 'package-vc-install "package-vc" "\ @@ -23575,11 +23635,13 @@ indicating the package name and SPEC is a plist as described in symbol whose name is the package name, and the URL for the package will be taken from the package's metadata. -By default, this function installs the last version of the package -available from its repository, but if REV is given and non-nil, it -specifies the revision to install. If REV has the special value -`:last-release' (interactively, the prefix argument), that stands -for the last released version of the package. +By default, this function installs the last revision of the +package available from its repository. If REV is a string, it +describes the revision to install, as interpreted by the VC +backend. The special value `:last-release' (interactively, the +prefix argument), will use the commit of the latest release, if +it exists. The last release is the latest revision which changed +the \"Version:\" header of the package's main Lisp file. Optional argument BACKEND specifies the VC backend to use for cloning the package's repository; this is only possible if NAME-OR-URL is a URL, @@ -23616,7 +23678,7 @@ Rebuilding an installation means scraping for new autoload cookies, re-compiling Emacs Lisp files, building and installing any documentation, downloading any missing dependencies. This command does not fetch new revisions from a remote server. That -is the responsibility of `package-vc-update'. Interactively, +is the responsibility of `package-vc-upgrade'. Interactively, prompt for the name of the package to rebuild. (fn PKG-DESC)" t) @@ -23671,7 +23733,9 @@ The values returned are identical to those of `decode-time', but any unknown values other than DST are returned as nil, and an unknown DST value is returned as -1. -(fn STRING)") +See `decode-time' for the meaning of FORM. + +(fn STRING &optional FORM)") (register-definition-prefixes "parse-time" '("parse-")) @@ -24504,7 +24568,7 @@ Create a plstore instance associated with FILE. (fn FILE)") (autoload 'plstore-mode "plstore" "\ -Major mode for editing PLSTORE files. +Major mode for editing plstore files. (fn)" t) (register-definition-prefixes "plstore" '("plstore-")) @@ -25210,6 +25274,11 @@ See the doc string of `project-find-functions' for the general form of the project instance object. (fn &optional MAYBE-PROMPT DIRECTORY)") +(put 'project-vc-ignores 'safe-local-variable #'listp) +(put 'project-vc-merge-submodules 'safe-local-variable #'booleanp) +(put 'project-vc-include-untracked 'safe-local-variable #'booleanp) +(put 'project-vc-name 'safe-local-variable #'stringp) +(put 'project-vc-extra-root-markers 'safe-local-variable (lambda (val) (and (listp val) (not (memq nil (mapcar #'stringp val)))))) (defvar project-prefix-map (let ((map (make-sparse-keymap))) (define-key map "!" 'project-shell-command) (define-key map "&" 'project-async-shell-command) (define-key map "f" 'project-find-file) (define-key map "F" 'project-or-external-find-file) (define-key map "b" 'project-switch-to-buffer) (define-key map "s" 'project-shell) (define-key map "d" 'project-find-dir) (define-key map "D" 'project-dired) (define-key map "v" 'project-vc-dir) (define-key map "c" 'project-compile) (define-key map "e" 'project-eshell) (define-key map "k" 'project-kill-buffers) (define-key map "p" 'project-switch-project) (define-key map "g" 'project-find-regexp) (define-key map "G" 'project-or-external-find-regexp) (define-key map "r" 'project-query-replace-regexp) (define-key map "x" 'project-execute-extended-command) (define-key map "\2" 'project-list-buffers) map) "\ Keymap for project commands.") (define-key ctl-x-map "p" project-prefix-map) @@ -25359,6 +25428,7 @@ start with a space (which are for internal use). With prefix argument ARG, show only buffers that are visiting files. (fn &optional ARG)" t) +(put 'project-kill-buffers-display-buffer-list 'safe-local-variable #'booleanp) (autoload 'project-kill-buffers "project" "\ Kill the buffers belonging to the current project. Two buffers belong to the same project if their project @@ -26033,7 +26103,7 @@ ENCRYPTION, CERTFP, SERVER-ALIAS are interpreted as in `rcirc-server-alist'. STARTUP-CHANNELS is a list of channels that are joined after authentication. -(fn SERVER &optional PORT NICK USER-NAME FULL-NAME STARTUP-CHANNELS PASSWORD ENCRYPTION CERTFP SERVER-ALIAS)") +(fn SERVER &optional PORT NICK USER-NAME FULL-NAME STARTUP-CHANNELS PASSWORD ENCRYPTION SERVER-ALIAS CERTFP)") (defvar rcirc-track-minor-mode nil "\ Non-nil if Rcirc-Track minor mode is enabled. See the `rcirc-track-minor-mode' command @@ -26497,6 +26567,8 @@ This means the number of non-shy regexp grouping constructs (parenthesized expressions) in REGEXP. (fn REGEXP)") +(function-put 'regexp-opt-depth 'pure 't) +(function-put 'regexp-opt-depth 'side-effect-free 't) (register-definition-prefixes "regexp-opt" '("regexp-opt-")) @@ -27433,6 +27505,16 @@ 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 @@ -27481,6 +27563,7 @@ group. For extending the `rx' notation in FORM, use `rx-define' or `rx-let-eval'. (fn FORM &optional NO-GROUP)") +(function-put 'rx-to-string 'important-return-value 't) (autoload 'rx "rx" "\ Translate regular expressions REGEXPS in sexp form to a regexp string. Each argument is one of the forms below; RX is a subform, and RX... stands @@ -29240,7 +29323,7 @@ it is disabled. ;;; Generated autoloads from net/soap-client.el -(push (purecopy '(soap-client 3 2 1)) package--builtin-versions) +(push (purecopy '(soap-client 3 2 3)) package--builtin-versions) (register-definition-prefixes "soap-client" '("soap-")) @@ -30313,6 +30396,7 @@ single space character, and leading/trailing whitespace is removed. (fn STRING)") +(function-put 'string-clean-whitespace 'important-return-value 't) (autoload 'named-let "subr-x" "\ Looping construct taken from Scheme. Like `let', bind variables in BINDINGS and then evaluate BODY, @@ -30326,6 +30410,7 @@ as the new values of the bound variables in the recursive invocation. Return the width of STRING in pixels. (fn STRING)") +(function-put 'string-pixel-width 'important-return-value 't) (autoload 'string-glyph-split "subr-x" "\ Split STRING into a list of strings representing separate glyphs. This takes into account combining characters and grapheme clusters: @@ -30334,6 +30419,7 @@ on display into a single grapheme cluster is treated as a single indivisible unit. (fn STRING)") +(function-put 'string-glyph-split 'side-effect-free 't) (autoload 'add-display-text-property "subr-x" "\ Add display property PROP with VALUE to the text from START to END. If any text in the region has a non-nil `display' property, those @@ -30347,7 +30433,7 @@ this defaults to the current buffer. Query the user for a process and return the process object. (fn PROMPT)") -(register-definition-prefixes "subr-x" '("emacs-etc--hide-local-variables" "hash-table-" "internal--thread-argument" "replace-region-contents" "string-" "thread-" "with-buffer-unmodified-if-unchanged")) +(register-definition-prefixes "subr-x" '("emacs-etc--hide-local-variables" "eval-command-interactive-spec" "hash-table-" "internal--thread-argument" "replace-region-contents" "string-" "thread-" "with-buffer-unmodified-if-unchanged")) ;;; Generated autoloads from progmodes/subword.el @@ -31762,7 +31848,7 @@ Entering Texinfo mode calls the value of `text-mode-hook', and then the value of `texinfo-mode-hook'. (fn)" t) -(register-definition-prefixes "texinfo" '("texinfo-")) +(register-definition-prefixes "texinfo" '("fill-paragraph-separate" "texinfo-")) ;;; Generated autoloads from textmodes/texnfo-upd.el @@ -32906,8 +32992,9 @@ 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. Non-interactively, -signal an error when there's no recipe for LANG. +repository URL and the C/C++ compiler to use. The recipe built +by the prompts are saved for the current session if the +installation is successful and the grammar is loadable. 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 @@ -33993,6 +34080,8 @@ Usage: :custom-face Call `custom-set-faces' with each face definition. :ensure Loads the package using package.el if necessary. :pin Pin the package to an archive. +:vc Install the package directly from a version control system + (using `package-vc.el'). (fn NAME &rest ARGS)" nil t) (function-put 'use-package 'lisp-indent-function 'defun) @@ -34362,35 +34451,58 @@ Visit the next conflicted file in the current project." t) (autoload 'vc-create-tag "vc" "\ Descending recursively from DIR, make a tag called NAME. For each registered file, the working revision becomes part of -the named configuration. If the prefix argument BRANCHP is -given, the tag is made as a new branch and the files are -checked out in that new branch. +the configuration identified by the tag. +If BRANCHP is non-nil (interactively, the prefix argument), the +tag NAME is a new branch, and the files are checked out and +updated to reflect their revisions on that branch. +In interactive use, DIR is `default-directory' for repository-granular +VCSes (all the modern decentralized VCSes belong to this group), +otherwise the command will prompt for DIR. (fn DIR NAME BRANCHP)" t) (autoload 'vc-create-branch "vc" "\ -Descending recursively from DIR, make a branch called NAME. -After a new branch is made, the files are checked out in that new branch. -Uses `vc-create-tag' with the non-nil arg `branchp'. +Make a branch called NAME in directory DIR. +After making the new branch, check out the branch, i.e. update the +files in the tree to their revisions on the branch. + +Interactively, prompt for the NAME of the branch. + +With VCSes that maintain version information per file, this command also +prompts for the directory DIR whose files, recursively, will be tagged +with the NAME of new branch. For VCSes that maintain version +information for the entire repository (all the modern decentralized +VCSes belong to this group), DIR is always the `default-directory'. + +Finally, this command might prompt for the branch or tag from which to +start (\"fork\") the new branch, with completion candidates including +all the known branches and tags in the repository. + +This command invokes `vc-create-tag' with the non-nil BRANCHP argument. (fn DIR NAME)" t) (autoload 'vc-retrieve-tag "vc" "\ -For each file in or below DIR, retrieve their tagged version NAME. +For each file in or below DIR, retrieve their version identified by tag NAME. NAME can name a branch, in which case this command will switch to the named branch in the directory DIR. Interactively, prompt for DIR only for VCS that works at file level; -otherwise use the repository root of the current buffer. +otherwise use the root directory of the current buffer's VC tree. If NAME is empty, it refers to the latest revisions of the current branch. If locking is used for the files in DIR, then there must not be any locked files at or below DIR (but if NAME is empty, locked files are allowed and simply skipped). -If the prefix argument BRANCHP is given, switch the branch -and check out the files in that branch. +If BRANCHP is non-nil (interactively, the prefix argument), switch to the +branch and check out and update the files to their version on that branch. This function runs the hook `vc-retrieve-tag-hook' when finished. (fn DIR NAME &optional BRANCHP)" t) (autoload 'vc-switch-branch "vc" "\ Switch to the branch NAME in the directory DIR. -If NAME is empty, it refers to the latest revisions of the current branch. +If NAME is empty, it refers to the latest revision of the current branch. +Interactively, prompt for DIR only for VCS that works at file level; +otherwise use the root directory of the current buffer's VC tree. +Interactively, prompt for the NAME of the branch. +After switching to the branch, check out and update the files to their +version on that branch. Uses `vc-retrieve-tag' with the non-nil arg `branchp'. (fn DIR NAME)" t) @@ -34423,7 +34535,8 @@ with its diffs (if the underlying VCS backend supports that). (fn &optional LIMIT REVISION)" t) (autoload 'vc-print-branch-log "vc" "\ -Show the change log for BRANCH root in a window. +Show the change log for BRANCH in another window. +The command prompts for the branch whose change log to show. (fn BRANCH)" t) (autoload 'vc-log-incoming "vc" "\ @@ -34844,7 +34957,7 @@ Key bindings: ;;; Generated autoloads from progmodes/verilog-mode.el -(push (purecopy '(verilog-mode 2022 12 18 181110314)) package--builtin-versions) +(push (purecopy '(verilog-mode 2023 6 6 141322628)) package--builtin-versions) (autoload 'verilog-mode "verilog-mode" "\ Major mode for editing Verilog code. \\ @@ -37161,57 +37274,15 @@ 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 (provide 'loaddefs) ;; Local Variables: -;; no-byte-compile: t ;; version-control: never ;; no-update-autoloads: t +;; no-byte-compile: t ;; no-native-compile: t ;; coding: utf-8-emacs-unix ;; End: