diff options
Diffstat (limited to 'app-emacs/gnuserv/files/gnuserv-3.12.8-no-custom.patch')
-rw-r--r-- | app-emacs/gnuserv/files/gnuserv-3.12.8-no-custom.patch | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/app-emacs/gnuserv/files/gnuserv-3.12.8-no-custom.patch b/app-emacs/gnuserv/files/gnuserv-3.12.8-no-custom.patch new file mode 100644 index 000000000000..12cd31c16c0e --- /dev/null +++ b/app-emacs/gnuserv/files/gnuserv-3.12.8-no-custom.patch @@ -0,0 +1,31 @@ +Old-style backquotes don't work with Emacs 27 or later. Remove the +code altogether, because it is no longer needed since Emacs 20.1. + +--- gnuserv-3.12.8/gnuserv-compat.el ++++ gnuserv-3.12.8/gnuserv-compat.el +@@ -180,25 +180,6 @@ + (defun frame-totally-visible-p (frame) + (eq t (frame-visible-p frame)))) + +-;; Make custom stuff work even without customize +-;; Courtesy of Hrvoje Niksic <hniksic@srce.hr> +-;; via Ronan Waide <waider@scope.ie>. +-(eval-and-compile +- (condition-case () +- (require 'custom) +- (error nil)) +- (if (and (featurep 'custom) (fboundp 'custom-declare-variable)) +- nil ;; We've got what we needed +- ;; We have the old custom-library, hack around it! +- (defmacro defgroup (&rest args) +- nil) +- (defmacro defcustom (var value doc &rest args) +- (` (defvar (, var) (, value) (, doc)))) +- (defmacro defface (var value doc &rest args) +- (` (make-face (, var)))) +- (defmacro define-widget (&rest args) +- nil))) +- + ;; Now for gnuserv... + (require 'gnuserv) + |