mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-21 06:55:39 +00:00
; Minor adjustments to configury, loaddefs and gitignore
* .gitignore: Add exec/aclocal.m4. * configure.ac (bitmapdirs): Circumvent shell substitution that isn't supported by the Bourne shell. * lisp/ldefs-boot.el: Update from loaddefs.el.
This commit is contained in:
Po Lu
parent
af907c060a
commit
3f2e009ac3
1
.gitignore
vendored
1
.gitignore
vendored
@ -380,6 +380,7 @@ exec/loader
|
||||
exec/test
|
||||
exec/exec1
|
||||
exec/deps/*
|
||||
exec/aclocal.m4
|
||||
exec/autom4te.cache
|
||||
exec/config.h
|
||||
exec/config.h.in
|
||||
|
||||
@ -2762,16 +2762,16 @@ if test x"${x_includes}" = x; then
|
||||
bitmapdir=/usr/include/X11/bitmaps
|
||||
else
|
||||
# accumulate include directories that have X11 bitmap subdirectories
|
||||
bmd_acc=
|
||||
AS_UNSET([bmd_acc])
|
||||
for bmd in `AS_ECHO(["$x_includes"]) | sed -e 's/:/ /g'`; do
|
||||
if test -d "${bmd}/X11/bitmaps"; then
|
||||
bmd_acc="${bmd_acc}:${bmd}/X11/bitmaps"
|
||||
bmd_acc="${bmd_acc+$bmd_acc:}${bmd}/X11/bitmaps"
|
||||
fi
|
||||
if test -d "${bmd}/bitmaps"; then
|
||||
bmd_acc="${bmd_acc}:${bmd}/bitmaps"
|
||||
bmd_acc="${bmd_acc+$bmd_acc:}${bmd}/bitmaps"
|
||||
fi
|
||||
done
|
||||
bitmapdir=${bmd_acc#:}
|
||||
bitmapdir=$bmd_acc
|
||||
fi
|
||||
|
||||
NATIVE_IMAGE_API=no
|
||||
|
||||
@ -302,6 +302,7 @@ usage: (defadvice FUNCTION (CLASS NAME [POSITION] [ARGLIST] FLAG...)
|
||||
(fn FUNCTION ARGS &rest BODY)" nil t)
|
||||
(function-put 'defadvice 'doc-string-elt 3)
|
||||
(function-put 'defadvice 'lisp-indent-function 2)
|
||||
(make-obsolete 'defadvice '"use advice-add or define-advice" "30.1")
|
||||
(register-definition-prefixes "advice" '("ad-"))
|
||||
|
||||
|
||||
@ -2544,6 +2545,13 @@ The optional argument NEW-WINDOW is not used.
|
||||
Browse URL with the system default browser.
|
||||
Default to the URL around or before point.
|
||||
|
||||
(fn URL &optional NEW-WINDOW)" t)
|
||||
(autoload 'browse-url-default-android-browser "browse-url" "\
|
||||
Browse URL with the system default browser.
|
||||
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-emacs "browse-url" "\
|
||||
Ask Emacs to load URL into a buffer and show it in another window.
|
||||
@ -4645,12 +4653,6 @@ But if you just want to print something, don't call this directly:
|
||||
call other entry points instead, such as `cl-prin1'.
|
||||
|
||||
(fn OBJECT STREAM)")
|
||||
(autoload 'cl-print-expand-ellipsis "cl-print" "\
|
||||
Print the expansion of an ellipsis to STREAM.
|
||||
VALUE should be the value of the `cl-print-ellipsis' text property
|
||||
which was attached to the ellipsis by `cl-prin1'.
|
||||
|
||||
(fn VALUE STREAM)")
|
||||
(autoload 'cl-prin1 "cl-print" "\
|
||||
Print OBJECT on STREAM according to its type.
|
||||
Output is further controlled by the variables
|
||||
@ -4671,13 +4673,12 @@ characters with appropriate settings of `print-level' and
|
||||
the arguments VALUE and STREAM and which should respect
|
||||
`print-length' and `print-level'. LIMIT may be nil or zero in
|
||||
which case PRINT-FUNCTION will be called with `print-level' and
|
||||
`print-length' bound to nil.
|
||||
`print-length' bound to nil, and it can also be t in which case
|
||||
PRINT-FUNCTION will be called with the current values of `print-level'
|
||||
and `print-length'.
|
||||
|
||||
Use this function with `cl-prin1' to print an object,
|
||||
abbreviating it with ellipses to fit within a size limit. Use
|
||||
this function with `cl-prin1-expand-ellipsis' to expand an
|
||||
ellipsis, abbreviating the expansion to stay within a size
|
||||
limit.
|
||||
abbreviating it with ellipses to fit within a size limit.
|
||||
|
||||
(fn PRINT-FUNCTION VALUE LIMIT)")
|
||||
(register-definition-prefixes "cl-print" '("cl-print-" "help-byte-code"))
|
||||
@ -4873,6 +4874,36 @@ The files to be removed are those produced from the original source
|
||||
filename (including FILE).
|
||||
|
||||
(fn FILE)")
|
||||
(autoload 'native--compile-async "comp" "\
|
||||
Compile FILES asynchronously.
|
||||
FILES is one filename or a list of filenames or directories.
|
||||
|
||||
If optional argument RECURSIVELY is non-nil, recurse into
|
||||
subdirectories of given directories.
|
||||
|
||||
If optional argument LOAD is non-nil, request to load the file
|
||||
after compiling.
|
||||
|
||||
The optional argument SELECTOR has the following valid values:
|
||||
|
||||
nil -- Select all files.
|
||||
a string -- A regular expression selecting files with matching names.
|
||||
a function -- A function selecting files with matching names.
|
||||
|
||||
The variable `native-comp-async-jobs-number' specifies the number
|
||||
of (commands) to run simultaneously.
|
||||
|
||||
LOAD can also be the symbol `late'. This is used internally if
|
||||
the byte code has already been loaded when this function is
|
||||
called. It means that we request the special kind of load
|
||||
necessary in that situation, called \"late\" loading.
|
||||
|
||||
During a \"late\" load, instead of executing all top-level forms
|
||||
of the original files, only function definitions are
|
||||
loaded (paying attention to have these effective only if the
|
||||
bytecode definition was not changed in the meantime).
|
||||
|
||||
(fn FILES &optional RECURSIVELY LOAD SELECTOR)")
|
||||
(autoload 'comp-lookup-eln "comp" "\
|
||||
Given a Lisp source FILENAME return the corresponding .eln file if found.
|
||||
Search happens in `native-comp-eln-load-path'.
|
||||
@ -4939,7 +4970,7 @@ 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"))
|
||||
(register-definition-prefixes "comp" '("comp-" "make-comp-edge" "native-comp" "no-native-compile"))
|
||||
|
||||
|
||||
;;; Generated autoloads from cedet/semantic/wisent/comp.el
|
||||
@ -5638,7 +5669,7 @@ Run `perldoc' on WORD.
|
||||
(fn WORD)" t)
|
||||
(autoload 'cperl-perldoc-at-point "cperl-mode" "\
|
||||
Run a `perldoc' on the word around point." t)
|
||||
(register-definition-prefixes "cperl-mode" '("cperl-"))
|
||||
(register-definition-prefixes "cperl-mode" '("cperl-" "imenu-max-items"))
|
||||
|
||||
|
||||
;;; Generated autoloads from progmodes/cpp.el
|
||||
@ -8171,7 +8202,6 @@ Switch to *dungeon* buffer and start game." t)
|
||||
|
||||
;;; Generated autoloads from emacs-lisp/easy-mmode.el
|
||||
|
||||
(defalias 'easy-mmode-define-minor-mode #'define-minor-mode)
|
||||
(autoload 'define-minor-mode "easy-mmode" "\
|
||||
Define a new minor mode MODE.
|
||||
This defines the toggle command MODE and (by default) a control variable
|
||||
@ -8246,7 +8276,6 @@ INIT-VALUE LIGHTER KEYMAP.
|
||||
(fn MODE DOC [KEYWORD VAL ... &rest BODY])" nil t)
|
||||
(function-put 'define-minor-mode 'doc-string-elt 2)
|
||||
(function-put 'define-minor-mode 'lisp-indent-function 'defun)
|
||||
(defalias 'easy-mmode-define-global-mode #'define-globalized-minor-mode)
|
||||
(defalias 'define-global-minor-mode #'define-globalized-minor-mode)
|
||||
(autoload 'define-globalized-minor-mode "easy-mmode" "\
|
||||
Make a global mode GLOBAL-MODE corresponding to buffer-local minor MODE.
|
||||
@ -8254,14 +8283,17 @@ TURN-ON is a function that will be called with no args in every buffer
|
||||
and that should try to turn MODE on if applicable for that buffer.
|
||||
|
||||
Each of KEY VALUE is a pair of CL-style keyword arguments.
|
||||
The :predicate argument specifies in which major modes should the
|
||||
The :predicate key specifies in which major modes should the
|
||||
globalized minor mode be switched on. The value should be t (meaning
|
||||
switch on the minor mode in all major modes), nil (meaning don't
|
||||
switch on in any major mode), a list of modes (meaning switch on only
|
||||
in those modes and their descendants), or a list (not MODES...),
|
||||
meaning switch on in any major mode except MODES. The value can also
|
||||
mix all of these forms, see the info node `Defining Minor Modes' for
|
||||
details.
|
||||
details. The :predicate key causes the macro to create a user option
|
||||
named the same as MODE, but ending with \"-modes\" instead of \"-mode\".
|
||||
That user option can then be used to customize in which modes this
|
||||
globalized minor mode will be switched on.
|
||||
As the minor mode defined by this function is always global, any
|
||||
:global keyword is ignored.
|
||||
Other keywords have the same meaning as in `define-minor-mode',
|
||||
@ -8325,6 +8357,8 @@ CSS contains a list of syntax specifications of the form (CHAR . SYNTAX).
|
||||
(fn ST CSS DOC &rest ARGS)" nil t)
|
||||
(function-put 'easy-mmode-defsyntax 'doc-string-elt 3)
|
||||
(function-put 'easy-mmode-defsyntax 'lisp-indent-function 1)
|
||||
(define-obsolete-function-alias 'easy-mmode-define-minor-mode #'define-minor-mode "30.1")
|
||||
(define-obsolete-function-alias 'easy-mmode-define-global-mode #'define-globalized-minor-mode "30.1")
|
||||
(register-definition-prefixes "easy-mmode" '("easy-mmode-"))
|
||||
|
||||
|
||||
@ -8633,7 +8667,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)" '("P"))
|
||||
(fn PREFIX)" t)
|
||||
(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.
|
||||
@ -10234,6 +10268,9 @@ Look at CONFIG and try to expand GROUP.
|
||||
(autoload 'erc-select-read-args "erc" "\
|
||||
Prompt the user for values of nick, server, port, and password.
|
||||
With prefix arg, also prompt for user and full name.")
|
||||
(autoload 'erc-server-select "erc" "\
|
||||
Interactively connect to a server from `erc-server-alist'." t)
|
||||
(make-obsolete 'erc-server-select 'erc-tls "30.1")
|
||||
(autoload 'erc "erc" "\
|
||||
ERC is a powerful, modular, and extensible IRC client.
|
||||
This function is the main entry point for ERC.
|
||||
@ -10259,7 +10296,7 @@ for the values of the other parameters.
|
||||
|
||||
See `erc-tls' for the meaning of ID.
|
||||
|
||||
(fn &key SERVER PORT NICK USER PASSWORD FULL-NAME ID)" '((erc-select-read-args)))
|
||||
(fn &key SERVER PORT NICK USER PASSWORD FULL-NAME ID)" t)
|
||||
(defalias 'erc-select #'erc)
|
||||
(autoload 'erc-tls "erc" "\
|
||||
ERC is a powerful, modular, and extensible IRC client.
|
||||
@ -10307,7 +10344,7 @@ See Info node `(erc) Network Identifier' for details. Like
|
||||
CLIENT-CERTIFICATE, this parameter cannot be specified
|
||||
interactively.
|
||||
|
||||
(fn &key SERVER PORT NICK USER PASSWORD FULL-NAME CLIENT-CERTIFICATE ID)" '((let ((erc-default-port erc-default-port-tls)) (erc-select-read-args))))
|
||||
(fn &key SERVER PORT NICK USER PASSWORD FULL-NAME CLIENT-CERTIFICATE ID)" t)
|
||||
(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.
|
||||
@ -10432,10 +10469,13 @@ Return the name of the network or \"Unknown\" as a symbol.
|
||||
Use the server parameter NETWORK if provided, otherwise parse the
|
||||
server name and search for a match in `erc-networks-alist'.")
|
||||
(make-obsolete 'erc-determine-network '"maybe see `erc-networks--determine'" "29.1")
|
||||
(autoload 'erc-server-select "erc-networks" "\
|
||||
Interactively select a server to connect to using `erc-server-alist'." t)
|
||||
(register-definition-prefixes "erc-networks" '("erc-"))
|
||||
|
||||
|
||||
;;; Generated autoloads from erc/erc-nicks.el
|
||||
|
||||
(register-definition-prefixes "erc-nicks" '("erc-nicks-"))
|
||||
|
||||
|
||||
;;; Generated autoloads from erc/erc-notify.el
|
||||
|
||||
@ -10536,7 +10576,9 @@ 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 'macro)
|
||||
(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)
|
||||
(autoload 'ert-run-tests-batch "ert" "\
|
||||
Run the tests specified by SELECTOR, printing results to the terminal.
|
||||
|
||||
@ -14830,9 +14872,8 @@ to specify a command to run.
|
||||
If CONFIRM is non-nil, the user will be given an opportunity to edit the
|
||||
command before it's run.
|
||||
|
||||
Interactively, the user can use the \\`M-c' command while entering
|
||||
the regexp to indicate whether the grep should be case sensitive
|
||||
or not.
|
||||
Interactively, the user can use \\<read-regexp-map>\\[read-regexp-toggle-case-fold] while entering the regexp
|
||||
to indicate whether the grep should be case sensitive or not.
|
||||
|
||||
(fn REGEXP &optional FILES DIR CONFIRM)" t)
|
||||
(autoload 'zrgrep "grep" "\
|
||||
@ -16409,7 +16450,8 @@ 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 'macro)
|
||||
(fn SYMBOL (&key NAME INLINE PROPS SUMMARIZER) &rest BODY)" nil t)
|
||||
(function-put 'define-ibuffer-column 'lisp-indent-function 'defun)
|
||||
(autoload 'define-ibuffer-sorter "ibuf-macs" "\
|
||||
Define a method of sorting named NAME.
|
||||
DOCUMENTATION is the documentation of the function, which will be called
|
||||
@ -16420,7 +16462,9 @@ 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 'macro)
|
||||
(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)
|
||||
(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
|
||||
@ -16459,7 +16503,9 @@ 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 'macro)
|
||||
(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)
|
||||
(autoload 'define-ibuffer-filter "ibuf-macs" "\
|
||||
Define a filter named NAME.
|
||||
DOCUMENTATION is the documentation of the function.
|
||||
@ -16474,7 +16520,9 @@ 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 'macro)
|
||||
(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)
|
||||
(register-definition-prefixes "ibuf-macs" '("ibuffer-"))
|
||||
|
||||
|
||||
@ -18954,7 +19002,7 @@ The macro is now available for use via \\[kmacro-call-macro],
|
||||
or it can be given a name with \\[kmacro-name-last-macro] and then invoked
|
||||
under that name.
|
||||
|
||||
With numeric arg, repeat macro now that many times,
|
||||
With numeric ARG, repeat the macro that many times,
|
||||
counting the definition just completed as the first repetition.
|
||||
An argument of zero means repeat until error.
|
||||
|
||||
@ -19179,7 +19227,7 @@ A major mode to edit GNU ld script files.
|
||||
(put 'less-css-input-file-name 'safe-local-variable #'stringp)
|
||||
(add-to-list 'auto-mode-alist '("\\.less\\'" . less-css-mode))
|
||||
(autoload 'less-css-mode "less-css-mode" "\
|
||||
Major mode for editing Less files (http://lesscss.org/).
|
||||
Major mode for editing Less files (https://lesscss.org/).
|
||||
Special commands:
|
||||
\\{less-css-mode-map}
|
||||
|
||||
@ -20706,6 +20754,8 @@ Also see the `duplicate-line' command.
|
||||
(autoload 'duplicate-line "misc" "\
|
||||
Duplicate the current line N times.
|
||||
Interactively, N is the prefix numeric argument, and defaults to 1.
|
||||
The user option `duplicate-line-final-position' specifies where to
|
||||
move point after duplicating the line.
|
||||
Also see the `copy-from-above-command' command.
|
||||
|
||||
(fn &optional N)" t)
|
||||
@ -20715,6 +20765,9 @@ If the region is inactive, duplicate the current line (like `duplicate-line').
|
||||
Otherwise, duplicate the region, which remains active afterwards.
|
||||
If the region is rectangular, duplicate on its right-hand side.
|
||||
Interactively, N is the prefix numeric argument, and defaults to 1.
|
||||
The variables `duplicate-line-final-position' and
|
||||
`duplicate-region-final-position' control the position of point
|
||||
and the region after the duplication.
|
||||
|
||||
(fn &optional N)" t)
|
||||
(autoload 'zap-up-to-char "misc" "\
|
||||
@ -20766,7 +20819,7 @@ Optional argument BUFFER specifies a buffer to use, instead of
|
||||
The return value is always nil.
|
||||
|
||||
(fn &optional LOADED-ONLY-P BUFFER)" t)
|
||||
(register-definition-prefixes "misc" '("list-dynamic-libraries--"))
|
||||
(register-definition-prefixes "misc" '("duplicate-" "list-dynamic-libraries--"))
|
||||
|
||||
|
||||
;;; Generated autoloads from misearch.el
|
||||
@ -22508,7 +22561,7 @@ Coloring:
|
||||
|
||||
;;; Generated autoloads from org/org.el
|
||||
|
||||
(push (purecopy '(org 9 6 6)) package--builtin-versions)
|
||||
(push (purecopy '(org 9 6 7)) package--builtin-versions)
|
||||
(autoload 'org-babel-do-load-languages "org" "\
|
||||
Load the languages defined in `org-babel-load-languages'.
|
||||
|
||||
@ -24488,11 +24541,6 @@ 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
|
||||
|
||||
@ -24527,6 +24575,18 @@ The mode's hook is called both when the mode is enabled and when
|
||||
it is disabled.
|
||||
|
||||
(fn &optional ARG)" t)
|
||||
(autoload 'pixel-scroll-precision-scroll-down-page "pixel-scroll" "\
|
||||
Scroll the current window down by DELTA pixels.
|
||||
Note that this function doesn't work if DELTA is larger than
|
||||
the height of the current window.
|
||||
|
||||
(fn DELTA)")
|
||||
(autoload 'pixel-scroll-precision-scroll-up-page "pixel-scroll" "\
|
||||
Scroll the current window up by DELTA pixels.
|
||||
Note that this function doesn't work if DELTA is larger than
|
||||
the height of the current window.
|
||||
|
||||
(fn DELTA)")
|
||||
(defvar pixel-scroll-precision-mode nil "\
|
||||
Non-nil if Pixel-Scroll-Precision mode is enabled.
|
||||
See the `pixel-scroll-precision-mode' command
|
||||
@ -24618,8 +24678,9 @@ Use streaming commands.
|
||||
Return a string containing the pretty-printed representation of OBJECT.
|
||||
OBJECT can be any Lisp object. Quoting characters are used as needed
|
||||
to make output that `read' can handle, whenever this is possible.
|
||||
Optional argument PP-FUNCTION overrides `pp-default-function'.
|
||||
|
||||
(fn OBJECT)")
|
||||
(fn OBJECT &optional PP-FUNCTION)")
|
||||
(autoload 'pp-buffer "pp" "\
|
||||
Prettify the current buffer with printed representation of a Lisp object." t)
|
||||
(autoload 'pp "pp" "\
|
||||
@ -24627,11 +24688,7 @@ Output the pretty-printed representation of OBJECT, any Lisp object.
|
||||
Quoting characters are printed as needed to make output that `read'
|
||||
can handle, whenever this is possible.
|
||||
|
||||
This function does not apply special formatting rules for Emacs
|
||||
Lisp code. See `pp-emacs-lisp-code' instead.
|
||||
|
||||
By default, this function won't limit the line length of lists
|
||||
and vectors. Bind `pp-use-max-width' to a non-nil value to do so.
|
||||
Uses the pretty-printing code specified in `pp-default-function'.
|
||||
|
||||
Output stream is STREAM, or value of `standard-output' (which see).
|
||||
|
||||
@ -24669,8 +24726,10 @@ Ignores leading comment characters.
|
||||
Insert SEXP into the current buffer, formatted as Emacs Lisp code.
|
||||
Use the `pp-max-width' variable to control the desired line length.
|
||||
Note that this could be slow for large SEXPs.
|
||||
Can also be called with two arguments, in which case they're taken to be
|
||||
the bounds of a region containing Lisp code to pretty-print.
|
||||
|
||||
(fn SEXP)")
|
||||
(fn SEXP &optional END)")
|
||||
(register-definition-prefixes "pp" '("pp-"))
|
||||
|
||||
|
||||
@ -25261,8 +25320,10 @@ Return the project instance in DIRECTORY, defaulting to `default-directory'.
|
||||
|
||||
When no project is found in that directory, the result depends on
|
||||
the value of MAYBE-PROMPT: if it is nil or omitted, return nil,
|
||||
else ask the user for a directory in which to look for the
|
||||
project, and if no project is found there, return a \"transient\"
|
||||
else prompt the user for the project to use. To prompt for a
|
||||
project, call the function specified by `project-prompter', which
|
||||
returns the directory in which to look for the project. If no
|
||||
project is found in that directory, return a \"transient\"
|
||||
project instance.
|
||||
|
||||
The \"transient\" project instance is a special kind of value
|
||||
@ -25468,6 +25529,15 @@ When called in a program, it will use the project corresponding
|
||||
to directory DIR.
|
||||
|
||||
(fn DIR)" t)
|
||||
(autoload 'project-uniquify-dirname-transform "project" "\
|
||||
Uniquify name of directory DIRNAME using `project-name', if in a project.
|
||||
|
||||
If you set `uniquify-dirname-transform' to this function,
|
||||
slash-separated components from `project-name' will be appended to
|
||||
the buffer's directory name when buffers from two different projects
|
||||
would otherwise have the same name.
|
||||
|
||||
(fn DIRNAME)")
|
||||
(register-definition-prefixes "project" '("project-"))
|
||||
|
||||
|
||||
@ -25832,6 +25902,7 @@ Major mode for editing Python files, using tree-sitter library.
|
||||
\\{python-ts-mode-map}
|
||||
|
||||
(fn)" t)
|
||||
(add-to-list 'auto-mode-alist '("/\\(?:Pipfile\\|\\.?flake8\\)\\'" . conf-mode))
|
||||
(register-definition-prefixes "python" '("inferior-python-mode" "python-" "run-python-internal"))
|
||||
|
||||
|
||||
@ -27501,8 +27572,8 @@ Currently there are `ruby-mode' and `ruby-ts-mode'.
|
||||
Major mode for editing Ruby code.
|
||||
|
||||
(fn)" t)
|
||||
(add-to-list 'auto-mode-alist (cons (purecopy (concat "\\(?:\\.\\(?:" "rbw?\\|ru\\|rake\\|thor" "\\|jbuilder\\|rabl\\|gemspec\\|podspec" "\\)" "\\|/" "\\(?:Gem\\|Rake\\|Cap\\|Thor" "\\|Puppet\\|Berks\\|Brew" "\\|Vagrant\\|Guard\\|Pod\\)file" "\\)\\'")) 'ruby-mode))
|
||||
(dolist (name (list "ruby" "rbx" "jruby" "ruby1.9" "ruby1.8")) (add-to-list 'interpreter-mode-alist (cons (purecopy name) 'ruby-mode)))
|
||||
(add-to-list 'auto-mode-alist (cons (purecopy (concat "\\(?:\\.\\(?:" "rbw?\\|ru\\|rake\\|thor\\|axlsx" "\\|jbuilder\\|rabl\\|gemspec\\|podspec" "\\)" "\\|/" "\\(?:Gem\\|Rake\\|Cap\\|Thor" "\\|Puppet\\|Berks\\|Brew\\|Fast" "\\|Vagrant\\|Guard\\|Pod\\)file" "\\)\\'")) 'ruby-mode))
|
||||
(dolist (name (list "ruby" "rbx" "jruby" "j?ruby\\(?:[0-9.]+\\)")) (add-to-list 'interpreter-mode-alist (cons (purecopy name) 'ruby-mode)))
|
||||
(register-definition-prefixes "ruby-mode" '("ruby-"))
|
||||
|
||||
|
||||
@ -30433,7 +30504,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" "eval-command-interactive-spec" "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" "hash-table-" "internal--thread-argument" "replace-region-contents" "string-" "thread-" "with-buffer-unmodified-if-unchanged"))
|
||||
|
||||
|
||||
;;; Generated autoloads from progmodes/subword.el
|
||||
@ -31307,7 +31378,7 @@ See also: variables `tar-update-datestamp' and `tar-anal-blocksize'.
|
||||
\\{tar-mode-map}
|
||||
|
||||
(fn)" t)
|
||||
(register-definition-prefixes "tar-mode" '("tar-"))
|
||||
(register-definition-prefixes "tar-mode" '("pax-" "tar-"))
|
||||
|
||||
|
||||
;;; Generated autoloads from progmodes/tcl.el
|
||||
@ -32670,7 +32741,7 @@ FROM-MAP must contain appropriate binding for `[menu-bar]' which
|
||||
holds a keymap.
|
||||
|
||||
(fn COMMAND ICON IN-MAP &optional FROM-MAP &rest PROPS)")
|
||||
(register-definition-prefixes "tool-bar" '("toggle-tool-bar-mode-from-frame" "tool-bar-"))
|
||||
(register-definition-prefixes "tool-bar" '("modifier-bar-" "secondary-tool-bar-map" "toggle-tool-bar-mode-from-frame" "tool-bar-"))
|
||||
|
||||
|
||||
;;; Generated autoloads from tooltip.el
|
||||
@ -32771,6 +32842,11 @@ Add Tramp file name handlers to `file-name-handler-alist' during autoload." (unl
|
||||
(tramp-register-autoload-file-name-handlers)
|
||||
(defun tramp-unload-file-name-handlers nil "\
|
||||
Unload Tramp file name handlers from `file-name-handler-alist'." (dolist (fnh file-name-handler-alist) (when (and (symbolp (cdr fnh)) (string-prefix-p "tramp-" (symbol-name (cdr fnh)))) (setq file-name-handler-alist (delq fnh file-name-handler-alist)))))
|
||||
(defun inhibit-remote-files nil "\
|
||||
Deactivate remote file names." (interactive) (when (fboundp 'tramp-cleanup-all-connections) (funcall 'tramp-cleanup-all-connections)) (tramp-unload-file-name-handlers) (setq tramp-mode nil))
|
||||
(defmacro without-remote-files (&rest body) "\
|
||||
Deactivate remote file names temporarily.
|
||||
Run BODY." (declare (indent 0) (debug ((form body) body))) `(let ((file-name-handler-alist (copy-tree file-name-handler-alist)) tramp-mode) (tramp-unload-file-name-handlers) ,@body))
|
||||
(defun tramp-unload-tramp nil "\
|
||||
Discard Tramp from loading remote files." (interactive) (ignore-errors (unload-feature 'tramp 'force)))
|
||||
(register-definition-prefixes "tramp" '("tramp-" "with-"))
|
||||
@ -32846,6 +32922,11 @@ Add archive file name handler to `file-name-handler-alist'." (when (and tramp-ar
|
||||
|
||||
(register-definition-prefixes "tramp-integration" '("tramp-"))
|
||||
|
||||
|
||||
;;; Generated autoloads from net/tramp-message.el
|
||||
|
||||
(register-definition-prefixes "tramp-message" '("tramp-" "with-tramp-debug-message"))
|
||||
|
||||
|
||||
;;; Generated autoloads from net/tramp-rclone.el
|
||||
|
||||
@ -33245,7 +33326,7 @@ 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-"))
|
||||
(register-definition-prefixes "typescript-ts-mode" '("tsx-ts-mode--" "typescript-ts-mode-"))
|
||||
|
||||
|
||||
;;; Generated autoloads from international/ucs-normalize.el
|
||||
@ -36636,7 +36717,7 @@ The optional ARGS are additional keyword arguments.
|
||||
Call `insert' with ARGS even if surrounding text is read only.
|
||||
|
||||
(fn &rest ARGS)")
|
||||
(defvar widget-keymap (let ((map (make-sparse-keymap))) (define-key map "\11" 'widget-forward) (define-key map "\33\11" 'widget-backward) (define-key map [(shift tab)] 'widget-backward) (put 'widget-backward :advertised-binding [(shift tab)]) (define-key map [backtab] 'widget-backward) (define-key map [down-mouse-2] 'widget-button-click) (define-key map [down-mouse-1] 'widget-button-click) (define-key map [(control 109)] 'widget-button-press) map) "\
|
||||
(defvar widget-keymap (let ((map (make-sparse-keymap))) (define-key map "\11" 'widget-forward) (define-key map "\33\11" 'widget-backward) (define-key map [(shift tab)] 'widget-backward) (put 'widget-backward :advertised-binding [(shift tab)]) (define-key map [backtab] 'widget-backward) (define-key map [down-mouse-2] 'widget-button-click) (define-key map [down-mouse-1] 'widget-button-click) (define-key map [touchscreen-begin] 'widget-button-click) (define-key map [(control 109)] 'widget-button-press) map) "\
|
||||
Keymap containing useful binding for buffers containing widgets.
|
||||
Recommended as a parent keymap for modes using widgets.
|
||||
Note that such modes will need to require wid-edit.")
|
||||
@ -37282,7 +37363,6 @@ run a specific program. The program must be a member of
|
||||
;; Local Variables:
|
||||
;; version-control: never
|
||||
;; no-update-autoloads: t
|
||||
;; no-byte-compile: t
|
||||
;; no-native-compile: t
|
||||
;; coding: utf-8-emacs-unix
|
||||
;; End:
|
||||
|
||||
Loading…
Reference in New Issue
Block a user