Update to 30.1 in F41

- Enable tests
- Build has segmentation fault on i686

.gitignore

@@ -40,11 +40,5 @@
 /emacs-29.3.tar.xz.sig
 /emacs-29.4.tar.xz
 /emacs-29.4.tar.xz.sig
-/emacs-30.0.91.tar.xz
-/emacs-30.0.91.tar.xz.sig
 /php-mode.el
 /results_emacs/
-/emacs-30.1.tar.xz
-/emacs-30.1.tar.xz.sig
-/emacs-30.2.tar.xz
-/emacs-30.2.tar.xz.sig

0001-Apply-display-kluge-for-PGTK-too.patch

@@ -0,0 +1,50 @@
+From 2f348ffee3777a8e2b02814d8cc50d282d98d366 Mon Sep 17 00:00:00 2001
+From: Peter Oliver <git@mavit.org.uk>
+Date: Sun, 14 Jul 2024 21:50:33 +0100
+Subject: [PATCH 1/2] Apply --display kluge for PGTK too
+
+* src/emacs.c (main): The --display option needs the same handling
+with the PGTK backend as it does with the X11 backends.  (Bug#72118)
+---
+ src/emacs.c | 4 ++--
+ src/lisp.h  | 2 +-
+ 2 files changed, 3 insertions(+), 3 deletions(-)
+
+diff --git a/src/emacs.c b/src/emacs.c
+index 712826d57b7..ec284b16f8d 100644
+--- a/src/emacs.c
++++ b/src/emacs.c
+@@ -181,7 +181,7 @@ #define MAIN_PROGRAM
+    data on the first attempt to change it inside asynchronous code.  */
+ bool running_asynch_code;
+ 
+-#if defined (HAVE_X_WINDOWS) || defined (HAVE_NS)
++#if defined (HAVE_X_WINDOWS) || defined (HAVE_PGTK) || defined (HAVE_NS)
+ /* If true, -d was specified, meaning we're using some window system.  */
+ bool display_arg;
+ #endif
+@@ -2014,7 +2014,7 @@ main (int argc, char **argv)
+   {
+     int count_before = skip_args;
+ 
+-#ifdef HAVE_X_WINDOWS
++#if defined (HAVE_X_WINDOWS) || defined (HAVE_PGTK)
+     char *displayname = 0;
+ 
+     /* Skip any number of -d options, but only use the last one.  */
+diff --git a/src/lisp.h b/src/lisp.h
+index 5fa48cec2f0..05daceb5dff 100644
+--- a/src/lisp.h
++++ b/src/lisp.h
+@@ -4889,7 +4889,7 @@ fast_c_string_match_ignore_case (Lisp_Object regexp,
+ extern char **initial_argv;
+ extern int initial_argc;
+ extern char const *emacs_wd;
+-#if defined (HAVE_X_WINDOWS) || defined (HAVE_NS)
++#if defined (HAVE_X_WINDOWS) || defined (HAVE_PGTK) || defined (HAVE_NS)
+ extern bool display_arg;
+ #endif
+ extern Lisp_Object decode_env_path (const char *, const char *, bool);
+-- 
+2.45.2
+

0001-Base-puresize.patch

@@ -0,0 +1,16 @@
+diff -ruN emacs-30.1/src/puresize.h emacs-30.1-mod4/src/puresize.h
+--- emacs-30.1/src/puresize.h	2025-02-18 21:31:36.000000000 +0300
++++ emacs-30.1-mod4/src/puresize.h	2025-05-27 14:17:15.067370990 +0300
+@@ -47,8 +47,12 @@
+ #endif
+ 
+ #ifndef BASE_PURESIZE
++#if defined __i386__
++#define BASE_PURESIZE (4500000 + SYSTEM_PURESIZE_EXTRA + SITELOAD_PURESIZE_EXTRA)
++#else
+ #define BASE_PURESIZE (3400000 + SYSTEM_PURESIZE_EXTRA + SITELOAD_PURESIZE_EXTRA)
+ #endif
++#endif
+ 
+ /* Increase BASE_PURESIZE by a ratio depending on the machine's word size.  */
+ #ifndef PURESIZE_RATIO

0001-Don-t-specify-StartupWMClass-in-emacs.desktop.patch

@@ -1,31 +0,0 @@
-From 164e45695f9784469ff2f66cafcd6bc927c246be Mon Sep 17 00:00:00 2001
-From: Peter Oliver <git@mavit.org.uk>
-Date: Tue, 18 Mar 2025 13:16:15 +0000
-Subject: [PATCH] =?UTF-8?q?Don=E2=80=99t=20specify=20StartupWMClass=20in?=
- =?UTF-8?q?=20emacs.desktop?=
-MIME-Version: 1.0
-Content-Type: text/plain; charset=UTF-8
-Content-Transfer-Encoding: 8bit
-
-See the explanation at
-https://debbugs.gnu.org/cgi/bugreport.cgi?bug=49505#67.  In summary, the
-value we were providing doesn’t work on Wayland, and the default should
-be fine.
-
-* etc/emacs.desktop: Don’t specify StartupWMClass
----
- etc/emacs.desktop | 1 -
- 1 file changed, 1 deletion(-)
-
-diff --git a/etc/emacs.desktop b/etc/emacs.desktop
-index 0d7cac14da5..16ad3c7eb48 100644
---- a/etc/emacs.desktop
-+++ b/etc/emacs.desktop
-@@ -9,4 +9,3 @@ Type=Application
- Terminal=false
- Categories=Development;TextEditor;
- StartupNotify=true
--StartupWMClass=Emacs
--- 
-2.48.1
-

0001-Fix-failing-help-fns-test.patch

@@ -0,0 +1,30 @@
+From 75ca15f2a3146b17fde5e2a50ad9102c6108ba7f Mon Sep 17 00:00:00 2001
+From: Stefan Kangas <stefankangas@gmail.com>
+Date: Sun, 23 Jun 2024 20:54:22 +0200
+Subject: [PATCH] Fix failing help-fns-test
+
+* test/lisp/help-fns-tests.el (help-fns-test-lisp-defun):
+Fix failing test.
+---
+ test/lisp/help-fns-tests.el | 5 ++---
+ 1 file changed, 2 insertions(+), 3 deletions(-)
+
+diff --git a/test/lisp/help-fns-tests.el b/test/lisp/help-fns-tests.el
+index c3e8ca49723..fabf1959658 100644
+--- a/test/lisp/help-fns-tests.el
++++ b/test/lisp/help-fns-tests.el
+@@ -63,9 +63,8 @@ help-fns-test-lisp-macro
+     (should (string-match regexp result))))
+ 
+ (ert-deftest help-fns-test-lisp-defun ()
+-  (let ((regexp (if (featurep 'native-compile)
+-                    "a native-compiled Lisp function in .+subr\\.el"
+-                  "a byte-compiled Lisp function in .+subr\\.el"))
++  (let ((regexp (rx "a " (or "byte-compiled" "native-compiled")
++                    " Lisp function in " nonl "subr.el" nonl))
+         (result (help-fns-tests--describe-function 'last)))
+     (should (string-match regexp result))))
+ 
+-- 
+2.45.2
+

0001-Fix-flymake-tests-with-GCC-14.patch

@@ -0,0 +1,28 @@
+From a769f171e7ebb8e30f198f4328d46f47fe7958fb Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Ulrich=20M=C3=BCller?= <ulm@gentoo.org>
+Date: Mon, 24 Jun 2024 15:20:26 +0200
+Subject: [PATCH] ; Fix flymake tests with GCC 14.
+
+* test/lisp/progmodes/flymake-tests.el (included-c-header-files):
+Fix test failure with GCC 14.  (Bug#71749)
+---
+ test/lisp/progmodes/flymake-tests.el | 3 ++-
+ 1 file changed, 2 insertions(+), 1 deletion(-)
+
+diff --git a/test/lisp/progmodes/flymake-tests.el b/test/lisp/progmodes/flymake-tests.el
+index 21dbb0711d2..93bc9028031 100644
+--- a/test/lisp/progmodes/flymake-tests.el
++++ b/test/lisp/progmodes/flymake-tests.el
+@@ -174,7 +174,8 @@ included-c-header-files
+     (flymake-tests--with-flymake
+         ("some-problems.h")
+       (flymake-goto-next-error)
+-      (should (eq 'flymake-warning (face-at-point)))
++      ;; implicit-int was promoted from warning to error in GCC 14
++      (should (memq (face-at-point) '(flymake-warning flymake-error)))
+       (flymake-goto-next-error)
+       (should (eq 'flymake-error (face-at-point)))
+       (should-error (flymake-goto-next-error nil nil t)))
+-- 
+2.45.2
+

0001-Fix-intermittent-failure-of-dired-test-bug27243-02.patch

@@ -0,0 +1,30 @@
+From c86645dde30fbd54ae0f187e4428a09ad75e0ba8 Mon Sep 17 00:00:00 2001
+From: Peter Oliver <git@mavit.org.uk>
+Date: Mon, 15 Jul 2024 12:03:47 +0100
+Subject: [PATCH] Fix intermittent failure of dired-test-bug27243-02
+
+* test/lisp/dired-tests.el (dired-test-bug27243-02): Exclude free disk
+space from dired listing in this test, in case it changes while it's
+running and confuses the result.
+---
+ test/lisp/dired-tests.el | 4 +++-
+ 1 file changed, 3 insertions(+), 1 deletion(-)
+
+diff --git a/test/lisp/dired-tests.el b/test/lisp/dired-tests.el
+index 2589281e5e1..ea47043dfc5 100644
+--- a/test/lisp/dired-tests.el
++++ b/test/lisp/dired-tests.el
+@@ -189,7 +189,9 @@ dired-test-bug27243-01
+ (ert-deftest dired-test-bug27243-02 ()
+   "Test for https://debbugs.gnu.org/cgi/bugreport.cgi?bug=27243#28 ."
+   (ert-with-temp-directory test-dir
+-    (let ((dired-auto-revert-buffer t) buffers)
++    (let ((dired-auto-revert-buffer t)
++          (dired-free-space nil)
++          buffers)
+       ;; On MS-Windows, get rid of 8+3 short names in test-dir, if the
+       ;; corresponding long file names exist, otherwise such names trip
+       ;; string comparisons below.
+-- 
+2.45.2
+

0001-Fix-wdired-test-unfinished-edit-01-when-temp-dirname.patch

@@ -0,0 +1,29 @@
+From 90734f5a3ba9998886e0b03382878a2fb514d015 Mon Sep 17 00:00:00 2001
+From: Peter Oliver <git@mavit.org.uk>
+Date: Fri, 12 Jul 2024 10:52:23 +0100
+Subject: [PATCH] Fix wdired-test-unfinished-edit-01 when temp dirname contains
+ "foo"
+
+* test/lisp/wdired-tests.el (wdired-test-unfinished-edit-01): Don't
+modify the random directory name if, by chance, it happens to contain
+the substring "foo".
+---
+ test/lisp/wdired-tests.el | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+diff --git a/test/lisp/wdired-tests.el b/test/lisp/wdired-tests.el
+index f7bff743058..f6d2194e998 100644
+--- a/test/lisp/wdired-tests.el
++++ b/test/lisp/wdired-tests.el
+@@ -114,7 +114,7 @@ wdired-test-unfinished-edit-01
+     (setq test-dir (file-truename test-dir))
+     (let* ((test-file (concat (file-name-as-directory test-dir) "foo.c"))
+            (replace "bar")
+-           (new-file (string-replace "foo" replace test-file)))
++           (new-file (string-replace "/foo" (concat "/" replace) test-file)))
+       (write-region "" nil test-file nil 'silent)
+       (let ((buf (find-file-noselect test-dir)))
+         (unwind-protect
+-- 
+2.45.2
+

0001-Skip-failing-tests.patch

@@ -0,0 +1,68 @@
+diff -ruN emacs-30.1/test/lisp/emacs-lisp/lisp-mnt-tests.el emacs-30.1-mod/test/lisp/emacs-lisp/lisp-mnt-tests.el
+--- emacs-30.1/test/lisp/emacs-lisp/lisp-mnt-tests.el	2025-02-18 21:31:36.000000000 +0300
++++ emacs-30.1-mod/test/lisp/emacs-lisp/lisp-mnt-tests.el	2025-05-25 09:22:08.042761149 +0300
+@@ -31,6 +31,7 @@
+                    ("Mats Lidell" . "matsl@gnu.org")))))
+ 
+ (ert-deftest lm--tests-lm-package-requires ()
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (with-temp-buffer
+     (insert ";; Package-Requires: ((emacs 29.1))")
+     (should (equal (lm-package-requires) '((emacs 29.1)))))
+diff -ruN emacs-30.1/test/lisp/emacs-lisp/package-tests.el emacs-30.1-mod/test/lisp/emacs-lisp/package-tests.el
+--- emacs-30.1/test/lisp/emacs-lisp/package-tests.el	2025-02-18 21:31:36.000000000 +0300
++++ emacs-30.1-mod/test/lisp/emacs-lisp/package-tests.el	2025-05-25 09:20:39.979057989 +0300
+@@ -220,6 +220,7 @@
+ 
+ (ert-deftest package-test-desc-from-buffer ()
+   "Parse an elisp buffer to get a `package-desc' object."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (with-package-test (:basedir (ert-resource-directory)
+                       :file "simple-single-1.3.el")
+     (let ((pi (package-buffer-info)))
+@@ -849,6 +850,7 @@
+ 
+ (ert-deftest package-x-test-upload-buffer ()
+   "Test creating an \"archive-contents\" file"
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (with-package-test (:basedir (ert-resource-directory)
+                                :file "simple-single-1.3.el"
+                                :upload-base t)
+@@ -882,6 +884,7 @@
+ 
+ (ert-deftest package-x-test-upload-new-version ()
+   "Test uploading a new version of a package"
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (with-package-test (:basedir (ert-resource-directory)
+                                :file "simple-single-1.3.el"
+                                :upload-base t)
+diff -ruN emacs-30.1/test/lisp/eshell/esh-var-tests.el emacs-30.1-mod/test/lisp/eshell/esh-var-tests.el
+--- emacs-30.1/test/lisp/eshell/esh-var-tests.el	2025-02-18 21:31:36.000000000 +0300
++++ emacs-30.1-mod/test/lisp/eshell/esh-var-tests.el	2025-05-25 17:38:24.332568272 +0300
+@@ -262,6 +262,7 @@
+ 
+ (ert-deftest esh-var-test/interp-temp-cmd ()
+   "Interpolate command result redirected to temp file."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (eshell-command-result-equal "cat $<echo hi>" "hi"))
+ 
+ (ert-deftest esh-var-test/interp-concat-lisp ()
+diff -ruN emacs-30.1/test/lisp/proced-tests.el emacs-30.1-mod/test/lisp/proced-tests.el
+--- emacs-30.1/test/lisp/proced-tests.el	2025-02-18 01:38:58.000000000 +0300
++++ emacs-30.1-mod/test/lisp/proced-tests.el	2025-05-25 15:50:54.429876499 +0300
+@@ -115,6 +115,7 @@
+      (proced--assert-emacs-pid-in-buffer))))
+ 
+ (ert-deftest proced-refine-test ()
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   ;; %CPU is not implemented on macOS
+   (skip-when (eq system-type 'darwin))
+   (proced--within-buffer
+@@ -130,6 +131,7 @@
+        (forward-line)))))
+ 
+ (ert-deftest proced-refine-with-update-test ()
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-when (eq system-type 'darwin))
+   (proced--within-buffer
+    'verbose

0001-Skip-tree-sitter-tests.patch

@@ -0,0 +1,241 @@
+diff -ruN emacs-30.1/test/src/treesit-tests.el emacs-30.1-mod/test/src/treesit-tests.el
+--- emacs-30.1/test/src/treesit-tests.el	2025-02-18 21:31:36.000000000 +0300
++++ emacs-30.1-mod/test/src/treesit-tests.el	2025-05-25 08:15:40.255043945 +0300
+@@ -62,6 +62,7 @@
+ 
+ (ert-deftest treesit-basic-parsing ()
+   "Test basic parsing routines."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (with-temp-buffer
+     (let ((parser (treesit-parser-create 'json)))
+@@ -89,6 +90,7 @@
+ 
+ (ert-deftest treesit-node-api ()
+   "Tests for node API."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (with-temp-buffer
+     (let (parser root-node doc-node object-node pair-node)
+@@ -190,6 +192,7 @@
+ 
+ (ert-deftest treesit-indirect-buffer ()
+   "Tests for indirect buffers."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (let ((base (get-buffer-create "*treesit test*"))
+         parser indirect)
+@@ -226,6 +229,7 @@
+ 
+ (ert-deftest treesit-search-subtree ()
+   "Test `treesit-search-subtree'."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (with-temp-buffer
+     (let (parser root array)
+@@ -269,6 +273,7 @@
+ (defmacro treesit--ert-search-setup (&rest body)
+   "Setup macro used by `treesit-search-forward' and friends.
+ BODY is the test body."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (declare (debug (&rest form)))
+   `(with-temp-buffer
+      (let (parser root array)
+@@ -282,6 +287,7 @@
+ 
+ (ert-deftest treesit-search-forward ()
+   "Test `treesit-search-forward'."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (treesit--ert-search-setup
+    (cl-loop for cursor = (treesit-node-child array 0)
+@@ -299,6 +305,7 @@
+ 
+ (ert-deftest treesit-search-forward-named-only ()
+   "Test `treesit-search-forward'."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (treesit--ert-search-setup
+    (cl-loop for cursor = (treesit-node-child
+@@ -314,6 +321,7 @@
+ 
+ (ert-deftest treesit-search-backward ()
+   "Test `treesit-search-forward'."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (treesit--ert-search-setup
+    (cl-loop for cursor = (treesit-node-child array -1)
+@@ -332,6 +340,7 @@
+ 
+ (ert-deftest treesit-search-backward-named-only ()
+   "Test `treesit-search-forward'."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (treesit--ert-search-setup
+    (cl-loop for cursor = (treesit-node-child
+@@ -347,6 +356,7 @@
+ 
+ (ert-deftest treesit-search-forward-predicate ()
+   "Test various form of supported predicates in search functions."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (treesit--ert-search-setup
+    ;; The following tests are adapted from `treesit-search-forward'.
+@@ -388,6 +398,7 @@
+ 
+ (ert-deftest treesit-search-forward-predicate-invalid-predicate ()
+   "Test tree-sitter's ability to detect invalid predicates."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (treesit--ert-search-setup
+    (dolist (pred '( 1 (not 1) (not "2" "3") (or) (or 1) 'a))
+@@ -400,6 +411,7 @@
+ 
+ (ert-deftest treesit-cursor-helper-with-missing-node ()
+   "Test treesit_cursor_helper with a missing node."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (treesit--ert-search-setup
+    (delete-char -1)
+@@ -416,6 +428,7 @@
+ 
+ (ert-deftest treesit-query-api ()
+   "Tests for query API."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (with-temp-buffer
+     (let (parser root-node)
+@@ -481,6 +494,7 @@
+ 
+ (ert-deftest treesit-narrow ()
+   "Tests if narrowing works."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (with-temp-buffer
+     (let (parser)
+@@ -538,6 +552,7 @@
+ edits like this don't produce assertion errors.  (I inserted a
+ bunch of assertions that checks e.g. visible_beg <=
+ visible_end.)"
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (with-temp-buffer
+     (let (parser)
+@@ -619,6 +634,7 @@
+ 
+ (ert-deftest treesit-range ()
+   "Tests if range works."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (with-temp-buffer
+     (let (parser)
+@@ -672,6 +688,7 @@
+ 
+ (ert-deftest treesit-range-offset ()
+   "Tests if range offsets work."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'javascript))
+   (with-temp-buffer
+     (let ((query '(((call_expression (identifier) @_html_template_fn
+@@ -686,11 +703,13 @@
+ 
+ (ert-deftest treesit-range-merge ()
+   "Test merging ranges."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (should (equal (treesit--merge-ranges '((1 . 1) (3 . 483)) nil 1 488)
+                  nil)))
+ 
+ (ert-deftest treesit-range-fixup-after-edit ()
+   "Tests if Emacs can fix OOB ranges after deleting text or narrowing."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (with-temp-buffer
+     (let ((parser (treesit-parser-create 'json)))
+@@ -752,6 +771,7 @@
+ 
+ (ert-deftest treesit-multi-lang ()
+   "Tests if parsing multiple language works."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (and (treesit-language-available-p 'html)
+                     (treesit-language-available-p 'css)
+                     (treesit-language-available-p 'javascript)))
+@@ -790,6 +810,7 @@
+ 
+ (ert-deftest treesit-parser-supplemental ()
+   "Supplemental node functions."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   ;; `treesit-parse-string'.
+   (should (equal (treesit-node-string
+@@ -809,6 +830,7 @@
+ 
+ (ert-deftest treesit-node-supplemental ()
+   "Supplemental node functions."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (let (parser root-node doc-node)
+     (progn
+@@ -859,6 +881,7 @@
+ 
+ (ert-deftest treesit-node-at ()
+   "Test `treesit-node-at'."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (let (parser)
+     (progn
+@@ -889,6 +912,7 @@
+ 
+ (ert-deftest treesit-node-check ()
+   "Test `treesit-node-check'."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'json))
+   (let (parser root-node array-node comment-node)
+     (progn
+@@ -1184,6 +1208,7 @@
+ 
+ (ert-deftest treesit-defun-navigation-nested-2 ()
+   "Test defun navigation using `js-ts-mode'."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'javascript))
+   ;; Nested defun navigation
+   (require 'js)
+@@ -1195,6 +1220,7 @@
+ 
+ (ert-deftest treesit-defun-navigation-nested-3 ()
+   "Test defun navigation using `bash-ts-mode'."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'bash))
+   ;; Nested defun navigation
+   (treesit--ert-test-defun-navigation
+@@ -1208,6 +1234,7 @@
+ (ert-deftest treesit-defun-navigation-nested-4 ()
+   "Test defun navigation using Elixir.
+ This tests bug#60355."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'elixir))
+   ;; Nested defun navigation
+   (let ((pred (lambda (node)
+@@ -1224,6 +1251,7 @@
+ 
+ (ert-deftest treesit-defun-navigation-top-level ()
+   "Test top-level only defun navigation."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'python))
+   ;; Nested defun navigation
+   (require 'python)
+@@ -1235,6 +1263,7 @@
+ 
+ (ert-deftest treesit-search-subtree-forward-1 ()
+   "Test search subtree forward."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'python))
+   (require 'python)
+   (python-ts-mode)
+@@ -1252,6 +1281,7 @@
+ 
+ (ert-deftest treesit-search-subtree-backward-1 ()
+   "Test search subtree with backward=t."
++  (skip-when (getenv "RPM_BUILD_ROOT"))
+   (skip-unless (treesit-language-available-p 'python))
+   (require 'python)
+   (python-ts-mode)

0001-Support-Tree-sitter-version-0.26-and-later.patch

@@ -1,106 +0,0 @@
-From 16f0be6354ea13331859c861fa7d423a0b54bec7 Mon Sep 17 00:00:00 2001
-From: Eli Zaretskii <eliz@gnu.org>
-Date: Fri, 17 Oct 2025 14:15:41 +0300
-Subject: [PATCH] Support Tree-sitter version 0.26 and later
-
-* src/treesit.c (init_treesit_functions)
-[TREE_SITTER_LANGUAGE_VERSION >= 15]: Define prototype for, and
-load 'ts_language_abi_version' instead of the deprecated (and
-removed in tree-sitter 0.26) 'ts_language_version'.
-(ts_language_abi_version) [TREE_SITTER_LANGUAGE_VERSION >= 15]:
-Define on WINDOWSNT, instead of 'ts_language_version'.
-(treesit_language_abi_version): New compatibility function.
-(treesit_load_language, Ftreesit_language_abi_version): Use
-'treesit_language_abi_version' instead of 'ts_language_version'.
-(Bug#79627)
----
- src/treesit.c | 34 +++++++++++++++++++++++++++++++++-
- 1 file changed, 33 insertions(+), 1 deletion(-)
-
-diff --git a/src/treesit.c b/src/treesit.c
-index e2986c186b8..4d6bf9a5dbd 100644
---- a/src/treesit.c
-+++ b/src/treesit.c
-@@ -34,7 +34,11 @@ Copyright (C) 2021-2025 Free Software Foundation, Inc.
- # include "w32common.h"
- 
- /* In alphabetical order.  */
-+#if TREE_SITTER_LANGUAGE_VERSION >= 15
-+#undef ts_language_abi_version
-+#else
- #undef ts_language_version
-+#endif
- #undef ts_node_child
- #undef ts_node_child_by_field_name
- #undef ts_node_child_count
-@@ -89,7 +93,11 @@ Copyright (C) 2021-2025 Free Software Foundation, Inc.
- #undef ts_tree_get_changed_ranges
- #undef ts_tree_root_node
- 
-+#if TREE_SITTER_LANGUAGE_VERSION >= 15
-+DEF_DLL_FN (uint32_t, ts_language_abi_version, (const TSLanguage *));
-+#else
- DEF_DLL_FN (uint32_t, ts_language_version, (const TSLanguage *));
-+#endif
- DEF_DLL_FN (TSNode, ts_node_child, (TSNode, uint32_t));
- DEF_DLL_FN (TSNode, ts_node_child_by_field_name,
- 	    (TSNode, const char *, uint32_t));
-@@ -166,7 +174,11 @@ init_treesit_functions (void)
-   if (!library)
-     return false;
- 
-+#if TREE_SITTER_LANGUAGE_VERSION >= 15
-+  LOAD_DLL_FN (library, ts_language_abi_version);
-+#else
-   LOAD_DLL_FN (library, ts_language_version);
-+#endif
-   LOAD_DLL_FN (library, ts_node_child);
-   LOAD_DLL_FN (library, ts_node_child_by_field_name);
-   LOAD_DLL_FN (library, ts_node_child_count);
-@@ -224,7 +236,11 @@ init_treesit_functions (void)
-   return true;
- }
- 
-+#if TREE_SITTER_LANGUAGE_VERSION >= 15
-+#define ts_language_abi_version fn_ts_language_abi_version
-+#else
- #define ts_language_version fn_ts_language_version
-+#endif
- #define ts_node_child fn_ts_node_child
- #define ts_node_child_by_field_name fn_ts_node_child_by_field_name
- #define ts_node_child_count fn_ts_node_child_count
-@@ -632,6 +648,22 @@ treesit_load_language_push_for_each_suffix (Lisp_Object lib_base_name,
-     }
- }
- 
-+/* This function is a compatibility shim.  Tree-sitter 0.25 introduced
-+   ts_language_abi_version as a replacement for ts_language_version, and
-+   tree-sitter 0.26 removed ts_language_version.  Here we use the fact
-+   that 0.25 bumped TREE_SITTER_LANGUAGE_VERSION to 15, to use the new
-+   function instead of the old one, when Emacs is compiled against
-+   tree-sitter version 0.25 or newer.  */
-+static uint32_t
-+treesit_language_abi_version (const TSLanguage *ts_lang)
-+{
-+#if TREE_SITTER_LANGUAGE_VERSION >= 15
-+  return ts_language_abi_version (ts_lang);
-+#else
-+  return ts_language_version (ts_lang);
-+#endif
-+}
-+
- /* Load the dynamic library of LANGUAGE_SYMBOL and return the pointer
-    to the language definition.
- 
-@@ -817,7 +849,7 @@ DEFUN ("treesit-language-abi-version", Ftreesit_language_abi_version,
- 						       &signal_data);
-       if (ts_language == NULL)
- 	return Qnil;
--      uint32_t version =  ts_language_version (ts_language);
-+      uint32_t version =  treesit_language_abi_version (ts_language);
-       return make_fixnum((ptrdiff_t) version);
-     }
- }
--- 
-2.52.0
-

0002-Test-eshell-test-subcommand-reset-in-pipeline-is-uns.patch

@@ -0,0 +1,25 @@
+From 8ae158173d1d748d55e2605c04d33a95739e055c Mon Sep 17 00:00:00 2001
+From: Peter Oliver <git@mavit.org.uk>
+Date: Mon, 15 Jul 2024 16:17:38 +0100
+Subject: [PATCH 2/3] Test eshell-test/subcommand-reset-in-pipeline is unstable
+
+Could be related to https://debbugs.gnu.org/cgi/bugreport.cgi?bug=65602
+---
+ test/lisp/eshell/eshell-tests.el | 1 +
+ 1 file changed, 1 insertion(+)
+
+diff --git a/test/lisp/eshell/eshell-tests.el b/test/lisp/eshell/eshell-tests.el
+index 3812a4117ac..8c13d4af237 100644
+--- a/test/lisp/eshell/eshell-tests.el
++++ b/test/lisp/eshell/eshell-tests.el
+@@ -79,6 +79,7 @@ eshell-test/pipe-subcommand-with-pipe
+ 
+ (ert-deftest eshell-test/subcommand-reset-in-pipeline ()
+   "Check that subcommands reset `eshell-in-pipeline-p'."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-unless (executable-find "cat"))
+   (dolist (template '("echo {%s} | *cat"
+                       "echo ${%s} | *cat"
+-- 
+2.45.2
+

0003-Mark-multiple-mml-sec-tests-as-unstable-when-built-i.patch

@@ -0,0 +1,84 @@
+From bf512d1bad98bcd1dc87da93fd2e7f415be14501 Mon Sep 17 00:00:00 2001
+From: Peter Oliver <git@mavit.org.uk>
+Date: Mon, 15 Jul 2024 16:19:10 +0100
+Subject: [PATCH 3/4] Mark multiple mml-sec tests as unstable when built in an
+ RPM
+
+* test/lisp/gnus/mml-sec-tests.el: Mark unstable tests which have been
+seen to intermittently fail at
+https://koji.fedoraproject.org/koji/packageinfo?packageID=560
+---
+ test/lisp/gnus/mml-sec-tests.el | 8 ++++++++
+ 1 file changed, 8 insertions(+)
+
+diff --git a/test/lisp/gnus/mml-sec-tests.el b/test/lisp/gnus/mml-sec-tests.el
+index 7abd1bd65a3..2bd52bf3ee0 100644
+--- a/test/lisp/gnus/mml-sec-tests.el
++++ b/test/lisp/gnus/mml-sec-tests.el
+@@ -210,6 +210,7 @@ mml-secure-test-key-fixture
+ 
+ (ert-deftest mml-secure-key-checks ()
+   "Test mml-secure-check-user-id and mml-secure-check-sub-key on sample keys."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-unless (test-conf))
+   (mml-secure-test-fixture
+    (lambda ()
+@@ -278,6 +279,7 @@ mml-secure-key-checks
+ 
+ (ert-deftest mml-secure-find-usable-keys-1 ()
+   "Make sure that expired and disabled keys and revoked UIDs are not used."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-unless (test-conf))
+   (mml-secure-test-fixture
+    (lambda ()
+@@ -317,6 +319,7 @@ mml-secure-find-usable-keys-1
+ 
+ (ert-deftest mml-secure-find-usable-keys-2 ()
+   "Test different ways to search for keys."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-unless (test-conf))
+   (mml-secure-test-fixture
+    (lambda ()
+@@ -369,6 +372,7 @@ mml-secure-find-usable-keys-2
+ 
+ (ert-deftest mml-secure-select-preferred-keys-1 ()
+   "If only one key exists for an e-mail address, it is the preferred one."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-unless (test-conf))
+   (mml-secure-test-fixture
+    (lambda ()
+@@ -380,6 +384,7 @@ mml-secure-select-preferred-keys-1
+ 
+ (ert-deftest mml-secure-select-preferred-keys-2 ()
+   "If multiple keys exists for an e-mail address, customization is necessary."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-unless (test-conf))
+   (mml-secure-test-fixture
+    (lambda ()
+@@ -407,6 +412,7 @@ mml-secure-select-preferred-keys-2
+ 
+ (ert-deftest mml-secure-select-preferred-keys-3 ()
+   "Expired customized keys are removed if multiple keys are available."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-unless (test-conf))
+   (mml-secure-test-fixture
+    (lambda ()
+@@ -581,6 +587,7 @@ mml-secure-test-en-decrypt-with-passphrase
+ (ert-deftest mml-secure-en-decrypt-1 ()
+   "Encrypt message; then decrypt and test for expected result.
+ In this test, the single matching key is chosen automatically."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-unless (test-conf))
+   (dolist (method (enc-standards) nil)
+     ;; no-exp@example.org with single encryption key
+@@ -625,6 +632,7 @@ mml-secure-en-decrypt-3
+ (ert-deftest mml-secure-en-decrypt-4 ()
+   "Encrypt message; then decrypt and test for expected result.
+ In this test, encrypt-to-self variables are set to lists."
++  :tags (if (getenv "RPM_BUILD_ROOT") '(:unstable))
+   (skip-unless (test-conf))
+   ;; Send from sub@example.org, which has two keys; encrypt to both.
+   (let ((mml-secure-openpgp-encrypt-to-self
+-- 
+2.47.0
+

0004-Try-harder-to-stabalise-dired-test-bug27243-02.patch

@@ -0,0 +1,38 @@
+From e0f0549ac6766ab565dbd581098b96792a807727 Mon Sep 17 00:00:00 2001
+From: Peter Oliver <git@mavit.org.uk>
+Date: Wed, 17 Jul 2024 00:06:02 +0100
+Subject: [PATCH 4/4] Try harder to stabalise dired-test-bug27243-02
+
+* test/lisp/dired-tests.el (dired-test-bug27243-02): Don't rely on the
+expected point, since columns will move if the size of the parent directory
+changes order of magnitude.
+---
+ test/lisp/dired-tests.el | 5 +++--
+ 1 file changed, 3 insertions(+), 2 deletions(-)
+
+diff --git a/test/lisp/dired-tests.el b/test/lisp/dired-tests.el
+index ea47043dfc5..6078e99e13c 100644
+--- a/test/lisp/dired-tests.el
++++ b/test/lisp/dired-tests.el
+@@ -190,7 +190,6 @@ dired-test-bug27243-02
+   "Test for https://debbugs.gnu.org/cgi/bugreport.cgi?bug=27243#28 ."
+   (ert-with-temp-directory test-dir
+     (let ((dired-auto-revert-buffer t)
+-          (dired-free-space nil)
+           buffers)
+       ;; On MS-Windows, get rid of 8+3 short names in test-dir, if the
+       ;; corresponding long file names exist, otherwise such names trip
+@@ -216,7 +215,9 @@ dired-test-bug27243-02
+             ;; Sanity check: point should now be back on the subdirectory.
+             (should (eq (point) pt1))
+             (push (dired test-dir) buffers)
+-            (should (eq (point) pt1)))
++            (should (equal (dired-file-name-at-point)
++                           (concat (file-name-as-directory test-dir)
++                                   (file-name-as-directory "test-subdir")))))
+         (dolist (buf buffers)
+           (when (buffer-live-p buf) (kill-buffer buf)))))))
+ 
+-- 
+2.45.2
+

12BB9B400EE3F77282864D18272B5C54E015416A

@@ -1,31 +0,0 @@
------BEGIN PGP PUBLIC KEY BLOCK-----
-Comment: 12BB 9B40 0EE3 F772 8286  4D18 272B 5C54 E015 416A
-Comment: Andrea Corallo <acorallo@gnu.org>
-
-xsFNBGa/sd8BEAC7hQAGte6YvxDaiTutpSkVrb+zJBGcEW/AroE/dduBn8mfxa/Y
-i71C2GV/y03aibdaO+cXPULAkkuJVDnFk57hn3w9zo98LzqDSEgNFcAUSSSQdyj7
-Wn3J26doRpFQKnv3dbx1yZRZccbLgt/AH6hzhvNjFbYZ53LYE9rKzUYLTNHDhUI4
-QTda2PvgWoySXcjBKhyIgg9zZLSc2w4ZwhO9WDVai58xNsl+YyU2HqVPpJZSCX0j
-liIooHOEL2D601ByrWmePRGFR0tD6V9xj5jWuusErb78r57NOPsRCRKCKcg/v/kl
-fA5+byvanw27PDa8zoheXgF41uDf96keOQPBve3TE1Oy4x+G55zuP9KNQ5aSCG49
-x0Cc7BET23JmiWUnz1GUbM7vka5ell+smmq+kTDtK47L+4N954a6CR0esPLJMLF6
-Ub2y8SY2XPn1Bv8lsN77f0L5yyhnK72H+mf4fS/qjJlN0F+DWx49Z8it9rbG8Atc
-X6Vqzv5qaDPbCpAqdqs2qrv3nAdvYOlwxmVh6Hxq1EOFT2v49dmn3viVBNnuT7yW
-tyvpTDyvfLKOnfH+OLLuqPUFZnxt8mU8ieNEnvIYojSOFyddJAh2uOI3sqjLHrDg
-PRAYFv9jp7K7pk+S054mdF31qD+TTxjWQtNI8Sxh/Q71Vtz7JyqYWd/JCQARAQAB
-zSFBbmRyZWEgQ29yYWxsbyA8YWNvcmFsbG9AZ251Lm9yZz7CwZQEEwEKAD4WIQQS
-u5tADuP3coKGTRgnK1xU4BVBagUCZr+x3wIbAwUJA8JnAAULCQgHAgYVCgkICwIE
-FgIDAQIeAQIXgAAKCRAnK1xU4BVBaj/0D/4ogwPjg6Cwyi8pmRYx9gOjQNIRtjOb
-2aHFYQs9luFy20Wlt/7QtelDH+NLCAb5PKvhDI3Sw+SIoheAndhbzqW7GEW5J9G7
-10PPkCUCjbicJOKsUkMv03wS6IrelUYzgjbmGYRo2vYcSb+BHXQR4MuxDSL/2vPD
-LHYKwij9K+FozgJVfjq5n97l/wsGsc/orRiST23ykiXyCZweulGLhXnoCghHrnB1
-B+xBaCv3P1GW/BZZgXGPQ+1XMOsFlP951vfjirlHnJMvMDkMkNhT6Qh282jTokWN
-TVQqKUv5tpdNkId+QmUhzC+DcfoOsegB3wWa6VQ/w1cG9mkoPUTT8Y8fo4FXnWwV
-U4472JuZdQYFDAKEnTsW1TRNgBb5xLNNCUmDUVDndgn1WtZIZx18QBtJ1CHhycaN
-C68McWuvvENhEM8clUXIHundgeDce4gcQC23Un7NT0PbNTwvGPfBSaoVax5ZVHuZ
-Tr2pTHqAqqi4YLnrE5R06OIWQzVOVs5NZplDPZGXZOxryXa3ssLxjL2VYbo4AAUZ
-h3fyVOzNHlGLT3Egj4XHDuDFcswUimD5SmrqQQwg94CgXExDisqH9Uo8L7Zxf/AG
-UpIsxpDv219GOdTffbzl01W6oaP4obiTwMFUaQ7ljdCfq19KYdo576touTU+/48q
-7AjjL28Eznhz0Q==
-=goOm
------END PGP PUBLIC KEY BLOCK-----

default.el

@@ -1,13 +1,7 @@
-;;; default.el --- loaded after ".emacs" on startup -*- lexical-binding: t -*-
-
-;;; Commentary:
-;;
-;; Setting `inhibit-default-init' non-nil in "~/.emacs"
-;; prevents loading of this file.  Also the "-q" option to "emacs"
-;; prevents both "~/.emacs" and this file from being loaded at startup.
-
-;;; Code:
+;;; default.el - loaded after ".emacs" on startup
+;;;
+;;; Setting `inhibit-default-init' non-nil in "~/.emacs"
+;;; prevents loading of this file.  Also the "-q" option to emacs
+;;; prevents both "~/.emacs" and this file from being loaded at startup.
 
 (setq-default smime-CA-directory "/etc/ssl/certs")
-
-;;; default.el ends here

dotemacs.el

@@ -1,4 +1,4 @@
-;;; -*- lexical-binding: t -*-
+;; .emacs
 
 (custom-set-variables
  ;; uncomment to always end a file with a newline

emacs-desktop.patch

@@ -0,0 +1,26 @@
+From 90e902854c53c6ab5ef8711af27f42fbc77d9ffe Mon Sep 17 00:00:00 2001
+From: Peter Oliver <git@mavit.org.uk>
+Date: Mon, 10 Apr 2023 20:55:54 +0100
+Subject: [PATCH] Use a wrapper to avoid the pure GTK build on X11, where it is
+ unsupported.
+
+---
+ etc/emacs.desktop | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+diff --git a/etc/emacs.desktop b/etc/emacs.desktop
+index 0d7cac14da5..eabc78bb884 100644
+--- a/etc/emacs.desktop
++++ b/etc/emacs.desktop
+@@ -3,7 +3,7 @@ Name=Emacs
+ GenericName=Text Editor
+ Comment=Edit text
+ MimeType=text/english;text/plain;text/x-makefile;text/x-c++hdr;text/x-c++src;text/x-chdr;text/x-csrc;text/x-java;text/x-moc;text/x-pascal;text/x-tcl;text/x-tex;application/x-shellscript;text/x-c;text/x-c++;
+-Exec=emacs %F
++Exec=emacs-desktop %F
+ Icon=emacs
+ Type=Application
+ Terminal=false
+-- 
+2.39.2
+

emacs-desktop.sh

@@ -1,39 +1,16 @@
-#!/usr/bin/bash
+#!/bin/sh
 
 # The pure GTK build of emacs is not supported on X11, so try to avoid
-# using it there if there is another alternative.
+# using if there is an alternative.
 
-preferred="$(readlink -f /usr/bin/emacs)"
-
-if [[ $XDG_SESSION_TYPE == 'x11' ]]; then
-    case "$preferred" in
-    *-pgtk)
-        for variant in gtk+x11 lucid; do
-            if type "emacs-$variant" >/dev/null; then
-                exec -a emacs "emacs-$variant" "$@"
-            fi
-        done
-        ;;
-    */emacs-desktop)
-        # If this wrapper script is itself the preferred alternative,
-        # select something suitable from the options available.
-        for variant in gtk+x11 lucid pgtk nw; do
-            if type "emacs-$variant" >/dev/null; then
-                exec -a emacs "emacs-$variant" "$@"
-            fi
-        done
-        exit 2
-        ;;
-    esac
-else
-    case "$preferred" in
-    */emacs-desktop)
-        for variant in pgtk gtk+x11 lucid nw; do
-            if type "emacs-$variant" >/dev/null; then
-                exec -a emacs "emacs-$variant" "$@"
-            fi
-        done
-        exit 2
+if [ "$XDG_SESSION_TYPE" = 'x11' ]; then
+    case "$(readlink -f /usr/bin/emacs)" in
+    */emacs-*.*-pgtk)
+        if type emacs-gtk+x11 >/dev/null; then
+            exec emacs-gtk+x11 "$@"
+        elif type emacs-lucid >/dev/null; then
+            exec emacs-lucid "$@"
+        fi
         ;;
     esac
 fi

emacs-pgtk-on-x-error-message.patch

@@ -1,26 +1,13 @@
-From eaaf4883aee50974eeb03e529a29585f8ddc1d9d Mon Sep 17 00:00:00 2001
-From: Bhavin Gandhi <bhavin192@geeksocket.in>
-Date: Wed, 31 May 2023 22:44:54 +0530
-Subject: [PATCH] Add package names to PGTK on X error message
-
----
- src/pgtkterm.c | 3 ++-
- 1 file changed, 2 insertions(+), 1 deletion(-)
-
-diff --git a/src/pgtkterm.c b/src/pgtkterm.c
-index c00e13550bd..ce51bff5947 100644
---- a/src/pgtkterm.c
-+++ b/src/pgtkterm.c
-@@ -6680,7 +6680,8 @@ pgtk_display_x_warning (GdkDisplay *display)
+diff -ruN emacs-30.1/src/pgtkterm.c emacs-30.1-mod3/src/pgtkterm.c
+--- emacs-30.1/src/pgtkterm.c	2025-02-18 21:31:36.000000000 +0300
++++ emacs-30.1-mod3/src/pgtkterm.c	2025-05-25 19:12:51.952225248 +0300
+@@ -7000,7 +7000,8 @@
  			  " System.  That configuration is unsupported and\n"
  			  " will lead to sporadic crashes during transfer of\n"
  			  " large selection data.  It will also lead to\n"
 -			  " various problems with keyboard input.\n");
 +			  " various problems with keyboard input.\n"
-+			  "\nInstall emacs-gtk+x11 or emacs-lucid package.\n");
++			  " Install emacs-gtk+x11 or emacs-lucid package.\n");
    gtk_label_set_line_wrap (GTK_LABEL (label), TRUE);
    gtk_container_add (GTK_CONTAINER (content_area), label);
    gtk_widget_show (label);
--- 
-2.40.1
-

emacs-system-crypto-policies.patch

@@ -1,6 +1,7 @@
---- a/src/gnutls.c     2016-01-24 10:29:58.000000000 +0100
-+++ b/src/gnutls.c     2016-02-02 09:32:28.477274274 +0100
-@@ -1557,8 +1557,8 @@
+diff -ruN emacs-30.1/src/gnutls.c emacs-30.1-mod2/src/gnutls.c
+--- emacs-30.1/src/gnutls.c	2025-02-18 21:31:36.000000000 +0300
++++ emacs-30.1-mod2/src/gnutls.c	2025-05-25 18:56:46.143142320 +0300
+@@ -1974,7 +1974,7 @@
    gnutls_certificate_credentials_t x509_cred = NULL;
    gnutls_anon_client_credentials_t anon_cred = NULL;
    Lisp_Object global_init;
@@ -9,4 +10,3 @@
    char *c_hostname;
    const char *c_pass;
  
-   /* Placeholders for the property list elements.  */

emacs.spec

@@ -8,29 +8,22 @@
 Summary:       GNU Emacs text editor
 Name:          emacs
 Epoch:         1
-Version:       30.2
+Version:       30.1
 Release:       %autorelease
 License:       GPL-3.0-or-later AND CC0-1.0
 URL:           https://www.gnu.org/software/emacs/
-%if %{lua: print(select(3, string.find(rpm.expand('%version'), '%d+%.%d+%.(%d+)')) or 0)} >= 90
-Source0:       https://alpha.gnu.org/gnu/emacs/pretest/emacs-%{version}.tar.xz
-Source1:       https://alpha.gnu.org/gnu/emacs/pretest/emacs-%{version}.tar.xz.sig
-%else
 Source0:       https://ftp.gnu.org/gnu/emacs/emacs-%{version}.tar.xz
 Source1:       https://ftp.gnu.org/gnu/emacs/emacs-%{version}.tar.xz.sig
-%endif
-Source100:     https://keys.openpgp.org/vks/v1/by-fingerprint/17E90D521672C04631B1183EE78DAE0F3115E06B
-Source101:     https://keys.openpgp.org/vks/v1/by-fingerprint/CEA1DE21AB108493CC9C65742E82323B8F4353EE
-Source102:     https://keys.openpgp.org/vks/v1/by-fingerprint/12BB9B400EE3F77282864D18272B5C54E015416A
-
+Source2:       https://keys.openpgp.org/vks/v1/by-fingerprint/17E90D521672C04631B1183EE78DAE0F3115E06B
+Source3:       https://keys.openpgp.org/vks/v1/by-fingerprint/CEA1DE21AB108493CC9C65742E82323B8F4353EE
 Source4:       dotemacs.el
 Source5:       site-start.el
 Source6:       default.el
+# Emacs Terminal Mode, #551949, #617355
+Source7:       emacs-terminal.desktop
+Source8:       emacs-terminal.sh
 Source9:       emacs-desktop.sh
 
-Source10:      emacs_lisp.attr
-Source11:      emacs_lisp.rec
-
 # Avoid trademark issues
 Patch:         0001-Pong-and-Tetris-are-excluded.patch
 
@@ -43,25 +36,27 @@ Patch:         emacs-system-crypto-policies.patch
 # => remove it if we stop using this patch
 Patch:         emacs-libdir-vs-systemd.patch
 
-# Hint what to do to avoid using the pure GTK build on X11, where it is
-# unsupported:
+# Avoid using the pure GTK build on X11 where it is unsupported:
+Patch:         emacs-desktop.patch
 Patch:         emacs-pgtk-on-x-error-message.patch
 
+# Increase BASE_PURESIZE, can likely be removed in next release
+# as no longer on development branch
+# https://lists.gnu.org/archive/html/emacs-devel/2025-02/txtMuC0fL80Sf.txt
+# https://lists.gnu.org/archive/html/emacs-devel/2025-02/msg01027.html
+Patch:          0001-Base-puresize.patch
+
+# Skip failing tests
+Patch:          0001-Skip-failing-tests.patch
+
+# Skip intermittently failing tests
+Patch:          0003-Mark-multiple-mml-sec-tests-as-unstable-when-built-i.patch
+
 # Workaround for https://bugzilla.redhat.com/show_bug.cgi?id=2276822
 # (https://debbugs.gnu.org/cgi/bugreport.cgi?bug=63555).  If GDK ever
 # gets any new backends, this patch may need extending.
 Patch:         0002-Fall-back-to-the-terminal-from-pure-GTK-when-no-disp.patch
 
-# Don't override StartupWMClass.  The overriding value doesn't work on
-# Wayland, and the default should be fine.
-# https://debbugs.gnu.org/cgi/bugreport.cgi?bug=49505#67
-Patch:         0001-Don-t-specify-StartupWMClass-in-emacs.desktop.patch
-
-# Don't wait for Emacs 31 before updating to Tree-sitter 0.26.
-# https://debbugs.gnu.org/cgi/bugreport.cgi?bug=63555
-# https://bugzilla.redhat.com/show_bug.cgi?id=2420305
-Patch:         0001-Support-Tree-sitter-version-0.26-and-later.patch
-
 BuildRequires: alsa-lib-devel
 BuildRequires: atk-devel
 BuildRequires: autoconf
@@ -80,6 +75,7 @@ BuildRequires: gnutls-devel
 BuildRequires: gtk3-devel
 BuildRequires: gzip
 BuildRequires: harfbuzz-devel
+BuildRequires: jansson-devel
 BuildRequires: libacl-devel
 BuildRequires: libappstream-glib
 BuildRequires: libgccjit-devel
@@ -96,6 +92,14 @@ BuildRequires: libxml2-devel
 BuildRequires: m17n-lib-devel
 BuildRequires: make
 BuildRequires: ncurses-devel
+BuildRequires: rust-tree-sitter-bash-devel
+BuildRequires: rust-tree-sitter-cli-devel
+BuildRequires: rust-tree-sitter-css-devel
+BuildRequires: rust-tree-sitter-elixir-devel
+BuildRequires: rust-tree-sitter-html-devel
+BuildRequires: rust-tree-sitter-javascript-devel
+BuildRequires: rust-tree-sitter-json-devel
+BuildRequires: rust-tree-sitter-python-devel
 BuildRequires: sqlite-devel
 BuildRequires: systemd-devel
 BuildRequires: texinfo
@@ -131,6 +135,16 @@ BuildRequires: util-linux
 %global marker ()(64bit)
 %endif
 
+# Emacs doesn't run without a font, rhbz#732422
+Requires:      google-noto-sans-mono-vf-fonts
+
+Requires(preun): /usr/sbin/alternatives
+Requires(posttrans): /usr/sbin/alternatives
+Requires:      emacs-common = %{epoch}:%{version}-%{release}
+Requires:      libpixbufloader-xpm.so%{?marker}
+Provides:      emacs(bin) = %{epoch}:%{version}-%{release}
+Supplements:   ((libwayland-server and emacs-common) unless emacs-nw)
+
 %define site_lisp %{_datadir}/emacs/site-lisp
 %define site_start_d %{site_lisp}/site-start.d
 %define pkgconfig %{_datadir}/pkgconfig
@@ -143,75 +157,23 @@ editor. It contains special code editing features, a scripting language
 the editor.
 }
 
-Provides:      emacs(bin) = %{epoch}:%{version}-%{release}
-Requires:      (emacs-pgtk = %{epoch}:%{version}-%{release} or emacs-gtk+x11 = %{epoch}:%{version}-%{release} or emacs-lucid = %{epoch}:%{version}-%{release} or emacs-nw = %{epoch}:%{version}-%{release})
-
-Suggests:      (emacs-nw if fedora-release-identity-basic)
-Suggests:      (emacs-nw if fedora-release-cloud)
-Suggests:      (emacs-nw if fedora-release-container)
-Suggests:      (emacs-nw if fedora-release-coreos)
-Suggests:      (emacs-gtk+x11 if fedora-release-i3)
-Suggests:      (emacs-nw if fedora-release-iot)
-Suggests:      (emacs-gtk+x11 if fedora-release-matecompiz)
-Suggests:      (emacs-pgtk if fedora-release-miraclewm)
-Suggests:      (emacs-pgtk if fedora-release-miraclewm-atomic)
-Suggests:      (emacs-pgtk if fedora-release-mobility)
-Suggests:      (emacs-nw if fedora-release-server)
-Suggests:      (emacs-pgtk if fedora-release-silverblue)
-Suggests:      (emacs-pgtk if fedora-release-sway)
-Suggests:      (emacs-pgtk if fedora-release-sway-atomic)
-Suggests:      (emacs-nw if fedora-release-toolbx)
-Suggests:      (emacs-pgtk if fedora-release-workstation)
-Suggests:      (emacs-gtk+x11 if fedora-release-xfce)
-
-## If you know the best variant for these editions, please fill
-## them in.
-# Suggests:      (emacs- if fedora-release-budgie)
-# Suggests:      (emacs- if fedora-release-budgie-atomic)
-# Suggests:      (emacs- if fedora-release-cinnamon)
-# Suggests:      (emacs- if fedora-release-compneuro)
-# Suggests:      (emacs- if fedora-release-cosmic)
-# Suggests:      (emacs- if fedora-release-cosmic-atomic)
-# Suggests:      (emacs- if fedora-release-designsuite)
-# Suggests:      (emacs- if fedora-release-kde)
-# Suggests:      (emacs- if fedora-release-kde-mobile)
-# Suggests:      (emacs- if fedora-release-kinoite)
-# Suggests:      (emacs- if fedora-release-kinoite-mobile)
-# Suggests:      (emacs- if fedora-release-lxqt)
-# Suggests:      (emacs- if fedora-release-soas)
-# Suggests:      (emacs- if fedora-release-wsl)
 
 %description
 %desc
-
-
-%package pgtk
-Summary:       GNU Emacs text editor with GTK toolkit for Wayland
-
-# Emacs doesn't run without a font, rhbz#732422
-Requires:      google-noto-sans-mono-vf-fonts
-
-Requires(preun): /usr/sbin/alternatives
-Requires(posttrans): /usr/sbin/alternatives
-Requires:      emacs-common = %{epoch}:%{version}-%{release}
-Requires:      libpixbufloader-xpm.so%{?marker}
-Supplements:   ((libwayland-server and emacs) unless emacs-nw)
-
-%description pgtk
-%desc
-This package provides an emacs-pgtk binary with support for Wayland, using the
+This package provides an emacs binary with support for Wayland, using the
 GTK toolkit.
 
 
 %if %{with gtkx11}
 %package gtk+x11
-Summary:       GNU Emacs text editor with GTK toolkit for X11
+Summary:       GNU Emacs text editor with GTK toolkit X support
 Requires:      google-noto-sans-mono-vf-fonts
 Requires(preun): /usr/sbin/alternatives
 Requires(posttrans): /usr/sbin/alternatives
 Requires:      emacs-common = %{epoch}:%{version}-%{release}
 Requires:      libpixbufloader-xpm.so%{?marker}
-Supplements:   ((xorg-x11-server-Xorg and emacs) unless emacs-nw)
+Provides:      emacs(bin) = %{epoch}:%{version}-%{release}
+Supplements:   ((xorg-x11-server-Xorg and emacs-common) unless emacs-nw)
 
 %description gtk+x11
 %desc
@@ -219,14 +181,14 @@ This package provides an emacs-gtk+x11 binary with support for the X
 Window System, using the GTK toolkit.
 %endif
 
-
 %if %{with lucid}
 %package lucid
-Summary:       GNU Emacs text editor with Lucid toolkit for X11
+Summary:       GNU Emacs text editor with Lucid toolkit X support
 Requires:      google-noto-sans-mono-vf-fonts
 Requires(preun): /usr/sbin/alternatives
 Requires(posttrans): /usr/sbin/alternatives
 Requires:      emacs-common = %{epoch}:%{version}-%{release}
+Provides:      emacs(bin) = %{epoch}:%{version}-%{release}
 
 %description lucid
 %desc
@@ -241,6 +203,7 @@ Summary:       GNU Emacs text editor with no window system support
 Requires(preun): /usr/sbin/alternatives
 Requires(posttrans): /usr/sbin/alternatives
 Requires:      emacs-common = %{epoch}:%{version}-%{release}
+Provides:      emacs(bin) = %{epoch}:%{version}-%{release}
 Provides:      emacs-nox = %{epoch}:%{version}-%{release}
 Obsoletes:     emacs-nox < 1:30
 
@@ -253,7 +216,9 @@ support, for running on a terminal only.
 
 %package -n emacsclient
 Summary:       Remotely control GNU Emacs
-Conflicts:     emacs-common < 1:29.4-12
+
+# This is a moving target whilst Fedora 40 is still receivng updates:
+Conflicts:     emacs-common < %{epoch}:%{version}-%{release}
 
 %description -n emacsclient
 %desc
@@ -269,30 +234,31 @@ License:       GPL-3.0-or-later AND GFDL-1.3-no-invariants-or-later AND BSD-3-Cl
 Requires(preun): /usr/sbin/alternatives
 Requires(posttrans): /usr/sbin/alternatives
 Requires:      /usr/bin/readlink
-Requires:      %{name}-filesystem >= 1:30.2
+Requires:      %{name}-filesystem
 Requires:      emacsclient
 Requires:      libgccjit
-Recommends:    emacs = %{epoch}:%{version}-%{release}
+Recommends:    (emacs or emacs-gtk+x11 or emacs-lucid or emacs-nw)
 Recommends:    enchant2
 Recommends:    info
 Provides:      %{name}-el = %{epoch}:%{version}-%{release}
 Obsoletes:     emacs-el < 1:24.3-29
 # transient.el is provided by emacs in lisp/transient.el
-Provides:      emacs-transient = 0.7.2.2
+Provides:      emacs-transient = 0.3.7
 # the existing emacs-transient package is obsoleted by emacs 28+, last package
 # version as of the release of emacs 28.1 is obsoleted
 Obsoletes:     emacs-transient < 0.3.0-4
 
-# We need the following packages for treesit-install-language-grammar to
-# be able to build additional parsers for us at runtime:
-Recommends:    /usr/bin/git
-Recommends:    gcc
-Recommends:    (gcc-c++ if libtree-sitter < 0.24.0)
+# https://github.com/tree-sitter/tree-sitter/issues/3296
+Requires:      libtree-sitter >= 0.22.5
 
-%global _local_file_attrs emacs_lisp
-%{load:%SOURCE10}
-%global __emacs_lisp_recommends \
-        %{_builddir}/%{name}-%{version}/build-pgtk/src/emacs -x %SOURCE11
+# Ideally, we'd package all tree-sitter parsers as RPMs, but, in the
+# meantime, we need the following packages for
+# treesit-install-language-grammar to be able to build the parsers for
+# us at runtime:
+Recommends:    ((gcc and gcc-c++) or clang)
+Recommends:    /usr/bin/git
+
+Recommends:    libtree-sitter-java
 
 %description common
 %desc
@@ -300,6 +266,20 @@ This package contains all the common files needed by emacs, emacs-gtk+x11,
 emacs-lucid, or emacs-nw.
 
 
+
+%package terminal
+Summary:       A desktop menu item for GNU Emacs terminal.
+Requires:      (emacs or emacs-gtk+x11 or emacs-lucid)
+BuildArch:     noarch
+
+%description terminal
+Contains a desktop menu item running GNU Emacs terminal. Install
+emacs-terminal if you need a terminal with Malayalam support.
+
+Please note that emacs-terminal is a temporary package and it will be
+removed when another terminal becomes capable of handling Malayalam.
+
+
 %package devel
 Summary: Development header files for Emacs
 
@@ -308,13 +288,11 @@ Development header files for Emacs.
 
 
 %prep
-cat '%{SOURCE100}' '%{SOURCE101}' '%{SOURCE102}' > keyring
+cat '%{SOURCE2}' '%{SOURCE3}' > keyring
 %{gpgverify} --keyring=keyring --signature='%{SOURCE1}' --data='%{SOURCE0}'
 rm keyring
 
-%autosetup -N -c
-cd %{name}-%{version}
-%autopatch -p1
+%autosetup -p1
 
 # Avoid trademark issues
 rm lisp/play/pong.el lisp/play/pong.elc \
@@ -333,35 +311,22 @@ ln -s ../../%{name}/%{version}/etc/COPYING doc
 ln -s ../../%{name}/%{version}/etc/NEWS doc
 
 
-cd ..
-%if %{with lucid}
-cp -a %{name}-%{version} build-lucid
-%endif
-%if %{with nw}
-cp -a %{name}-%{version} build-nw
-%endif
-%if %{with gtkx11}
-cp -a %{name}-%{version} build-gtk+x11
-%endif
-mv %{name}-%{version} build-pgtk
-
-
 %build
 export CFLAGS="-DMAIL_USE_LOCKF %{build_cflags}"
 %set_build_flags
 
 %if %{with lucid}
 # Build Lucid binary
-cd build-lucid
-%configure  \
-           --disable-gc-mark-trace \
-           --program-suffix=-lucid \
-           --with-cairo \
+mkdir build-lucid && cd build-lucid
+ln -s ../configure .
+
+%configure --with-cairo \
            --with-dbus \
            --with-gif \
            --with-gpm=no \
            --with-harfbuzz \
            --with-jpeg \
+           --with-json \
            --with-modules \
            --with-native-compilation=aot \
            --with-png \
@@ -373,19 +338,18 @@ cd build-lucid
            --with-x-toolkit=lucid \
            --with-xft \
            --with-xinput2 \
-           --with-xpm \
-    || ( cat config.log && false )
+           --with-xpm
 %{setarch} %make_build bootstrap
 %{setarch} %make_build
+rm src/emacs-%{version}.*
 cd ..
 %endif
 
 %if %{with nw}
 # Build binary without X support
-cd build-nw
-%configure \
-           --disable-gc-mark-trace \
-           --program-suffix=-nw \
+mkdir build-nw && cd build-nw
+ln -s ../configure .
+%configure --with-json \
            --with-modules \
            --with-native-compilation=aot \
            --with-sqlite3 \
@@ -393,25 +357,25 @@ cd build-nw
 %if %{without gpm}
            --with-gpm=no \
 %endif
-           --with-x=no \
-    || ( cat config.log && false )
+           --with-x=no
 %{setarch} %make_build bootstrap
 %{setarch} %make_build
+rm src/emacs-%{version}.*
 cd ..
 %endif
 
 %if %{with gtkx11}
 # Build GTK/X11 binary
-cd build-gtk+x11
-%configure  \
-           --disable-gc-mark-trace \
-           --program-suffix=-gtk+x11 \
-           --with-cairo \
+mkdir build-gtk+x11 && cd build-gtk+x11
+ln -s ../configure .
+
+%configure --with-cairo \
            --with-dbus \
            --with-gif \
            --with-gpm=no \
            --with-harfbuzz \
            --with-jpeg \
+           --with-json \
            --with-modules \
            --with-native-compilation=aot \
            --with-png \
@@ -422,23 +386,24 @@ cd build-gtk+x11
            --with-webp \
            --with-x-toolkit=gtk3 \
            --with-xinput2 \
-           --with-xpm \
-    || ( cat config.log && false )
+           --with-xpm
 %{setarch} %make_build bootstrap
 %{setarch} %make_build
+rm src/emacs-%{version}.*
 cd ..
 %endif
 
 # Build pure GTK binary
-cd build-pgtk
-%configure  \
-           --disable-gc-mark-trace \
-           --with-cairo \
+mkdir build-pgtk && cd build-pgtk
+ln -s ../configure .
+
+%configure --with-cairo \
            --with-dbus \
            --with-gif \
            --with-gpm=no \
            --with-harfbuzz \
            --with-jpeg \
+           --with-json \
            --with-modules \
            --with-native-compilation=aot \
            --with-pgtk \
@@ -448,10 +413,10 @@ cd build-pgtk
            --with-tiff \
            --with-tree-sitter \
            --with-webp \
-           --with-xpm \
-    || ( cat config.log && false )
+           --with-xpm
 %{setarch} %make_build bootstrap
 %{setarch} %make_build
+rm src/emacs-%{version}.*
 cd ..
 
 # Create pkgconfig file
@@ -469,103 +434,70 @@ cat > macros.emacs << EOF
 %%_emacs_version %{version}
 %%_emacs_ev %{?epoch:%{epoch}:}%{version}
 %%_emacs_evr %{?epoch:%{epoch}:}%{version}-%{release}
-%%_emacs_archsitelispdir %%{_libdir}/emacs/site-lisp
 %%_emacs_sitelispdir %{site_lisp}
 %%_emacs_sitestartdir %{site_start_d}
 %%_emacs_bytecompile(W) /usr/bin/emacs -batch --no-init-file --no-site-file --eval '(push nil load-path)' %%{-W:--eval '(setq byte-compile-error-on-warn t)' }-f batch-byte-compile %%*
 EOF
 
-cat > 00-dynamic-module-dir.el << 'EOF'
-;;; 00-dynamic-module-dir.el --- Add arch-specifc dir to load-path -*- lexical-binding: t -*-
-
-;;; Commentary:
-;;
-;; This directory is for installing Emacs dynamic modules into.  See
-;; also RPM macro %%_emacs_archsitelispdir.
-
-(add-to-list 'load-path "%{_libdir}/emacs/site-lisp")
-
-;;; 00-dynamic-module-dir.el ends here
-EOF
-
-cat > 10-source-directory.el << 'EOF'
-;;; 10-source-directory.el --- Set source-directory -*- lexical-binding: t -*-
-
-;;; Commentary:
-;;
-;; This solves rhbz#474958; Function `update-directory-autoloads' now
-;; finally works.
-
-(setq source-directory "%{_datadir}/emacs/%{version}/")
-
-;;; 10-source-directory.el ends here
-EOF
 
 %install
-%if %{with nw}
-cd build-nw
-%{__make} install-arch-dep install-eln DESTDIR=%{?buildroot} INSTALL="%{__install} -p"
-cd ..
-%endif
-
-%if %{with lucid}
-cd build-lucid
-%{__make} install-arch-dep install-eln DESTDIR=%{?buildroot} INSTALL="%{__install} -p"
-cd ..
-%endif
-
-%if %{with gtkx11}
-cd build-gtk+x11
-%{__make} install-arch-dep install-eln DESTDIR=%{?buildroot} INSTALL="%{__install} -p"
-cd ..
-%endif
-
 cd build-pgtk
 %make_install
 cd ..
 
+# Let alternatives manage the symlink
+rm %{buildroot}%{_bindir}/emacs
+touch %{buildroot}%{_bindir}/emacs
+
 # Do not compress the files which implement compression itself (#484830)
 gunzip %{buildroot}%{_datadir}/emacs/%{version}/lisp/jka-compr.el.gz
 gunzip %{buildroot}%{_datadir}/emacs/%{version}/lisp/jka-cmpr-hook.el.gz
 
-# Remove duplicate files with suffixed names
-%if %{with nw} || %{with lucid} || %{with gtkx11}
-find %{buildroot} \
-     -type f \
-     ! -name emacs-%{version}-gtk+x11 ! -name emacs-gtk+x11 \
-     ! -name emacs-%{version}-lucid   ! -name emacs-lucid \
-     ! -name emacs-%{version}-nw      ! -name emacs-nw \
-     -regextype posix-extended \
-     -regex '.*-(gtk\+x11|lucid|nw)((-mail)?\.[^/]+)?$' \
-     -print \
-     -delete
-%endif
-
-# Rename the emacs binary to indicate it's a "pure GTK" build
+# Install the emacs binary with pure GTK toolkit
 mv %{buildroot}%{_bindir}/emacs-%{version} %{buildroot}%{_bindir}/emacs-%{version}-pgtk
 ln -s emacs-%{version}-pgtk %{buildroot}%{_bindir}/emacs-pgtk
 
-# Compatibility with earlier Fedora packages
+%if %{with gtkx11}
+# Install the emacs binary using mixed GTK and X11
+install -p -m 0755 build-gtk+x11/src/emacs %{buildroot}%{_bindir}/emacs-%{version}-gtk+x11
+ln -s emacs-%{version}-gtk+x11 %{buildroot}%{_bindir}/emacs-gtk+x11
+%endif
+
+%if %{with lucid}
+# Install the emacs with Lucid toolkit
+install -p -m 0755 build-lucid/src/emacs %{buildroot}%{_bindir}/emacs-%{version}-lucid
+ln -s emacs-%{version}-lucid %{buildroot}%{_bindir}/emacs-lucid
+%endif
+
 %if %{with nw}
+# Install the emacs without graphical display
+install -p -m 0755 build-nw/src/emacs %{buildroot}%{_bindir}/emacs-%{version}-nw
 ln -s emacs-%{version}-nw %{buildroot}%{_bindir}/emacs-%{version}-nox
 ln -s emacs-%{version}-nw %{buildroot}%{_bindir}/emacs-nox
+ln -s emacs-%{version}-nw %{buildroot}%{_bindir}/emacs-nw
 %endif
 
 # Make sure movemail isn't setgid
 chmod 755 %{buildroot}%{emacs_libexecdir}/movemail
 
-mkdir -p %{buildroot}%{site_lisp} %{buildroot}%{site_start_d}
+mkdir -p %{buildroot}%{site_lisp}
 install -p -m 0644 %SOURCE5 %{buildroot}%{site_lisp}/site-start.el
 install -p -m 0644 %SOURCE6 %{buildroot}%{site_lisp}
-install -p -m 0644 00-dynamic-module-dir.el %{buildroot}%{site_start_d}/
-install -p -m 0644 10-source-directory.el %{buildroot}%{site_start_d}/
 
+# This solves bz#474958, "update-directory-autoloads" now finally
+# works the path is different each version, so we'll generate it here
+echo "(setq source-directory \"%{_datadir}/emacs/%{version}/\")" \
+ >> %{buildroot}%{site_lisp}/site-start.el
+
+mv %{buildroot}%{_bindir}/{etags,etags.emacs}
 mv %{buildroot}%{_mandir}/man1/{ctags.1.gz,gctags.1.gz}
+mv %{buildroot}%{_mandir}/man1/{etags.1.gz,etags.emacs.1.gz}
 mv %{buildroot}%{_bindir}/{ctags,gctags}
-
 # BZ 927996
 mv %{buildroot}%{_infodir}/{info.info.gz,info.gz}
 
+mkdir -p %{buildroot}%{site_lisp}/site-start.d
+
 # Default initialization file
 mkdir -p %{buildroot}%{_sysconfdir}/skel
 install -p -m 0644 %SOURCE4 %{buildroot}%{_sysconfdir}/skel/.emacs
@@ -574,18 +506,20 @@ install -p -m 0644 %SOURCE4 %{buildroot}%{_sysconfdir}/skel/.emacs
 mkdir -p %{buildroot}/%{pkgconfig}
 install -p -m 0644 emacs.pc %{buildroot}/%{pkgconfig}
 
-# Install rpm macros
-mkdir -p \
-      %{buildroot}%{_fileattrsdir} \
-      %{buildroot}%{_rpmconfigdir} \
-      %{buildroot}%{_rpmmacrodir}
-install -p -m 0644 %SOURCE10 %{buildroot}%{_fileattrsdir}
-install -p -m 0755 %SOURCE11 %{buildroot}%{_rpmconfigdir}
-install -p -m 0644 macros.emacs %{buildroot}%{_rpmmacrodir}
+# Install rpm macro definition file
+mkdir -p %{buildroot}%{_rpmconfigdir}/macros.d
+install -p -m 0644 macros.emacs %{buildroot}%{_rpmconfigdir}/macros.d/
+
+# Installing emacs-terminal binary
+install -p -m 755 %SOURCE8 %{buildroot}%{_bindir}/emacs-terminal
 
 # After everything is installed, remove info dir
 rm -f %{buildroot}%{_infodir}/dir
 
+# Install desktop files
+desktop-file-install --dir=%{buildroot}%{_datadir}/applications \
+                     %SOURCE7
+
 # Install a wrapper to avoid running the Wayland-only build on X11
 install -p -m 0755 %SOURCE9 %{buildroot}%{_bindir}/emacs-desktop
 
@@ -620,8 +554,6 @@ for info_f in %info_files; do
 done
 # info.gz is a rename of info.info.gz and thus needs special handling
 echo "%{_infodir}/info*" >> info-filelist
-# elisp.info.gz has additional files
-echo "%{_infodir}/elisp_type_hierarchy*" >> info-filelist
 
 # Put the lists together after filtering  ./usr to /usr
 sed -i -e "s|\.%{_prefix}|%{_prefix}|" *-files
@@ -630,78 +562,107 @@ grep -vhE '%{site_lisp}(|/(default\.el|site-start\.d|site-start\.el))$' {common,
 # Remove old icon
 rm %{buildroot}%{_datadir}/icons/hicolor/scalable/mimetypes/emacs-document23.svg
 
+# Install the pdmp with fingerprints
+pgtk_pdmp="emacs-$(./build-pgtk/src/emacs --fingerprint 2>&1 | sed 's/.* //').pdmp"
+install -p -m 0644 build-pgtk/src/emacs.pdmp %{buildroot}%{emacs_libexecdir}/${pgtk_pdmp}
+
 # Install native compiled Lisp of all builds
+pgtk_comp_native_ver=$(ls -1 build-pgtk/native-lisp)
+cp -ar build-pgtk/native-lisp/${pgtk_comp_native_ver} %{buildroot}%{native_lisp}
 (TOPDIR=${PWD}
  cd %{buildroot}
- find ".%{native_lisp}/$(ls $TOPDIR/build-pgtk/native-lisp)" \
-      \( -type f -name '*eln' -fprintf "$TOPDIR/pgtk-filelist" "%%%%attr(755,-,-) %%p\n" \) \
-      -o \( -type d -fprintf "$TOPDIR/pgtk-dirlist" "%%%%dir %%p\n" \)
+ find .%{native_lisp}/${pgtk_comp_native_ver} \( -type f -name '*eln' -fprintf $TOPDIR/pgtk-eln-filelist "%%%%attr(755,-,-) %%p\n" \) -o \( -type d -fprintf $TOPDIR/pgtk-dirs "%%%%dir %%p\n" \)
 )
-echo "%{emacs_libexecdir}/emacs-$(./build-pgtk/src/emacs --fingerprint).pdmp" \
-     >> pgtk-filelist
+echo %{emacs_libexecdir}/${pgtk_pdmp} >> pgtk-eln-filelist
 
 %if %{with gtkx11}
+gtkx11_pdmp="emacs-$(./build-gtk+x11/src/emacs --fingerprint 2>&1 | sed 's/.* //').pdmp"
+install -p -m 0644 build-gtk+x11/src/emacs.pdmp %{buildroot}%{emacs_libexecdir}/${gtkx11_pdmp}
+
+gtkx11_comp_native_ver=$(ls -1 build-gtk+x11/native-lisp)
+cp -ar build-gtk+x11/native-lisp/${gtkx11_comp_native_ver} %{buildroot}%{native_lisp}
 (TOPDIR=${PWD}
  cd %{buildroot}
- find ".%{native_lisp}/$(ls $TOPDIR/build-gtk+x11/native-lisp)" \
-      \( -type f -name '*eln' -fprintf "$TOPDIR/gtk+x11-filelist" "%%%%attr(755,-,-) %%p\n" \) \
-      -o \( -type d -fprintf "$TOPDIR/gtk+x11-dirlist" "%%%%dir %%p\n" \)
+ find .%{native_lisp}/${gtkx11_comp_native_ver} \( -type f -name '*eln' -fprintf $TOPDIR/gtk+x11-eln-filelist "%%%%attr(755,-,-) %%p\n" \) -o \( -type d -fprintf $TOPDIR/gtk+x11-dirs "%%%%dir %%p\n" \)
 )
-echo "%{emacs_libexecdir}/emacs-$(./build-gtk+x11/src/emacs --fingerprint).pdmp" \
-     >> gtk+x11-filelist
+echo %{emacs_libexecdir}/${gtkx11_pdmp} >> gtk+x11-eln-filelist
 %endif
 
 %if %{with lucid}
+lucid_pdmp="emacs-$(./build-lucid/src/emacs --fingerprint 2>&1 | sed 's/.* //').pdmp"
+install -p -m 0644 build-lucid/src/emacs.pdmp %{buildroot}%{emacs_libexecdir}/${lucid_pdmp}
+
+lucid_comp_native_ver=$(ls -1 build-lucid/native-lisp)
+cp -ar build-lucid/native-lisp/${lucid_comp_native_ver} %{buildroot}%{native_lisp}
 (TOPDIR=${PWD}
  cd %{buildroot}
- find ".%{native_lisp}/$(ls $TOPDIR/build-lucid/native-lisp)" \
-      \( -type f -name '*eln' -fprintf "$TOPDIR/lucid-filelist" "%%%%attr(755,-,-) %%p\n" \) \
-      -o \( -type d -fprintf "$TOPDIR/lucid-dirlist" "%%%%dir %%p\n" \)
+ find .%{native_lisp}/${lucid_comp_native_ver} \( -type f -name '*eln' -fprintf $TOPDIR/lucid-eln-filelist "%%%%attr(755,-,-) %%p\n" \) -o \( -type d -fprintf $TOPDIR/lucid-dirs "%%%%dir %%p\n" \)
 )
-echo "%{emacs_libexecdir}/emacs-$(./build-lucid/src/emacs --fingerprint).pdmp" \
-     >> lucid-filelist
+echo %{emacs_libexecdir}/${lucid_pdmp} >> lucid-eln-filelist
 %endif
 
 %if %{with nw}
+nw_pdmp="emacs-$(./build-nw/src/emacs --fingerprint 2>&1 | sed 's/.* //').pdmp"
+install -p -m 0644 build-nw/src/emacs.pdmp %{buildroot}%{emacs_libexecdir}/${nw_pdmp}
+
+nw_comp_native_ver=$(ls -1 build-nw/native-lisp)
+cp -ar build-nw/native-lisp/${nw_comp_native_ver} %{buildroot}%{native_lisp}
 (TOPDIR=${PWD}
  cd %{buildroot}
- find ".%{native_lisp}/$(ls $TOPDIR/build-nw/native-lisp)" \
-      \( -type f -name '*eln' -fprintf "$TOPDIR/nw-filelist" "%%%%attr(755,-,-) %%p\n" \) \
-      -o \( -type d -fprintf "$TOPDIR/nw-dirlist" "%%%%dir %%p\n" \)
+ find .%{native_lisp}/${nw_comp_native_ver} \( -type f -name '*eln' -fprintf $TOPDIR/nw-eln-filelist "%%%%attr(755,-,-) %%p\n" \) -o \( -type d -fprintf $TOPDIR/nw-dirs "%%%%dir %%p\n" \)
 )
-echo "%{emacs_libexecdir}/emacs-$(./build-nw/src/emacs --fingerprint).pdmp" \
-     >> nw-filelist
+echo %{emacs_libexecdir}/${nw_pdmp} >> nw-eln-filelist
 %endif
 
 # remove leading . from filelists
-sed -i -e "s|\.%{native_lisp}|%{native_lisp}|" *-filelist *-dirlist
+sed -i -e "s|\.%{native_lisp}|%{native_lisp}|" *-eln-filelist *-dirs
 
 # remove exec permissions from eln files to prevent the debuginfo extractor from
 # trying to extract debuginfo from them
-find %{buildroot}%{native_lisp}/ -name '*.eln' -type f -print0 \
-    | xargs -0 chmod -x
+find %{buildroot}%{_libdir}/ -name '*eln' -type f | xargs chmod -x
 
 # ensure native files are newer than byte-code files
 # see: https://bugzilla.redhat.com/show_bug.cgi?id=2157979#c11
-find %{buildroot}%{native_lisp}/ -name '*.eln' -type f -print0 \
-    | xargs -0 touch
-
-export QA_SKIP_BUILD_ROOT=0
+find %{buildroot}%{_libdir}/ -name '*eln' -type f | xargs touch
 
 
 %check
+# A number of tests that don't work on GNU EMBA are also unstable when
+# run in Koji.
+export EMACS_EMBA_CI=1
+
+cd build-pgtk
+%make_build check
+cd ..
+
+%if %{with gtkx11}
+cd build-gtk+x11
+%make_build check
+cd ..
+%endif
+
+%if %{with lucid}
+cd build-lucid
+%make_build check
+cd ..
+%endif
+
+%if %{with nw}
+cd build-nw
+%make_build check
+cd ..
+%endif
+
 appstream-util validate-relax --nonet %{buildroot}/%{_metainfodir}/*.metainfo.xml
 desktop-file-validate %{buildroot}/%{_datadir}/applications/*.desktop
 
 
-%preun pgtk
+%preun
 if [ $1 = 0 ]; then
-  /usr/sbin/alternatives --remove emacs %{_bindir}/emacs-desktop || :
   /usr/sbin/alternatives --remove emacs %{_bindir}/emacs-pgtk || :
 fi
 
-%posttrans pgtk
-/usr/sbin/alternatives --install %{_bindir}/emacs emacs %{_bindir}/emacs-desktop 85 || :
+%posttrans
 /usr/sbin/alternatives --install %{_bindir}/emacs emacs %{_bindir}/emacs-pgtk 80 || :
 
 %if %{with lucid}
@@ -741,7 +702,7 @@ if [ $1 = 0 ]; then
 fi
 
 %posttrans nw
-/usr/sbin/alternatives --install %{_bindir}/emacs emacs %{_bindir}/emacs-nw 65 || :
+/usr/sbin/alternatives --install %{_bindir}/emacs emacs %{_bindir}/emacs-nw 70 || :
 # The preun scriptlet of packages before 29.4-5 will remove this symlink
 # after it has been installed, so we may need to put it back:
 if [ $1 = 2 -a ! -h %{_bindir}/emacs-nw ]; then
@@ -750,35 +711,38 @@ fi
 %endif
 
 %preun common
-/usr/sbin/alternatives --remove emacs.etags %{_bindir}/etags.emacs || :
+if [ $1 = 0 ]; then
+  /usr/sbin/alternatives --remove emacs.etags %{_bindir}/etags.emacs || :
+fi
+
+%posttrans common
+/usr/sbin/alternatives --install %{_bindir}/etags emacs.etags %{_bindir}/etags.emacs 80 \
+       --slave %{_mandir}/man1/etags.1.gz emacs.etags.man %{_mandir}/man1/etags.emacs.1.gz || :
 
 
-%files
-
-%files pgtk -f pgtk-filelist -f pgtk-dirlist
-%ghost %{_bindir}/emacs
-%{_bindir}/emacs-desktop
+%files -f pgtk-eln-filelist -f pgtk-dirs
+%attr(0755,-,-) %ghost %{_bindir}/emacs
 %{_bindir}/emacs-%{version}-pgtk
 %{_bindir}/emacs-pgtk
 %{_datadir}/glib-2.0/schemas/org.gnu.emacs.defaults.gschema.xml
 
 %if %{with gtkx11}
-%files gtk+x11 -f gtk+x11-filelist -f gtk+x11-dirlist
-%ghost %{_bindir}/emacs
+%files gtk+x11 -f gtk+x11-eln-filelist -f gtk+x11-dirs
+%attr(0755,-,-) %ghost %{_bindir}/emacs
 %{_bindir}/emacs-%{version}-gtk+x11
 %{_bindir}/emacs-gtk+x11
 %endif
 
 %if %{with lucid}
-%files lucid -f lucid-filelist -f lucid-dirlist
-%ghost %{_bindir}/emacs
+%files lucid -f lucid-eln-filelist -f lucid-dirs
+%attr(0755,-,-) %ghost %{_bindir}/emacs
 %{_bindir}/emacs-%{version}-lucid
 %{_bindir}/emacs-lucid
 %endif
 
 %if %{with nw}
-%files nw -f nw-filelist -f nw-dirlist
-%ghost %{_bindir}/emacs
+%files nw -f nw-eln-filelist -f nw-dirs
+%attr(0755,-,-) %ghost %{_bindir}/emacs
 %{_bindir}/emacs-%{version}-nox
 %{_bindir}/emacs-%{version}-nw
 %{_bindir}/emacs-nox
@@ -786,19 +750,18 @@ fi
 %endif
 
 %files -n emacsclient
-%license build-pgtk/etc/COPYING
+%license etc/COPYING
 %{_bindir}/emacsclient
 %{_mandir}/man1/emacsclient.1*
 
 %files common -f common-filelist -f info-filelist
 %config(noreplace) %{_sysconfdir}/skel/.emacs
-%{_fileattrsdir}/emacs_lisp.attr
-%{_rpmconfigdir}/emacs_lisp.rec
 %{_rpmconfigdir}/macros.d/macros.emacs
-%license build-pgtk/etc/COPYING
-%doc build-pgtk/doc/NEWS build-pgtk/BUGS build-pgtk/README
+%license etc/COPYING
+%doc doc/NEWS BUGS README
 %{_bindir}/ebrowse
-%{_bindir}/etags
+%{_bindir}/emacs-desktop
+%{_bindir}/etags.emacs
 %{_bindir}/gctags
 %{_datadir}/applications/emacs.desktop
 %{_datadir}/applications/emacs-mail.desktop
@@ -807,13 +770,15 @@ fi
 %{_datadir}/icons/hicolor/scalable/apps/emacs.svg
 %{_datadir}/icons/hicolor/scalable/apps/emacs.ico
 %{_datadir}/icons/hicolor/scalable/mimetypes/emacs-document.svg
+%{_infodir}/elisp_type_hierarchy.*
 %{_mandir}/man1/ebrowse.1*
 %{_mandir}/man1/emacs.1*
-%{_mandir}/man1/etags.1*
+%{_mandir}/man1/etags.emacs.1*
 %{_mandir}/man1/gctags.1*
 %dir %{_datadir}/emacs/%{version}
 %{_datadir}/emacs/%{version}/etc
 %{_datadir}/emacs/%{version}/site-lisp
+%dir %{_libdir}/%{name}
 %dir %{_libdir}/%{name}/%{version}
 %dir %{native_lisp}
 %dir %{_libexecdir}/emacs
@@ -827,9 +792,13 @@ fi
 %attr(0644,root,root) %config %{site_lisp}/site-start.el
 %{pkgconfig}/emacs.pc
 
+%files terminal
+%{_bindir}/emacs-terminal
+%{_datadir}/applications/emacs-terminal.desktop
 
 %files devel
 %{_includedir}/emacs-module.h
 
+
 %changelog
 %autochangelog

emacs_lisp.attr

@@ -1,5 +0,0 @@
-# -*- rpm-spec -*-
-
-%__emacs_lisp_recommends %{_rpmconfigdir}/emacs_lisp.rec
-%__emacs_lisp_path %{_datadir}/emacs/.+\.el(\.gz)?$
-%__emacs_lisp_protocol multifile

emacs_lisp.rec

@@ -1,49 +0,0 @@
-#!/usr/bin/emacs -x
-
-;; This file is not part of GNU Emacs.
-
-;;; Commentary:
-
-;; Inspect Emacs Lisp files for usage of Tree-sitter parsers, and
-;; generate RPM Recommends for those.
-
-;;; Code:
-
-(setq backtrace-on-error-noninteractive nil
-      jka-compr-verbose nil)
-
-(condition-case nil
-    (while (setq filename (read-from-minibuffer ""))
-      (when (string-match-p (rx ".el" (optional ".gz") line-end)
-                                 filename)
-        (condition-case err
-            (let* ((symlink-target (file-symlink-p filename))
-                   (source-filename
-                    (if (and (stringp symlink-target)
-                             (string-match-p (rx line-start "/")
-                                             symlink-target))
-                        (file-name-concat (getenv "RPM_BUILD_ROOT")
-                                          symlink-target)
-                      filename)))
-              (with-temp-buffer
-                (insert-file-contents source-filename)
-                (setq parsers ())
-                (while
-                    (search-forward-regexp
-                     (rx "(" (or "treesit-ensure-installed"
-                                 "treesit-parser-create"
-                                 "treesit-ready-p")
-                         " '")
-                     nil t)
-                  (add-to-list 'parsers (thing-at-point 'symbol t)))
-                (when parsers
-                  (princ (concat ";" filename "\n"))
-                  (dolist (parser parsers)
-                    (princ (concat "tree-sitter(" parser ")" "\n"))))))
-
-          ;; Missing files are probably caused by "broken" symlinks
-          ;; (which may actually be fulfilled by some other package).
-          (file-missing (message "warning: %s" (error-message-string err))))))
-  (end-of-file nil))
-
-;;; emacs_lisp.rec ends here

site-start.el

@@ -1,16 +1,9 @@
-;;; site-start.el --- loaded before user's ".emacs" file and default.el -*- lexical-binding: t -*-
-
-;;; Commentary:
-;;
-;; Load *.el and *.elc in /usr/share/emacs/site-lisp/site-start.d on startup
-
-;;; Code:
+;;; loaded before user's ".emacs" file and default.el
 
+;; load *.el and *.elc in /usr/share/emacs/site-lisp/site-start.d on startup
 (mapc
  'load
  (delete-dups
   (mapcar 'file-name-sans-extension
           (directory-files
            "/usr/share/emacs/site-lisp/site-start.d" t "\\.elc?\\'"))))
-
-;;; site-start.el ends here

sources

@@ -1,2 +1,2 @@
-SHA512 (emacs-30.2.tar.xz) = 313432d11e95c74f8cd35c5b1da442e6223f5d40f9173c55883c0339ecbfb97a0bedf79177ef8902afd3e33c078a233777bed01f5caffa1e7524f17d58bfc9a2
-SHA512 (emacs-30.2.tar.xz.sig) = ab5b5d0624b37ac662cf9914e8807fc37ee273c107f1a19ca75a527b6b9a85ce35f9436d03d8a988876cce7e7bebcc6c4a1251b0ceb08785b56bf42743f246e1
+SHA512 (emacs-29.4.tar.xz) = 66b38081cb01d2c46ff7beefb45986cc225b4c922c30712ad0d456c6cae5507176ed99418c8f26948c5375c8afde4e4b2507d23ed997dbb5392d12150a121d80
+SHA512 (emacs-29.4.tar.xz.sig) = 6c20269c260fb7f6d8b9b4582be25179a5adaaa1b9d94e68d55890f7b0b211dfd396c7005694b0154471ab3769f12e5067b8f4ec21720755d9087d89a8c722f6