Merge from origin/emacs-29

eb2b0931cf Add lambda_expression to c-ts-common-indent-type-regexp-a...
2da05876ed ; Use the right name when specifying VC packages
d4fc701297 Tolerate missing elpa-packages.eld files
8bc1b7d0b2 Avoid warning about 'load-path' in non-interactive sessions
3d17aee13d ; Fix installation of dependencies for VC packages
86ca7df6a3 ; Mention Hunspell private-dictionary misfeature in doc s...
7287b7b53a Support webkit2gtk-4.1
048a2dabfc ; Fix typo
This commit is contained in:
Stefan Kangas 2023-02-13 06:30:12 +01:00
commit bf60b3bfe7
6 changed files with 24 additions and 12 deletions

View file

@ -3583,8 +3583,12 @@ XWIDGETS_OBJ=
if test "$with_xwidgets" != "no"; then
if test "$USE_GTK_TOOLKIT" = "GTK3" && test "$window_system" != "none"; then
WEBKIT_REQUIRED=2.12
WEBKIT_MODULES="webkit2gtk-4.0 >= $WEBKIT_REQUIRED"
WEBKIT_MODULES="webkit2gtk-4.1 >= $WEBKIT_REQUIRED"
EMACS_CHECK_MODULES([WEBKIT], [$WEBKIT_MODULES])
if test "$HAVE_WEBKIT" = "no"; then
WEBKIT_MODULES="webkit2gtk-4.0 >= $WEBKIT_REQUIRED"
EMACS_CHECK_MODULES([WEBKIT], [$WEBKIT_MODULES])
fi
HAVE_XWIDGETS=$HAVE_WEBKIT
XWIDGETS_OBJ="xwidget.o"
if test "$HAVE_X_WINDOWS" = "yes" && test "${with_cairo}" = "no"; then

View file

@ -2553,7 +2553,7 @@ variable names have underscores replaced with dashes. For instance,
@code{mode_line_format} stores the value of @code{mode-line-format}.
@item overlays
The inveral tree containing this buffer's overlays.
The interval tree containing this buffer's overlays.
@item last_selected_window
This is the last window that was selected with this buffer in it, or @code{nil}

View file

@ -134,7 +134,10 @@ the `clone' function."
(package-vc-install name spec))
((listp spec)
(package-vc--archives-initialize)
(package-vc--unpack (cadr pkg-descs) spec)))))))
(package-vc--unpack
(or (cadr (assoc name package-archive-contents))
(package-desc-create :name name :kind 'vc))
spec)))))))
;;;###autoload
(defcustom package-vc-selected-packages '()
@ -269,9 +272,9 @@ Populate `package-vc--archive-spec-alist' with the result.
If optional argument ASYNC is non-nil, perform the downloads
asynchronously."
(dolist (archive package-archives)
(condition-case-unless-debug nil
(condition-case err
(package--download-one-archive archive "elpa-packages.eld" async)
(error (message "Failed to download `%s' archive." (car archive))))))
(error (message "Failed to download `%s' archive: %S" (car archive) err)))))
(add-hook 'package-read-archive-hook #'package-vc--read-archive-data 20)
@ -426,8 +429,8 @@ version of that package."
((let* ((pac package-archive-contents)
(desc (cadr (assoc (car pkg) pac))))
(if desc
(let ((reqs (package-desc-reqs pkg)))
(push pkg to-install)
(let ((reqs (package-desc-reqs desc)))
(push desc to-install)
(mapc #'search reqs))
(push pkg missing))))))
(version-order (a b)
@ -600,8 +603,6 @@ PKG-SPEC is a package specification, a property list describing
how to fetch and build the package. See `package-vc--archive-spec-alist'
for details. The optional argument REV specifies a specific revision to
checkout. This overrides the `:branch' attribute in PKG-SPEC."
(unless pkg-desc
(setq pkg-desc (package-desc-create :name (car pkg-spec) :kind 'vc)))
(pcase-let* (((map :lisp-dir) pkg-spec)
(name (package-desc-name pkg-desc))
(dirname (package-desc-full-name pkg-desc))

View file

@ -314,6 +314,7 @@ Return nil if there is no name or if NODE is not a defun node."
"constructor_body"
"annotation_type_body"
"interface_body"
"lambda_expression"
"enum_body"
"switch_block"
"record_declaration_body"

View file

@ -1596,7 +1596,8 @@ please check its value")
;; or EMACSLOADPATH, so we basically always have to check.
(let (warned)
(dolist (dir load-path)
(and (not warned)
(and (not noninteractive)
(not warned)
(stringp dir)
(string-equal (file-name-as-directory (expand-file-name dir))
(expand-file-name user-emacs-directory))

View file

@ -318,7 +318,9 @@ window system by evaluating the following on startup to set this variable:
;;;###autoload
(defcustom ispell-personal-dictionary nil
"File name of your personal spelling dictionary, or nil.
If nil, the default personal dictionary for your spelling checker is used."
If nil, the default personal dictionary for your spelling checker is used.
Due to a misfeature of Hunspell, if the value is an absolute file name, the
file by that name must already exist for Hunspell to be able to use it."
:type '(choice file
(const :tag "default" nil)))
@ -1730,7 +1732,10 @@ If you specify a personal dictionary for the current buffer which is
different from the current personal dictionary, the effect is similar
to calling \\[ispell-change-dictionary]. This variable is automatically
set when defined in the file with either `ispell-pdict-keyword' or the
local variable syntax.")
local variable syntax.
Due to a misfeature of Hunspell, if the value is an absolute file name, the
file by that name must already exist for Hunspell to be able to use it.")
;;;###autoload(put 'ispell-local-pdict 'safe-local-variable 'stringp)