From a24087a75595be5b13aa8f09ba09f21492b4ba8a Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Mon, 20 Jan 2025 22:14:46 +0100 Subject: [PATCH] ; Update lisp/ldef-boot.el --- lisp/ldefs-boot.el | 138 +++------------------------------------------ 1 file changed, 9 insertions(+), 129 deletions(-) diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el index 96dcec3e48e..14ea298fdf6 100644 --- a/lisp/ldefs-boot.el +++ b/lisp/ldefs-boot.el @@ -1273,9 +1273,7 @@ Features a private abbrev table and the following bindings: The character used for making comments is set by the variable `asm-comment-char' (which defaults to `?\\;'). - -Alternatively, you may set this variable in `asm-mode-set-comment-hook', -which is called near the beginning of mode initialization. +Alternatively, you may set this variable in `asm-mode-hook'. Turning on Asm mode runs the hook `asm-mode-hook' at the end of initialization. @@ -8120,6 +8118,12 @@ disabled. Switch to *dungeon* buffer and start game." t) (register-definition-prefixes "dunnet" '("dun" "obj-special")) + +;;; Generated autoloads from dwim.el + +(autoload 'dwim "dwim" nil t) +(register-definition-prefixes "dwim" '("dwim-hook")) + ;;; Generated autoloads from dynamic-setting.el @@ -11991,25 +11995,6 @@ files to that directory. (fn)" t) (register-definition-prefixes "filet" '("filet-")) - -;;; Generated autoloads from find-cmd.el - -(push (purecopy '(find-cmd 0 6)) package--builtin-versions) -(autoload 'find-cmd "find-cmd" "\ -Initiate the building of a find command. -For example: - -(find-cmd \\='(prune (name \".svn\" \".git\" \".CVS\")) - \\='(and (or (name \"*.pl\" \"*.pm\" \"*.t\") - (mtime \"+1\")) - (fstype \"nfs\" \"ufs\")))) - -`default-directory' is used as the initial search path. The -result is a string that should be ready for the command line. - -(fn &rest SUBFINDS)") -(register-definition-prefixes "find-cmd" '("find-")) - ;;; Generated autoloads from find-dired.el @@ -12068,91 +12053,6 @@ specifies what to use in place of \"-ls\" as the final argument. (fn DIR REGEXP)" t) (register-definition-prefixes "find-dired" '("find-" "kill-find")) - -;;; Generated autoloads from find-file.el - -(defvar ff-special-constructs `((,(purecopy "^#\\s *\\(include\\|import\\)\\s +[<\"]\\(.*\\)[>\"]") \, (lambda nil (match-string 2)))) "\ -List of special constructs recognized by `ff-treat-as-special'. -Each element, tried in order, has the form (REGEXP . EXTRACT). -If REGEXP matches the current line (from the beginning of the line), -`ff-treat-as-special' calls function EXTRACT with no args. -If EXTRACT returns nil, keep trying. Otherwise, return the -filename that EXTRACT returned.") -(custom-autoload 'ff-special-constructs "find-file" t) -(autoload 'ff-get-other-file "find-file" "\ -Find the header or source file corresponding to this file. -See also the documentation for `ff-find-other-file'. - -If optional IN-OTHER-WINDOW is non-nil, find the file in another window. - -(fn &optional IN-OTHER-WINDOW)" t) -(defalias 'ff-find-related-file #'ff-find-other-file) -(autoload 'ff-find-other-file "find-file" "\ -Find the header or source file corresponding to this file. -Being on a `#include' line pulls in that file. - -If optional IN-OTHER-WINDOW is non-nil, find the file in the other window. -If optional IGNORE-INCLUDE is non-nil, ignore being on `#include' lines. - -If optional EVENT is non-nil (default `last-nonmenu-event', move -point to the end position of that event before calling the -various ff-* hooks. - -Variables of interest include: - - - `ff-case-fold-search' - Non-nil means ignore cases in matches (see `case-fold-search'). - If you have extensions in different cases, you will want this to be nil. - - - `ff-always-in-other-window' - If non-nil, always open the other file in another window, unless an - argument is given to `ff-find-other-file'. - - - `ff-ignore-include' - If non-nil, ignores #include lines. - - - `ff-always-try-to-create' - If non-nil, always attempt to create the other file if it was not found. - - - `ff-quiet-mode' - If non-nil, does not trace which directories are being searched. - - - `ff-special-constructs' - A list of regular expressions specifying how to recognize special - constructs such as include files etc, and an associated method for - extracting the filename from that construct. - - - `ff-other-file-alist' - Alist of extensions to find given the current file's extension. - - - `ff-search-directories' - List of directories searched through with each extension specified in - `ff-other-file-alist' that matches this file's extension. - - - `ff-pre-find-hook' - List of functions to be called before the search for the file starts. - - - `ff-pre-load-hook' - List of functions to be called before the other file is loaded. - - - `ff-post-load-hook' - List of functions to be called after the other file is loaded. - - - `ff-not-found-hook' - List of functions to be called if the other file could not be found. - - - `ff-file-created-hook' - List of functions to be called if the other file has been created. - -(fn &optional IN-OTHER-WINDOW IGNORE-INCLUDE EVENT)" t) -(define-obsolete-function-alias 'ff-mouse-find-other-file #'ff-find-other-file "28.1") -(define-obsolete-function-alias 'ff-mouse-find-other-file-other-window #'ff-find-other-file-other-window "28.1") -(autoload 'ff-find-other-file-other-window "find-file" "\ -Visit the file you point at in another window. - -(fn EVENT)" t) -(register-definition-prefixes "find-file" '("cc-" "ff-" "modula2-other-file-alist")) - ;;; Generated autoloads from emacs-lisp/find-func.el @@ -12349,25 +12249,6 @@ FILE should be in a form suitable for passing to `locate-library'. Find packages matching a given keyword." t) (register-definition-prefixes "finder" '("finder-" "generated-finder-keywords-file")) - -;;; Generated autoloads from flow-ctrl.el - -(autoload 'enable-flow-control "flow-ctrl" "\ -Toggle flow control handling. -When handling is enabled, user can type C-s as C-\\, and C-q as C-^. -With arg, enable flow control mode if arg is positive, otherwise disable. - -(fn &optional ARGUMENT)" t) -(autoload 'enable-flow-control-on "flow-ctrl" "\ -Enable flow control if using one of a specified set of terminal types. -Use `(enable-flow-control-on \"vt100\" \"h19\")' to enable flow control -on VT-100 and H19 terminals. When flow control is enabled, -you must type C-\\ to get the effect of a C-s, and type C-^ -to get the effect of a C-q. - -(fn &rest LOSING-TERMINAL-TYPES)") -(register-definition-prefixes "flow-ctrl" '("flow-control-c-")) - ;;; Generated autoloads from mail/flow-fill.el @@ -27483,9 +27364,8 @@ that variable's value is a string. Read and analyze code from STREAM, reporting findings via CALLBACK. Call CALLBACK for each analyzed symbol SYM with arguments TYPE, POS, LEN -and BINDER, where TYPE a symbol that specifies the semantics of SYM, one -of `variable', `function', `block' `defun' and `defvar'; POS is the -position of SYM in STREAM; LEN is SYM's length; and BINDER is the +and BINDER, where TYPE a symbol that specifies the semantics of SYM; 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. This function ignores `read-symbol-shorthands', so SYM -- 2.39.5