diff options
| author |   Ulrich Müller <ulm@gentoo.org> | 2018-08-09 19:56:14 +0200 |
|---|---|---|
| committer | Ulrich Müller <ulm@gentoo.org> | 2018-08-09 20:19:49 +0200 |
| commit | d7d89ad147edc8b7b348777dc5c00c58abd59a37 (patch) | |
| tree | 443d16a7426d7f6ad5a35459ad93e08e6e38ce13 /app-emacs/gnuserv/files | |
| parent | dev-db/postgresql: Bump (diff) | |
| download | gentoo-d7d89ad147edc8b7b348777dc5c00c58abd59a37.tar.gz gentoo-d7d89ad147edc8b7b348777dc5c00c58abd59a37.tar.bz2 gentoo-d7d89ad147edc8b7b348777dc5c00c58abd59a37.zip | |
app-emacs/gnuserv: Fix runtime failure with Emacs 27.
Package-Manager: Portage-2.3.44, Repoman-2.3.10
Diffstat (limited to 'app-emacs/gnuserv/files')
| -rw-r--r-- | app-emacs/gnuserv/files/gnuserv-3.12.8-backquotes.patch | 16 | ||||
| -rw-r--r-- | app-emacs/gnuserv/files/gnuserv-3.12.8-process-query.patch | 14 |
2 files changed, 30 insertions, 0 deletions
diff --git a/app-emacs/gnuserv/files/gnuserv-3.12.8-backquotes.patch b/app-emacs/gnuserv/files/gnuserv-3.12.8-backquotes.patch new file mode 100644 index 000000000000..a16124821ddb --- /dev/null +++ b/app-emacs/gnuserv/files/gnuserv-3.12.8-backquotes.patch @@ -0,0 +1,16 @@ +Use new-style backquotes, to make it compile with Emacs 27. + +--- gnuserv-3.12.8-orig/gnuserv-compat.el ++++ gnuserv-3.12.8/gnuserv-compat.el +@@ -193,9 +193,9 @@ + (defmacro defgroup (&rest args) + nil) + (defmacro defcustom (var value doc &rest args) +- (` (defvar (, var) (, value) (, doc)))) ++ `(defvar (, var) (, value) (, doc))) + (defmacro defface (var value doc &rest args) +- (` (make-face (, var)))) ++ `(make-face (, var))) + (defmacro define-widget (&rest args) + nil))) + diff --git a/app-emacs/gnuserv/files/gnuserv-3.12.8-process-query.patch b/app-emacs/gnuserv/files/gnuserv-3.12.8-process-query.patch new file mode 100644 index 000000000000..4fcbccc2b59b --- /dev/null +++ b/app-emacs/gnuserv/files/gnuserv-3.12.8-process-query.patch @@ -0,0 +1,14 @@ +Function process-kill-without-query is obsolete since 22.1 and no +longer exists in 27. + +--- gnuserv-3.12.8-orig/gnuserv.el ++++ gnuserv-3.12.8/gnuserv.el +@@ -738,7 +738,7 @@ + (start-process "gnuserv" nil gnuserv-program))) + (set-process-sentinel gnuserv-process 'gnuserv-sentinel) + (set-process-filter gnuserv-process 'gnuserv-process-filter) +- (process-kill-without-query gnuserv-process) ++ (set-process-query-on-exit-flag gnuserv-process nil) + (setq allow-deletion-of-last-visible-frame t) + (run-hooks 'gnuserv-init-hook))) + |