Accepting request 1226819 from editors

- Avoid trouble with unknown X pointer shapes below Wayland (boo#1233795)

OBS-URL: https://build.opensuse.org/request/show/1226819
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/emacs?expand=0&rev=195

dot.gnu-emacs

@@ -176,13 +176,14 @@
   ;;
   ;; mouse as arrow
   ;; --------------
-  (setq x-pointer-shape x-pointer-left-ptr)
-  (if (x-display-color-p)
+  (if (eq window-system 'x)
+    (setq x-pointer-shape x-pointer-left-ptr))
+  (if (display-color-p)
       (set-mouse-color "RoyalBlue")
     (set-mouse-color (cdr (assq 'mouse-color (frame-parameters)))))
   ;;
   ;;   Automatically replacing of fore- and background.
-  (if (not (x-display-color-p))
+  (if (not (display-color-p))
     (progn
       (set-face-background 'region
 	       (cdr (assq 'foreground-color (frame-parameters ))))
@@ -538,5 +539,12 @@
 ;;(setq epa-pinentry-mode 'loopback)
 ;;(pinentry-start)
 ;;
+;; New native compilation support
+;; avoid useless warning, clear old eln files
+(if (featurep 'native-compile)
+   (progn
+    (require 'comp)
+    (setq native-comp-async-report-warnings-errors 'silent)
+    (native-compile-prune-cache)))
 ;;;;;;;;;;
 ;; the end

emacs.changes

@@ -1,3 +1,8 @@
+-------------------------------------------------------------------
+Wed Nov 27 08:46:04 UTC 2024 - Dr. Werner Fink <werner@suse.de>
+
+- Avoid trouble with unknown X pointer shapes below Wayland (boo#1233795) 
+
 -------------------------------------------------------------------
 Tue Oct  8 08:06:41 UTC 2024 - Dominique Leuenberger <dimstar@opensuse.org>
 

emacs.spec

@@ -323,7 +323,7 @@ Summary:        Info files for GNU Emacs
 Group:          Documentation/Other
 %if 0%{?suse_version} <= 1500
 Requires(post): %install_info_prereq
-Requires(preun): %install_info_prereq
+Requires(preun):%install_info_prereq
 %endif
 BuildArch:      noarch
 
@@ -351,7 +351,7 @@ group called "games".
 Summary:        Generate Tag Files for Use with Emacs
 Group:          Development/Tools/Navigators
 Requires(post): coreutils update-alternatives
-Requires(preun): coreutils update-alternatives
+Requires(preun):coreutils update-alternatives
 Provides:       ctags:/usr/bin/etags
 
 %description -n etags