aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorEli Zaretskii2024-08-31 08:14:03 -0400
committerEli Zaretskii2024-08-31 08:14:03 -0400
commita18c29a7ebe508ef0baa5572003b01ea2ca36de5 (patch)
tree1eafc8b1d37a37fb84aaaea93eadcee77965d830 /lisp
parenta9889b8eeceb4f1f7835be04f66d3c91c6f36621 (diff)
parenta0f740c88d88fdd64738518d030951cd336327c7 (diff)
downloademacs-a18c29a7ebe508ef0baa5572003b01ea2ca36de5.tar.gz
emacs-a18c29a7ebe508ef0baa5572003b01ea2ca36de5.zip
Merge from origin/emacs-30
a0f740c88d8 ; * lisp/progmodes/flymake.el: Fix "Maintainer" header a9433858131 ; * etc/AUTHORS: Update. 762b85be27b ; Revert "; * admin/authors.el (authors-valid-file-names)... e24d568b565 ; Revert "Revert "; * admin/authors.el (authors-ignored-f... 2d723a280b3 Revert "; * admin/authors.el (authors-ignored-files): Add... 2a5b129509f Revert "; * admin/authors.el (authors-ignored-files): Ign... 0db53f14a29 ; * admin/authors.el (authors-ignored-files): Ignore Unic... 6734b60c0c3 ; * admin/authors.el (authors-valid-file-names): Ignore U... d809d53afc0 ; * admin/authors.el (authors-ignored-files): Add removed... 766f69bab12 ; * etc/NEWS: Announce VC-dir "Tracking" header. (bug#68183) 37a097d8663 ; * admin/authors.el (authors-aliases): Fix regexps. 0fb50e26316 ; * admin/MAINTAINERS: Spencer Baugh maintains flymake.el. d05d8c336c8 xwidget: Fix xwidget-at misinterpreting non-xwidget text-... 13f69f254cf Fix rare segfaults due to freed fontsets 427fb319dab ; * lisp/simple.el (use-region-beginning, use-region-end)... # Conflicts: # admin/MAINTAINERS # etc/NEWS
Diffstat (limited to 'lisp')
-rw-r--r--lisp/progmodes/flymake.el2
-rw-r--r--lisp/simple.el8
-rw-r--r--lisp/xwidget.el2
3 files changed, 8 insertions, 4 deletions
diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el
index e72f25fd0cd..9a6b62ca254 100644
--- a/lisp/progmodes/flymake.el
+++ b/lisp/progmodes/flymake.el
@@ -3,7 +3,7 @@
3;; Copyright (C) 2003-2024 Free Software Foundation, Inc. 3;; Copyright (C) 2003-2024 Free Software Foundation, Inc.
4 4
5;; Author: Pavel Kobyakov <pk_at_work@yahoo.com> 5;; Author: Pavel Kobyakov <pk_at_work@yahoo.com>
6;; Maintainer: João Távora <joaotavora@gmail.com> 6;; Maintainer: Spencer Baugh <sbaugh@janestreet.com>
7;; Version: 1.3.7 7;; Version: 1.3.7
8;; Keywords: c languages tools 8;; Keywords: c languages tools
9;; Package-Requires: ((emacs "26.1") (eldoc "1.14.0") (project "0.7.1")) 9;; Package-Requires: ((emacs "26.1") (eldoc "1.14.0") (project "0.7.1"))
diff --git a/lisp/simple.el b/lisp/simple.el
index 2453a129d0a..eedc5768fe2 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -7085,11 +7085,15 @@ point otherwise."
7085 :group 'editing-basics) 7085 :group 'editing-basics)
7086 7086
7087(defun use-region-beginning () 7087(defun use-region-beginning ()
7088 "Return the start of the region if `use-region-p'." 7088 "Return the start of the region if `use-region-p' returns non-nil.
7089This is a convenience function to use in `interactive' forms of
7090commands that need to act on the region when it is active."
7089 (and (use-region-p) (region-beginning))) 7091 (and (use-region-p) (region-beginning)))
7090 7092
7091(defun use-region-end () 7093(defun use-region-end ()
7092 "Return the end of the region if `use-region-p'." 7094 "Return the end of the region if `use-region-p' returns non-nil.
7095This is a convenience function to use in `interactive' forms of
7096commands that need to act on the region when it is active."
7093 (and (use-region-p) (region-end))) 7097 (and (use-region-p) (region-end)))
7094 7098
7095(defun use-region-noncontiguous-p () 7099(defun use-region-noncontiguous-p ()
diff --git a/lisp/xwidget.el b/lisp/xwidget.el
index bf5987d742f..c5a84db6d4a 100644
--- a/lisp/xwidget.el
+++ b/lisp/xwidget.el
@@ -81,7 +81,7 @@ This returns the result of `make-xwidget'."
81(defun xwidget-at (pos) 81(defun xwidget-at (pos)
82 "Return xwidget at POS." 82 "Return xwidget at POS."
83 (let* ((disp (get-text-property pos 'display)) 83 (let* ((disp (get-text-property pos 'display))
84 (xw (car (cdr (cdr disp))))) 84 (xw (ignore-errors (car (cdr (cdr disp))))))
85 (when (xwidget-live-p xw) xw))) 85 (when (xwidget-live-p xw) xw)))
86 86
87 87