aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/patches
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2022-07-13 16:02:36 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2022-07-13 16:02:36 +0200
commitf6b18b53722d8ce5a3f0c961a95015a204c95b62 (patch)
tree1551f7fbe9135a295c7e63e3c43f209ac4ed4f7f /gnu/packages/patches
parente31f3e9d1c8d3a8e5886a9f0eba0f933e3e9d831 (diff)
downloadguix-f6b18b53722d8ce5a3f0c961a95015a204c95b62.tar.gz
guix-f6b18b53722d8ce5a3f0c961a95015a204c95b62.zip
gnu: emacs-hyperbole: Update to 8.0.0.
* gnu/packages/emacs-xyz.scm (emacs-hyperbole): Update to 8.0.0. [arguments]<#:include>: Use %default-include. <#:phases>: Add build fix. * gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch: Remove file. * gnu/local.mk (dist_patch_DATA): Delete reference to removed file.
Diffstat (limited to 'gnu/packages/patches')
-rw-r--r--gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch86
1 files changed, 0 insertions, 86 deletions
diff --git a/gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch b/gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch
deleted file mode 100644
index ab66e1b389..0000000000
--- a/gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch
+++ /dev/null
@@ -1,86 +0,0 @@
-From 6d5c587ec719e3309077c7d637b03b13db65c047 Mon Sep 17 00:00:00 2001
-From: Joseph LaFreniere <joseph@lafreniere.xyz>
-Date: Fri, 12 Jul 2019 12:43:46 -0500
-Subject: [PATCH] Move definition of hyperbole-toggle-messaging to hsettings
-
----
- hsettings.el | 25 +++++++++++++++++++++++++
- hyperbole.el | 26 --------------------------
- 2 files changed, 25 insertions(+), 26 deletions(-)
-
-diff --git a/hsettings.el b/hsettings.el
-index 6cdd1b8..9632067 100644
---- a/hsettings.el
-+++ b/hsettings.el
-@@ -163,6 +163,31 @@ package to display search results."
- search-term)))
- (user-error "(Hyperbole): Invalid web search service `%s'" service-name))))
-
-+;;;###autoload
-+(defun hyperbole-toggle-messaging (&optional arg)
-+ "Toggle Hyperbole support for explicit buttons in mail and news buffers.
-+Toggles the boolean variable `inhibit-hyperbole-messaging’ and either
-+adds hooks (nil value) or removes them (t value).
-+
-+With optional prefix ARG > 0, enables support. If ARG <= 0,
-+disables/inhibits support."
-+ (interactive "P")
-+ (setq inhibit-hyperbole-messaging (if (null arg)
-+ (not inhibit-hyperbole-messaging)
-+ (<= (prefix-numeric-value arg) 0)))
-+ (if inhibit-hyperbole-messaging
-+ (var:remove-all)
-+ (var:append-all)
-+ ;; Add any hooks that were skipped when inhibit-hyperbole-messaging
-+ ;; was nil.
-+ (cond ((boundp 'hyperbole-loading))
-+ ((not after-init-time)
-+ (add-hook 'after-init-hook (lambda () (load "hyperbole"))))
-+ (t (load "hyperbole"))))
-+ (if (called-interactively-p 'interactive)
-+ (message "Hyperbole messaging button support is %s"
-+ (if inhibit-hyperbole-messaging "disabled" "enabled"))))
-+
- (defcustom inhibit-hyperbole-messaging t
- "*Determines whether Hyperbole supports explicit buttons in mail and news buffers.
- The default of t means disable such support (work remains to
-diff --git a/hyperbole.el b/hyperbole.el
-index 4aa427d..872dbaf 100644
---- a/hyperbole.el
-+++ b/hyperbole.el
-@@ -121,32 +121,6 @@
- t)))
- (error "(Hyperbole): Startup failure: `hyperb:dir' must be manually added to `load-path' to fix.")))
-
--;; This must be defined before the defcustom `inhbit-hyperbole-messaging'.
--;;;###autoload
--(defun hyperbole-toggle-messaging (&optional arg)
-- "Toggle Hyperbole support for explicit buttons in mail and news buffers.
--Toggles the boolean variable `inhibit-hyperbole-messaging’ and either
--adds hooks (nil value) or removes them (t value).
--
--With optional prefix ARG > 0, enables support. If ARG <= 0,
--disables/inhibits support."
-- (interactive "P")
-- (setq inhibit-hyperbole-messaging (if (null arg)
-- (not inhibit-hyperbole-messaging)
-- (<= (prefix-numeric-value arg) 0)))
-- (if inhibit-hyperbole-messaging
-- (var:remove-all)
-- (var:append-all)
-- ;; Add any hooks that were skipped when inhibit-hyperbole-messaging
-- ;; was nil.
-- (cond ((boundp 'hyperbole-loading))
-- ((not after-init-time)
-- (add-hook 'after-init-hook (lambda () (load "hyperbole"))))
-- (t (load "hyperbole"))))
-- (if (called-interactively-p 'interactive)
-- (message "Hyperbole messaging button support is %s"
-- (if inhibit-hyperbole-messaging "disabled" "enabled"))))
--
- (defgroup hyperbole-koutliner nil
- "Hyperbole multi-level autonumbered outliner customizations."
- :group 'hyperbole)
---
-2.22.0
-