From: Eshel Yaron Date: Sun, 5 Jan 2025 11:49:17 +0000 (+0100) Subject: ; Update lisp/ldef-boot.el X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cf1c101db22f8ebc13466c49e4202ad71955c736;p=emacs.git ; Update lisp/ldef-boot.el --- diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el index 5d01c8b33d3..c211884eb53 100644 --- a/lisp/ldefs-boot.el +++ b/lisp/ldefs-boot.el @@ -1041,33 +1041,6 @@ The *Apropos* window will be selected if `help-window-select' is non-nil. (fn PATTERN &optional DO-ALL)" t) -(autoload 'apropos-library "apropos" "\ -List the variables and functions defined by library FILE. -FILE should be one of the libraries currently loaded and should -thus be found in `load-history'. If `apropos-do-all' is non-nil, -the output includes key-bindings of commands. - -(fn FILE)" t) -(autoload 'apropos-value "apropos" "\ -Show all symbols whose value's printed representation matches PATTERN. -PATTERN can be a word, a list of words (separated by spaces), -or a regexp (using some regexp special characters). If it is a word, -search for matches for that word as a substring. If it is a list of words, -search for matches for any two (or more) of those words. - -With \\[universal-argument] prefix, or if `apropos-do-all' is non-nil, also looks -at function definitions (arguments, documentation and body) and at the -names and values of properties. - -Returns list of symbols and values found. - -(fn PATTERN &optional DO-ALL)" t) -(autoload 'apropos-local-value "apropos" "\ -Show buffer-local variables whose values match PATTERN. -This is like `apropos-value', but only for buffer-local variables. -Optional arg BUFFER (default: current buffer) is the buffer to check. - -(fn PATTERN &optional BUFFER)" t) (autoload 'apropos-documentation "apropos" "\ Show symbols whose documentation contains matches for PATTERN. PATTERN can be a word, a list of words (separated by spaces), @@ -2643,7 +2616,13 @@ Optional prefix argument ARG non-nil inverts the value of the option (fn &optional ARG)" t) (autoload 'browse-url-with-browser-kind "browse-url" "\ Browse URL with a browser of the given browser KIND. -KIND is either `internal' or `external'. + +KIND is either `internal' or `external'. In order to find an +appropriate browser for the given KIND, first consult the `browse-url-handlers' +and `browse-url-default-handlers' lists. If no handler is found, try the +functions `browse-url-browser-function', +`browse-url-secondary-browser-function', `browse-url-default-browser' +and `eww', in that order. When called interactively, the default browser kind is the opposite of the browser kind of `browse-url-browser-function'. @@ -2724,6 +2703,12 @@ If `browse-url-android-share' is non-nil, try to share URL using an external program instead. Default to the URL around or before point. +(fn URL &optional NEW-WINDOW)" t) +(autoload 'browse-url-default-gtk-browser "browse-url" "\ +Browse URL with GTK's idea of the default browser. +If the selected frame isn't a GTK frame, fall back to +`browse-url-default-browser'. + (fn URL &optional NEW-WINDOW)" t) (autoload 'browse-url-emacs "browse-url" "\ Ask Emacs to load URL into a buffer and show it in another window. @@ -2731,41 +2716,6 @@ Optional argument SAME-WINDOW non-nil means show the URL in the currently selected window instead. (fn URL &optional SAME-WINDOW)" t) -(autoload 'browse-url-gnome-moz "browse-url" "\ -Ask Mozilla to load URL via the GNOME program `gnome-moz-remote'. -Default to the URL around or before point. The strings in variable -`browse-url-gnome-moz-arguments' are also passed. - -When called interactively, if variable `browse-url-new-window-flag' is -non-nil, load the document in a new browser window, otherwise use an -existing one. A non-nil interactive prefix argument reverses the -effect of `browse-url-new-window-flag'. - -When called non-interactively, optional second argument NEW-WINDOW is -used instead of `browse-url-new-window-flag'. - -(fn URL &optional NEW-WINDOW)" t) -(make-obsolete 'browse-url-gnome-moz 'nil "25.1") -(autoload 'browse-url-conkeror "browse-url" "\ -Ask the Conkeror WWW browser to load URL. -Default to the URL around or before point. Also pass the strings -in the variable `browse-url-conkeror-arguments' to Conkeror. - -When called interactively, if variable -`browse-url-new-window-flag' is non-nil, load the document in a -new Conkeror window, otherwise use a random existing one. A -non-nil interactive prefix argument reverses the effect of -`browse-url-new-window-flag'. - -If variable `browse-url-conkeror-new-window-is-buffer' is -non-nil, then whenever a document would otherwise be loaded in a -new window, load it in a new buffer in an existing window instead. - -When called non-interactively, use optional second argument -NEW-WINDOW instead of `browse-url-new-window-flag'. - -(fn URL &optional NEW-WINDOW)" t) -(make-obsolete 'browse-url-conkeror 'nil "28.1") (autoload 'browse-url-w3 "browse-url" "\ Ask the w3 WWW browser to load URL. Default to the URL around or before point. @@ -2779,13 +2729,6 @@ used instead of `browse-url-new-window-flag'. (fn URL &optional NEW-WINDOW)" t) (make-obsolete 'browse-url-w3 'nil "29.1") -(autoload 'browse-url-w3-gnudoit "browse-url" "\ -Ask another Emacs running emacsclient to load the URL using the W3 browser. -The `browse-url-gnudoit-program' program is used with options given by -`browse-url-gnudoit-args'. Default to the URL around or before point. - -(fn URL &optional NEW-WINDOW)" t) -(make-obsolete 'browse-url-w3-gnudoit 'nil "25.1") (autoload 'browse-url-text-xterm "browse-url" "\ Ask a text browser to load URL. URL defaults to the URL around or before point. @@ -4876,6 +4819,25 @@ displayed. If FRAME is omitted or nil, use the selected frame. If FRAME cannot display COLOR, return nil. (fn COLOR &optional FRAME)") +(autoload 'color-rgb-to-hex "color" "\ +Return hexadecimal #RGB notation for the color specified by RED GREEN BLUE. +RED, GREEN, and BLUE should be numbers between 0.0 and 1.0, inclusive. +Optional argument DIGITS-PER-COMPONENT can be either 4 (the default) +or 2; use the latter if you need a 24-bit specification of a color. + +(fn RED GREEN BLUE &optional DIGITS-PER-COMPONENT)") +(autoload 'color-blend "color" "\ +Blend the two colors A and B in linear space with ALPHA. +A and B should be lists (RED GREEN BLUE), where each element is +between 0.0 and 1.0, inclusive. ALPHA controls the influence A +has on the result and should be between 0.0 and 1.0, inclusive. + +For instance: + + (color-blend \\='(1 0.5 1) \\='(0 0 0) 0.75) + => (0.75 0.375 0.75) + +(fn A B &optional ALPHA)") (register-definition-prefixes "color" '("color-")) @@ -5016,7 +4978,7 @@ the compilation was successful return the compiled function. Native compile if necessary all the .el files present in DIRECTORY. Each .el file is native-compiled if the corresponding .eln file is not found in any directory mentioned in `native-comp-eln-load-path'. -The search within DIRECTORY is perfomed recursively. +The search within DIRECTORY is performed recursively. (fn DIRECTORY)") (autoload 'batch-native-compile "comp" "\ @@ -5038,6 +5000,8 @@ Force the produced .eln to be outputted in the eln system directory (the last entry in `native-comp-eln-load-path') unless `native-compile-target-directory' is non-nil. If the environment variable \"NATIVE_DISABLED\" is set, only byte compile.") +(autoload 'native-compile-prune-cache "comp" "\ +Remove .eln files that aren't applicable to the current Emacs invocation." t) (register-definition-prefixes "comp" '("comp-" "native-comp" "no-native-compile")) @@ -7721,16 +7685,20 @@ redefine OBJECT if it is a symbol. Return a new, empty display table.") (autoload 'display-table-slot "disp-table" "\ Return the value of the extra slot in DISPLAY-TABLE named SLOT. -SLOT may be a number from 0 to 5 inclusive, or a slot name (symbol). +SLOT may be a number from 0 to 11 inclusive, or a slot name (symbol). Valid symbols are `truncation', `wrap', `escape', `control', -`selective-display', and `vertical-border'. +`selective-display', `vertical-border', `box-vertical', +`box-horizontal', `box-down-right', `box-down-left', `box-up-right', +and `box-up-left'. (fn DISPLAY-TABLE SLOT)") (autoload 'set-display-table-slot "disp-table" "\ Set the value of the extra slot in DISPLAY-TABLE named SLOT to VALUE. -SLOT may be a number from 0 to 5 inclusive, or a name (symbol). +SLOT may be a number from 0 to 11 inclusive, or a name (symbol). Valid symbols are `truncation', `wrap', `escape', `control', -`selective-display', and `vertical-border'. +`selective-display', `vertical-border', `box-vertical', +`box-horizontal', `box-down-right', `box-down-left', `box-up-right', +and `box-up-left'. (fn DISPLAY-TABLE SLOT VALUE)") (autoload 'describe-display-table "disp-table" "\ @@ -7739,6 +7707,11 @@ Describe the display table DT in a help buffer. (fn DT)") (autoload 'describe-current-display-table "disp-table" "\ Describe the display table in use in the selected window and buffer." t) +(autoload 'standard-display-unicode-special-glyphs "disp-table" "\ +Display some glyps using Unicode characters. +The glyphs being changed by this function are `vertical-border', +`box-vertical', `box-horizontal', `box-down-right', `box-down-left', +`box-up-right', and `box-up-left'." t) (autoload 'standard-display-8bit "disp-table" "\ Display characters representing raw bytes in the range L to H literally. @@ -10009,7 +9982,9 @@ The buffer is expected to contain a mail message." t) (function-put 'epa-mail-decrypt 'interactive-only 't) (autoload 'epa-mail-verify "epa-mail" "\ Verify OpenPGP cleartext signed messages in the current buffer. -The buffer is expected to contain a mail message." t) +The buffer is expected to contain a mail message. + +If the verification fails, signal an error." t) (function-put 'epa-mail-verify 'interactive-only 't) (autoload 'epa-mail-sign "epa-mail" "\ Sign the current buffer. @@ -11842,68 +11817,6 @@ reminders, you can set `feedmail-queue-reminder-alist' to nil. (fn &optional WHAT-EVENT)" t) (register-definition-prefixes "feedmail" '("feedmail-")) - -;;; Generated autoloads from ffap.el - -(defvar ffap-file-finder #'find-file "\ -The command called by `find-file-at-point' to find a file.") -(custom-autoload 'ffap-file-finder "ffap" t) -(autoload 'ffap-next "ffap" "\ -Search buffer for next file or URL, and run ffap. -Optional argument BACK says to search backwards. -Optional argument WRAP says to try wrapping around if necessary. -Interactively: use a single prefix \\[universal-argument] to search backwards, -double prefix to wrap forward, triple to wrap backwards. -Actual search is done by the function `ffap-next-guess'. - -(fn &optional BACK WRAP)" t) -(autoload 'ffap-machine-at-point "ffap" "\ -Return machine name at point if it exists, or nil.") -(autoload 'ffap-url-at-point "ffap" "\ -Return URL from around point if it exists, or nil. - -Sets the variable `ffap-string-at-point-region' to the bounds of URL, if any.") -(autoload 'find-file-at-point "ffap" "\ -Find FILENAME, guessing a default from text around point. -If `ffap-url-regexp' is not nil, the FILENAME may also be an URL. -With a prefix, this command behaves exactly like `ffap-file-finder'. -If `ffap-require-prefix' is set, the prefix meaning is reversed. -See also the variables `ffap-dired-wildcards', -`ffap-url-unwrap-local', `ffap-url-unwrap-remote', -`ffap-file-name-with-spaces', and the functions `ffap-file-at-point' -and `ffap-url-at-point'. - -(fn &optional FILENAME)" t) -(defalias 'ffap 'find-file-at-point) -(autoload 'ffap-menu "ffap" "\ -Put up a menu of files and URLs mentioned in this buffer. -Then set mark, jump to choice, and try to fetch it. The menu is -cached in `ffap-menu-alist', and rebuilt by `ffap-menu-rescan'. -The optional RESCAN argument (a prefix, interactively) forces -a rebuild. Searches with `ffap-menu-regexp'. - -(fn &optional RESCAN)" t) -(autoload 'ffap-at-mouse "ffap" "\ -Find file or URL guessed from text around mouse click. -Interactively, calls `ffap-at-mouse-fallback' if no guess is found. -Return value: - * if a guess string is found, return it (after finding it) - * if the fallback is called, return whatever it returns - * otherwise, nil - -(fn E)" t) -(autoload 'dired-at-point "ffap" "\ -Start Dired, defaulting to file at point. See `ffap'. -If `dired-at-point-require-prefix' is set, the prefix meaning is reversed. - -(fn &optional FILENAME)" t) -(autoload 'ffap-guess-file-name-at-point "ffap" "\ -Try to get a file name at point. -This hook is intended to be put in `file-name-at-point-functions'.") -(autoload 'ffap-bindings "ffap" "\ -Evaluate the forms in variable `ffap-bindings'." t) -(register-definition-prefixes "ffap" '("dired-at-point-" "ffap-" "find-file-literally-at-point")) - ;;; Generated autoloads from fileloop.el @@ -11961,9 +11874,14 @@ This command deletes all existing settings of VARIABLE (except `mode' and `eval') and adds a new file-local VARIABLE with VALUE to the Local Variables list. -If there is no Local Variables list in the current file buffer -then this function adds the first line containing the string -`Local Variables:' and the last line containing the string `End:'. +If there is no Local Variables list in the current file buffer, +then this function adds it at the end of the file, with the first +line containing the string `Local Variables:' and the last line +containing the string `End:'. + +For adding local variables on the first line of a file, for example +for settings like `lexical-binding, which must be specified there, +use the `add-file-local-variable-prop-line' command instead. (fn VARIABLE VALUE &optional INTERACTIVE)" t) (autoload 'delete-file-local-variable "files-x" "\ @@ -11975,11 +11893,14 @@ Add file-local VARIABLE with its VALUE to the -*- line. This command deletes all existing settings of VARIABLE (except `mode' and `eval') and adds a new file-local VARIABLE with VALUE to -the -*- line. +the -*- line at the beginning of the file. If there is no -*- line at the beginning of the current file buffer then this function adds it. +To add variables to the Local Variables list at the end of the file, +use the `add-file-local-variable' command instead. + (fn VARIABLE VALUE &optional INTERACTIVE)" t) (autoload 'delete-file-local-variable-prop-line "files-x" "\ Delete all settings of file-local VARIABLE from the -*- line. @@ -15028,20 +14949,20 @@ If the `kbd-help' text or overlay property at point produces a string, return it. Otherwise, use the `help-echo' property. If this produces no string either, return nil.") (autoload 'display-local-help "help-at-pt" "\ -Display local help in the echo area. -This command, by default, displays a short help message, namely -the string produced by the `kbd-help' property at point. If -`kbd-help' does not produce a string, but the `help-echo' -property does, then that string is printed instead. +Display in the echo area `kbd-help' or `help-echo' text at point. +This command displays the help message which is the string produced +by the `kbd-help' property at point. If `kbd-help' at point does not +produce a string, but the `help-echo' property does, then that string +is displayed instead. The string is passed through `substitute-command-keys' before it is displayed. -If INHIBIT-WARNING is non-nil, this prevents display of a message -in case there is no help. +If INHIBIT-WARNING is non-nil, do not display a warning message when +there is no help property at point. If DESCRIBE-BUTTON in non-nil (interactively, the prefix arg), and -there's a button/widget at point, pop a buffer describing that +there's a button/widget at point, pop up a buffer describing that button/widget instead. (fn &optional INHIBIT-WARNING DESCRIBE-BUTTON)" t) @@ -15142,6 +15063,10 @@ See the `help-enable-symbol-autoload' variable for special handling of autoloaded functions. (fn FUNCTION)" t) +(autoload 'describe-functions "help-fns" "\ +Display the full documentation of FUNCTIONS (a list of symbols). + +(fn &rest FUNCTIONS)" t) (autoload 'describe-command "help-fns" "\ Display the full documentation of COMMAND (a symbol). When called from Lisp, COMMAND may also be a function object. @@ -17977,6 +17902,11 @@ See Info node `(elisp)Defining Functions' for more details. (register-definition-prefixes "quail/ipa" '("ipa-x-sampa-")) + +;;; Generated autoloads from leim/quail/iroquoian.el + +(register-definition-prefixes "quail/iroquoian" '("iroquoian-")) + ;;; Generated autoloads from international/isearch-x.el @@ -21110,15 +21040,18 @@ values: used to decode and encode the data which the process reads and writes. See `make-network-process' for details. -:return-list specifies this function's return value. - If omitted or nil, return a process object. A non-nil means to - return (PROC . PROPS), where PROC is a process object and PROPS - is a plist of connection properties, with these keywords: +:return-list controls the form of the function's return value. + If omitted or nil, return a process object. Anything else means to + return (PROC . PROPS), where PROC is a process object, and PROPS is a + plist of connection properties, which may include the following + keywords: :greeting -- the greeting returned by HOST (a string), or nil. :capabilities -- a string representing HOST's capabilities, or nil if none could be found. :type -- the resulting connection type; `plain' (unencrypted) or `tls' (TLS-encrypted). + :error -- A string describing any error when attempting + to negotiate STARTTLS. :end-of-command specifies a regexp matching the end of a command. @@ -21157,8 +21090,9 @@ writes. See `make-network-process' for details. :use-starttls-if-possible is a boolean that says to do opportunistic STARTTLS upgrades even if Emacs doesn't have built-in TLS functionality. -:warn-unless-encrypted is a boolean which, if :return-list is -non-nil, is used warn the user if the connection isn't encrypted. +:warn-unless-encrypted, if non-nil, warn the user if the connection +isn't encrypted (i.e. STARTTLS failed). Additionally, setting +:return-list non-nil allows capturing any error response. :nogreeting is a boolean that can be used to inhibit waiting for a greeting from the server. @@ -23018,8 +22952,9 @@ directory. (autoload 'package-install-selected-packages "package" "\ Ensure packages in `package-selected-packages' are installed. If some packages are not installed, propose to install them. -If optional argument NOCONFIRM is non-nil, don't ask for -confirmation to install packages. + +If optional argument NOCONFIRM is non-nil, or when invoked with a prefix +argument, don't ask for confirmation to install packages. (fn &optional NOCONFIRM)" t) (autoload 'package-reinstall "package" "\ @@ -23043,7 +22978,12 @@ Remove packages that are no longer needed. Packages that are no more needed by other packages in `package-selected-packages' and their dependencies -will be deleted." t) +will be deleted. + +If optional argument NOCONFIRM is non-nil, or when invoked with a prefix +argument, don't ask for confirmation to install packages. + +(fn &optional NOCONFIRM)" t) (autoload 'describe-package "package" "\ Display the full documentation of PACKAGE (a symbol). @@ -24897,6 +24837,11 @@ If you exit the `query-replace', you can later continue the (autoload 'project-compile "project" "\ Run `compile' in the project root." t) (function-put 'project-compile 'interactive-only 'compile) +(autoload 'project-recompile "project" "\ +Run `recompile' in the project root with an appropriate buffer. + +(fn &optional EDIT-COMMAND)" t) +(function-put 'project-recompile 'interactive-only 'recompile) (autoload 'project-switch-to-buffer "project" "\ Display buffer BUFFER-OR-NAME in the selected window. When called interactively, prompts for a buffer belonging to the @@ -27606,7 +27551,8 @@ of `variable', `function', `block' `defun' and `defvar'; POS is the position of SYM in STREAM; LEN is SYM's length; and BINDER is the position in which SYM is bound. If SYM is itself a binding occurrence, then POS and BINDER are equal. If SYM is not lexically bound, then -BINDER is nil. +BINDER is nil. This function ignores `read-symbol-shorthands', so SYM +and LEN always correspond to the symbol as it appears in STREAM. If STREAM is nil, it defaults to the current buffer. @@ -27731,14 +27677,22 @@ Go to and pulse region starting at BEG and ending at END. (fn BEG END)" t) (autoload 'search-from-isearch "search" "\ - +Pivot to `search' between BEG and END from `isearch'. (fn BEG END)" t) (autoload 'search-lines "search" "\ Go to and pulse line starting at BEG and ending at END. (fn BEG END)" t) -(register-definition-prefixes "search" '("search-read-target")) +(autoload 'search-property "search" "\ +`search' for region from BEG to END with a given text property. + +(fn BEG END)" t) +(autoload 'search-button "search" "\ +`search' for button from BEG to END. + +(fn BEG END)" t) +(register-definition-prefixes "search" '("search-")) ;;; Generated autoloads from net/secrets.el @@ -27844,7 +27798,7 @@ in the cited portion of the message. If this hook is entirely empty (nil), a default action is taken instead of no action.") (custom-autoload 'mail-citation-hook "sendmail" t) -(defvar mail-citation-prefix-regexp (purecopy "\\([ \11]*\\(\\w\\|[_.]\\)+>+\\|[ \11]*[>|]\\)+") "\ +(defvar mail-citation-prefix-regexp (purecopy "\\([ \11]*\\([[:word:]]\\|[_.]\\)+>+\\|[ \11]*[>|]\\)+") "\ Regular expression to match a citation prefix plus whitespace. It should match whatever sort of citation prefixes you want to handle, with whitespace before and after; it should also match just whitespace. @@ -31194,13 +31148,14 @@ for example, would tell \\[tex-print] with a prefix argument to ask you which printer to use.") (custom-autoload 'tex-alt-dvi-print-command "tex-mode" t) -(defvar tex-dvi-view-command `(cond ((eq window-system 'x) ,(purecopy "xdvi")) ((eq window-system 'w32) ,(purecopy "yap")) (t ,(purecopy "dvi2tty * | cat -s"))) "\ +(defvar tex-dvi-view-command (cond ((eq window-system 'x) (purecopy "xdvi")) ((eq window-system 'w32) (purecopy "yap")) (t (purecopy "dvi2tty * | cat -s"))) "\ Command used by \\[tex-view] to display a `.dvi' file. -If it is a string, that specifies the command directly. If this string contains an asterisk (`*'), that is replaced by the file name; otherwise, the file name, preceded by a space, is added at the end. -If the value is a form, it is evaluated to get the command to use.") +For backwards-compatibility, the value can also be a form, in which case +it is evaluated to get the command to use. This is now obsolete, and +will lead to a warning. Set it to a string instead.") (custom-autoload 'tex-dvi-view-command "tex-mode" t) (defvar tex-show-queue-command (purecopy "lpq") "\ Command used by \\[tex-show-print-queue] to show the print queue. @@ -31658,6 +31613,10 @@ Like `thing-at-point', but tries to use the position in EVENT where the mouse button is clicked to find the thing nearby. (fn EVENT THING &optional NO-PROPERTIES)") +(autoload 'thing-at-point-file-at-point "thingatpt" "\ +Return the name of the existing file at point. + +(fn &optional LAX BOUNDS)") (autoload 'sexp-at-point "thingatpt" "\ Return the sexp at point, or nil if none is found. This is for returning the Lisp object represented by text at point; @@ -31990,9 +31949,19 @@ right of \"%x\", trailing zero units are not output. (fn STRING SECONDS)") (autoload 'seconds-to-string "time-date" "\ -Convert the time interval in seconds to a short string. - -(fn DELAY)") +Convert time interval DELAY (in seconds) to a string. +By default, the returned string is formatted as a float in the smallest +unit from the variable `seconds-to-string' that is longer than DELAY, +and a precision of two. If READABLE is non-nil, convert DELAY into a +readable string, using the information provided in the variable +`seconds-to-string-readable'. If it is the symbol `expanded', use two +units to describe DELAY, if appropriate. E.g. \"1 hour 32 minutes\". +If ABBREV is non-nil, abbreviate the readable units. If PRECISION is a +whole number, round the value associated with the smallest displayed +unit to that many digits after the decimal. If it is a non-negative +float less than 1.0, round to that value. + +(fn DELAY &optional READABLE ABBREV PRECISION)") (register-definition-prefixes "time-date" '("date-" "decoded-time-" "encode-time-value" "seconds-to-string" "time-" "with-decoded-time-value")) @@ -32008,7 +31977,7 @@ Valid ZONE values are described in the documentation of `format-time-string'. (put 'time-stamp-line-limit 'safe-local-variable 'integerp) (put 'time-stamp-start 'safe-local-variable 'stringp) (put 'time-stamp-end 'safe-local-variable 'stringp) -(put 'time-stamp-inserts-lines 'safe-local-variable 'symbolp) +(put 'time-stamp-inserts-lines 'safe-local-variable 'booleanp) (put 'time-stamp-count 'safe-local-variable 'integerp) (put 'time-stamp-pattern 'safe-local-variable 'stringp) (autoload 'time-stamp "time-stamp" "\ @@ -32447,7 +32416,7 @@ Whether Tramp is enabled. If it is set to nil, all remote file names are used literally. Don't set it manually, use `inhibit-remote-files' or `without-remote-files' instead.") -(defconst tramp-initial-file-name-regexp (rx bos "/" (+ (not (any "/:"))) ":" (* (not (any "/:"))) ":") "\ +(defconst tramp-initial-file-name-regexp "\\`/[^/:]+:[^/:]*:" "\ Value for `tramp-file-name-regexp' for autoload. It must match the initial `tramp-syntax' settings.") (defvar tramp-file-name-regexp tramp-initial-file-name-regexp "\ @@ -32458,7 +32427,7 @@ initial value is overwritten by the car of `tramp-file-name-structure'.") (defvar tramp-ignored-file-name-regexp nil "\ Regular expression matching file names that are not under Tramp's control.") (custom-autoload 'tramp-ignored-file-name-regexp "tramp" t) -(defconst tramp-autoload-file-name-regexp (rx bos "/" (| "-" (>= 2 (not (any "/:|")))) ":") "\ +(defconst tramp-autoload-file-name-regexp "\\`/\\(?:-\\|[^/:|]\\{2,\\}\\):" "\ Regular expression matching file names handled by Tramp autoload. It must match the initial `tramp-syntax' settings. It should not match file names at root of the underlying local file system, @@ -32608,7 +32577,7 @@ Add archive file name handler to `file-name-handler-alist'." (when (and tramp-ar ;;; Generated autoloads from transient.el -(push (purecopy '(transient 0 7 4)) package--builtin-versions) +(push (purecopy '(transient 0 8 3)) package--builtin-versions) (autoload 'transient-insert-suffix "transient" "\ Insert a SUFFIX into PREFIX before LOC. PREFIX is a prefix command, a symbol. @@ -32693,6 +32662,37 @@ nil, the grammar is installed to the standard location, the (fn LANG &optional OUT-DIR)" t) (register-definition-prefixes "treesit" '("treesit-")) + +;;; Generated autoloads from tty-tip.el + +(defvar tty-tip-mode nil "\ +Non-nil if Tty-Tip mode is enabled. +See the `tty-tip-mode' command +for a description of this minor mode. +Setting this variable directly does not take effect; +either customize it (see the info node `Easy Customization') +or call the function `tty-tip-mode'.") +(custom-autoload 'tty-tip-mode "tty-tip" nil) +(autoload 'tty-tip-mode "tty-tip" "\ +Global minor mode for displaying help in tty child frames. + +This is a global minor mode. If called interactively, toggle the +`Tty-Tip mode' mode. If the prefix argument is positive, enable the +mode, and if it is zero or negative, disable the mode. + +If called from Lisp, toggle the mode if ARG is `toggle'. Enable the +mode if ARG is nil, omitted, or is a positive number. Disable the mode +if ARG is a negative number. + +To check whether the minor mode is enabled in the current buffer, +evaluate `(default-value \\='tty-tip-mode)'. + +The mode's hook is called both when the mode is enabled and when it is +disabled. + +(fn &optional ARG)" t) +(register-definition-prefixes "tty-tip" '("tty-tip-")) + ;;; Generated autoloads from tutorial.el @@ -32729,8 +32729,8 @@ resumed later. ;;; Generated autoloads from textmodes/two-column.el (autoload '2C-command "two-column" () t 'keymap) - (global-set-key "\C-x6" #'2C-command) - (global-set-key [f2] #'2C-command) + (keymap-global-set "C-x 6" #'2C-command) + (keymap-global-set "" #'2C-command) (autoload '2C-two-columns "two-column" "\ Split current window vertically for two-column editing. \\When called the first time, associates a buffer with the current @@ -36318,6 +36318,9 @@ to control which program to use when looking for matches. ;;; Generated autoloads from xt-mouse.el +(defvar xterm-mouse-mode-called nil "\ +If `xterm-mouse-mode' has been called already. +This can be used to detect if xterm-mouse-mode was explicitly set.") (defvar xterm-mouse-mode nil "\ Non-nil if Xterm-Mouse mode is enabled. See the `xterm-mouse-mode' command @@ -36329,12 +36332,14 @@ or call the function `xterm-mouse-mode'.") (autoload 'xterm-mouse-mode "xt-mouse" "\ Toggle XTerm mouse mode. -Turn it on to use Emacs mouse commands, and off to use xterm mouse commands. -This works in terminal emulators compatible with xterm. It only -works for simple uses of the mouse. Basically, only non-modified -single clicks are supported. When turned on, the normal xterm -mouse functionality for such clicks is still available by holding -down the SHIFT key while pressing the mouse button. +Turn it on to use Emacs mouse commands, and off to use xterm mouse +commands. This works in terminal emulators compatible with xterm. When +turned on, the normal xterm mouse functionality for such clicks is still +available by holding down the SHIFT key while pressing the mouse button. + +On text terminals that Emacs knows are compatible with the mouse as well +as other critical editing functionality, this is automatically turned on +at startup. See Info node `(elisp)Terminal-Specific' and `xterm--init'. This is a global minor mode. If called interactively, toggle the `Xterm-Mouse mode' mode. If the prefix argument is positive, enable the