Compare commits
No commits in common. "f3f00165dc7597df47586da93de09d71d4fc4486" and "e0ae3f066f52d6378e4f0453298c305e546389a8" have entirely different histories.
f3f00165dc
...
e0ae3f066f
@ -1,86 +0,0 @@
|
|||||||
From 6f29ac0393bb0bb70c8122d9f1bda0ae5d8cee24 Mon Sep 17 00:00:00 2001
|
|
||||||
From: Peter Oliver <git@mavit.org.uk>
|
|
||||||
Date: Thu, 26 Sep 2024 13:20:06 +0100
|
|
||||||
Subject: [PATCH] Pong and Tetris are excluded.
|
|
||||||
|
|
||||||
---
|
|
||||||
doc/emacs/ack.texi | 2 +-
|
|
||||||
doc/emacs/misc.texi | 7 +------
|
|
||||||
lisp/menu-bar.el | 6 ------
|
|
||||||
test/src/doc-tests.el | 4 ++--
|
|
||||||
4 files changed, 4 insertions(+), 15 deletions(-)
|
|
||||||
|
|
||||||
diff --git a/doc/emacs/ack.texi b/doc/emacs/ack.texi
|
|
||||||
index 5ec5cd53fa6..26f174831ca 100644
|
|
||||||
--- a/doc/emacs/ack.texi
|
|
||||||
+++ b/doc/emacs/ack.texi
|
|
||||||
@@ -228,7 +228,7 @@ Acknowledgments
|
|
||||||
|
|
||||||
@item
|
|
||||||
Glynn Clements provided @file{gamegrid.el} and a couple of games that
|
|
||||||
-use it, Snake and Tetris.
|
|
||||||
+use it, including Snake.
|
|
||||||
|
|
||||||
@item
|
|
||||||
Andrew Cohen wrote @file{spam-wash.el}, to decode and clean email before
|
|
||||||
diff --git a/doc/emacs/misc.texi b/doc/emacs/misc.texi
|
|
||||||
index 41e37fd094e..38e281bf59c 100644
|
|
||||||
--- a/doc/emacs/misc.texi
|
|
||||||
+++ b/doc/emacs/misc.texi
|
|
||||||
@@ -3248,14 +3248,9 @@ Amusements
|
|
||||||
nato-region} converts the text in the region to NATO phonetic
|
|
||||||
alphabet; @kbd{M-x denato-region} converts it back.
|
|
||||||
|
|
||||||
-@findex pong
|
|
||||||
-@cindex Pong game
|
|
||||||
-@findex tetris
|
|
||||||
-@cindex Tetris
|
|
||||||
@findex snake
|
|
||||||
@cindex Snake
|
|
||||||
- @kbd{M-x pong}, @kbd{M-x snake} and @kbd{M-x tetris} are
|
|
||||||
-implementations of the well-known Pong, Snake and Tetris games.
|
|
||||||
+ @kbd{M-x snake} is an implementation of the well-known Snake game.
|
|
||||||
|
|
||||||
@findex solitaire
|
|
||||||
@cindex solitaire
|
|
||||||
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
|
|
||||||
index bcfa83cf8e4..1b0a0bce6a5 100644
|
|
||||||
--- a/lisp/menu-bar.el
|
|
||||||
+++ b/lisp/menu-bar.el
|
|
||||||
@@ -1658,18 +1658,12 @@ menu-bar-games-menu
|
|
||||||
(bindings--define-key menu [zone]
|
|
||||||
'(menu-item "Zone Out" zone
|
|
||||||
:help "Play tricks with Emacs display when Emacs is idle"))
|
|
||||||
- (bindings--define-key menu [tetris]
|
|
||||||
- '(menu-item "Tetris" tetris
|
|
||||||
- :help "Falling blocks game"))
|
|
||||||
(bindings--define-key menu [solitaire]
|
|
||||||
'(menu-item "Solitaire" solitaire
|
|
||||||
:help "Get rid of all the stones"))
|
|
||||||
(bindings--define-key menu [snake]
|
|
||||||
'(menu-item "Snake" snake
|
|
||||||
:help "Move snake around avoiding collisions"))
|
|
||||||
- (bindings--define-key menu [pong]
|
|
||||||
- '(menu-item "Pong" pong
|
|
||||||
- :help "Bounce the ball to your opponent"))
|
|
||||||
(bindings--define-key menu [mult]
|
|
||||||
'(menu-item "Multiplication Puzzle" mpuz
|
|
||||||
:help "Exercise brain with multiplication"))
|
|
||||||
diff --git a/test/src/doc-tests.el b/test/src/doc-tests.el
|
|
||||||
index b41a7ac5fb6..24befb737bc 100644
|
|
||||||
--- a/test/src/doc-tests.el
|
|
||||||
+++ b/test/src/doc-tests.el
|
|
||||||
@@ -34,8 +34,8 @@ doc-tests-documentation/autoloaded-macro
|
|
||||||
|
|
||||||
(ert-deftest doc-tests-documentation/autoloaded-defun ()
|
|
||||||
(skip-unless noninteractive)
|
|
||||||
- (should (autoloadp (symbol-function 'tetris)))
|
|
||||||
- (should (stringp (documentation 'tetris)))) ; See Bug#52969.
|
|
||||||
+ (should (autoloadp (symbol-function 'doctor)))
|
|
||||||
+ (should (stringp (documentation 'doctor)))) ; See Bug#52969.
|
|
||||||
|
|
||||||
(ert-deftest doc-tests-quoting-style ()
|
|
||||||
(should (memq (text-quoting-style) '(grave straight curve))))
|
|
||||||
--
|
|
||||||
2.46.1
|
|
||||||
|
|
44
emacs.spec
44
emacs.spec
@ -3,9 +3,11 @@
|
|||||||
%bcond gpm %[!(0%{?rhel} >= 10)]
|
%bcond gpm %[!(0%{?rhel} >= 10)]
|
||||||
%bcond webkit %[!(0%{?rhel} >= 10)]
|
%bcond webkit %[!(0%{?rhel} >= 10)]
|
||||||
|
|
||||||
%bcond_with gtkx11
|
%ifnarch riscv64
|
||||||
%bcond_with lucid
|
%bcond_without gtkx11
|
||||||
%bcond_with nw
|
%bcond_without lucid
|
||||||
|
%bcond_without nw
|
||||||
|
%endif
|
||||||
|
|
||||||
Summary: GNU Emacs text editor
|
Summary: GNU Emacs text editor
|
||||||
Name: emacs
|
Name: emacs
|
||||||
@ -26,9 +28,6 @@ Source7: emacs-terminal.desktop
|
|||||||
Source8: emacs-terminal.sh
|
Source8: emacs-terminal.sh
|
||||||
Source9: emacs-desktop.sh
|
Source9: emacs-desktop.sh
|
||||||
|
|
||||||
# Avoid trademark issues
|
|
||||||
Patch: 0001-Pong-and-Tetris-are-excluded.patch
|
|
||||||
|
|
||||||
# rhbz#713600
|
# rhbz#713600
|
||||||
Patch: emacs-spellchecker.patch
|
Patch: emacs-spellchecker.patch
|
||||||
|
|
||||||
@ -107,6 +106,10 @@ BuildRequires: zlib-devel
|
|||||||
BuildRequires: gpm-devel
|
BuildRequires: gpm-devel
|
||||||
%endif
|
%endif
|
||||||
|
|
||||||
|
%if %{with webkit}
|
||||||
|
BuildRequires: webkit2gtk4.1-devel
|
||||||
|
%endif
|
||||||
|
|
||||||
%if %{with lucid} || %{with gtkx11}
|
%if %{with lucid} || %{with gtkx11}
|
||||||
BuildRequires: libX11-devel
|
BuildRequires: libX11-devel
|
||||||
BuildRequires: libXau-devel
|
BuildRequires: libXau-devel
|
||||||
@ -243,13 +246,14 @@ Obsoletes: emacs-transient < 0.3.0-4
|
|||||||
|
|
||||||
# https://github.com/tree-sitter/tree-sitter/issues/3296
|
# https://github.com/tree-sitter/tree-sitter/issues/3296
|
||||||
Requires: libtree-sitter >= 0.22.5
|
Requires: libtree-sitter >= 0.22.5
|
||||||
|
Requires: libtree-sitter < 0.23
|
||||||
|
|
||||||
# Ideally, we'd package all tree-sitter parsers as RPMs, but, in the
|
# Ideally, we'd package all tree-sitter parsers as RPMs, but, in the
|
||||||
# meantime, we need the following packages for
|
# meantime, we need the following packages for
|
||||||
# treesit-install-language-grammar to be able to build the parsers for
|
# treesit-install-language-grammar to be able to build the parsers for
|
||||||
# us at runtime:
|
# us at runtime:
|
||||||
Recommends: ((gcc and gcc-c++) or clang)
|
Recommends: ((gcc and gcc-c++) or clang)
|
||||||
Recommends: /usr/bin/git
|
Recommends: git
|
||||||
|
|
||||||
Recommends: libtree-sitter-java
|
Recommends: libtree-sitter-java
|
||||||
|
|
||||||
@ -284,15 +288,19 @@ Development header files for Emacs.
|
|||||||
cat '%{SOURCE2}' '%{SOURCE3}' > keyring
|
cat '%{SOURCE2}' '%{SOURCE3}' > keyring
|
||||||
%{gpgverify} --keyring=keyring --signature='%{SOURCE1}' --data='%{SOURCE0}'
|
%{gpgverify} --keyring=keyring --signature='%{SOURCE1}' --data='%{SOURCE0}'
|
||||||
rm keyring
|
rm keyring
|
||||||
|
|
||||||
%autosetup -p1
|
%autosetup -p1
|
||||||
|
|
||||||
# Avoid trademark issues
|
|
||||||
rm lisp/play/pong.el lisp/play/pong.elc \
|
|
||||||
lisp/play/tetris.el lisp/play/tetris.elc
|
|
||||||
|
|
||||||
autoconf
|
autoconf
|
||||||
|
|
||||||
|
# Avoid trademark issues
|
||||||
|
grep -v "tetris.elc" lisp/Makefile.in > lisp/Makefile.in.new \
|
||||||
|
&& mv lisp/Makefile.in.new lisp/Makefile.in
|
||||||
|
grep -v "pong.elc" lisp/Makefile.in > lisp/Makefile.in.new \
|
||||||
|
&& mv lisp/Makefile.in.new lisp/Makefile.in
|
||||||
|
rm -f lisp/play/tetris.el lisp/play/tetris.elc
|
||||||
|
rm -f lisp/play/pong.el lisp/play/pong.elc
|
||||||
|
sed -i "s/'tetris/'doctor/" test/src/doc-tests.el
|
||||||
|
|
||||||
%ifarch %{ix86}
|
%ifarch %{ix86}
|
||||||
%define setarch setarch %{_arch} -R
|
%define setarch setarch %{_arch} -R
|
||||||
%else
|
%else
|
||||||
@ -313,6 +321,8 @@ export CFLAGS="-DMAIL_USE_LOCKF %{build_cflags}"
|
|||||||
mkdir build-lucid && cd build-lucid
|
mkdir build-lucid && cd build-lucid
|
||||||
ln -s ../configure .
|
ln -s ../configure .
|
||||||
|
|
||||||
|
LDFLAGS=-Wl,-z,relro; export LDFLAGS;
|
||||||
|
|
||||||
%configure --with-cairo \
|
%configure --with-cairo \
|
||||||
--with-dbus \
|
--with-dbus \
|
||||||
--with-gif \
|
--with-gif \
|
||||||
@ -362,6 +372,8 @@ cd ..
|
|||||||
mkdir build-gtk+x11 && cd build-gtk+x11
|
mkdir build-gtk+x11 && cd build-gtk+x11
|
||||||
ln -s ../configure .
|
ln -s ../configure .
|
||||||
|
|
||||||
|
LDFLAGS=-Wl,-z,relro; export LDFLAGS;
|
||||||
|
|
||||||
%configure --with-cairo \
|
%configure --with-cairo \
|
||||||
--with-dbus \
|
--with-dbus \
|
||||||
--with-gif \
|
--with-gif \
|
||||||
@ -379,7 +391,8 @@ ln -s ../configure .
|
|||||||
--with-webp \
|
--with-webp \
|
||||||
--with-x-toolkit=gtk3 \
|
--with-x-toolkit=gtk3 \
|
||||||
--with-xinput2 \
|
--with-xinput2 \
|
||||||
--with-xpm
|
--with-xpm \
|
||||||
|
%{?with_webkit:--with-xwidgets}
|
||||||
%{setarch} %make_build bootstrap
|
%{setarch} %make_build bootstrap
|
||||||
%{setarch} %make_build
|
%{setarch} %make_build
|
||||||
rm src/emacs-%{version}.*
|
rm src/emacs-%{version}.*
|
||||||
@ -390,6 +403,8 @@ cd ..
|
|||||||
mkdir build-pgtk && cd build-pgtk
|
mkdir build-pgtk && cd build-pgtk
|
||||||
ln -s ../configure .
|
ln -s ../configure .
|
||||||
|
|
||||||
|
LDFLAGS=-Wl,-z,relro; export LDFLAGS;
|
||||||
|
|
||||||
%configure --with-cairo \
|
%configure --with-cairo \
|
||||||
--with-dbus \
|
--with-dbus \
|
||||||
--with-gif \
|
--with-gif \
|
||||||
@ -406,7 +421,8 @@ ln -s ../configure .
|
|||||||
--with-tiff \
|
--with-tiff \
|
||||||
--with-tree-sitter \
|
--with-tree-sitter \
|
||||||
--with-webp \
|
--with-webp \
|
||||||
--with-xpm
|
--with-xpm \
|
||||||
|
%{?with_webkit:--with-xwidgets}
|
||||||
%{setarch} %make_build bootstrap
|
%{setarch} %make_build bootstrap
|
||||||
%{setarch} %make_build
|
%{setarch} %make_build
|
||||||
rm src/emacs-%{version}.*
|
rm src/emacs-%{version}.*
|
||||||
|
Loading…
Reference in New Issue
Block a user