GNU bug report logs - #36751
[PATCH] gnu: Add emacs-hyperbole.

Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.

Package: guix-patches; Reported by: "LaFreniere\, Joseph" <joseph@HIDDEN>; Keywords: patch; dated Sun, 21 Jul 2019 19:38:02 UTC; Maintainer for guix-patches is guix-patches@HIDDEN.

Message received at 36751 <at> debbugs.gnu.org:


Received: (at 36751) by debbugs.gnu.org; 6 Aug 2019 11:32:56 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Tue Aug 06 07:32:56 2019
Received: from localhost ([127.0.0.1]:36541 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1huxi4-0005p0-GZ
	for submit <at> debbugs.gnu.org; Tue, 06 Aug 2019 07:32:56 -0400
Received: from mx1.riseup.net ([198.252.153.129]:55550)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <swedebugia@HIDDEN>) id 1huxi3-0005os-4w
 for 36751 <at> debbugs.gnu.org; Tue, 06 Aug 2019 07:32:55 -0400
Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178])
 (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits))
 (Client CN "*.riseup.net",
 Issuer "COMODO RSA Domain Validation Secure Server CA" (verified OK))
 by mx1.riseup.net (Postfix) with ESMTPS id 633981A16C9;
 Tue,  6 Aug 2019 04:32:54 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak;
 t=1565091174; bh=y1U1Vd4GItO+NPVvaHkREC6R/VOb2NYbyusMbDCUlF4=;
 h=Subject:To:References:From:Date:In-Reply-To:From;
 b=IZBUjUJHnRI5zyM2LDiW9Tub8V+vJh7T4BbHJ03IPhrT6A3uBh/S7ZlzFN13Qe5SS
 N0dMx4RhQfz8YnOqZ+oMYjfHINJoymCaqOSdBraaakDH+KzSf9qCUW/MI44QGiopD9
 cAKATbGBjEFePdPIT3/U7eW4oqnbi/iHBeNE9NFE=
X-Riseup-User-ID: 38FEB3347FE3444CBCEC3714EDB7D52F7EF3021B05EE13F8C4C4BC959C4736FE
Received: from [127.0.0.1] (localhost [127.0.0.1])
 by bell.riseup.net (Postfix) with ESMTPSA id 9941722283D;
 Tue,  6 Aug 2019 04:32:53 -0700 (PDT)
Subject: Re: [bug#36751] [PATCH] gnu: Add emacs-hyperbole.
To: "LaFreniere, Joseph" <joseph@HIDDEN>, 36751 <at> debbugs.gnu.org
References: <875znv89iw.fsf@HIDDEN>
 <87a7d55q0w.fsf@HIDDEN>
 <877e7urii4.fsf@HIDDEN>
From: swedebugia <swedebugia@HIDDEN>
Message-ID: <ee6cfed9-0472-5138-3a9f-caaaaa9d1c1e@HIDDEN>
Date: Tue, 6 Aug 2019 13:32:50 +0200
MIME-Version: 1.0
In-Reply-To: <877e7urii4.fsf@HIDDEN>
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: 8bit
Content-Language: en-US
X-Spam-Score: -0.7 (/)
X-Debbugs-Envelope-To: 36751
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.7 (-)

Hi!

Thanks for the patch.

On 2019-08-03 06:16, LaFreniere, Joseph wrote:
> I have squashed the fixup into the original commit and rebased on 
> current master (82ebb785f178d8618d39b658932d23d9f859fc91).  The 
> resulting commit is attached.
>
>
> -- 
> Joseph LaFreniere

Git said this:

$ git apply 0001-gnu-Add-emacs-hyperbole.patch
0001-gnu-Add-emacs-hyperbole.patch:122: space before tab in indent.
          (or (and (boundp 'user-mail-address)
0001-gnu-Add-emacs-hyperbole.patch:123: trailing whitespace.
-- 
0001-gnu-Add-emacs-hyperbole.patch:149: trailing whitespace.

0001-gnu-Add-emacs-hyperbole.patch:155: space before tab in indent.
       (dname (or (and (boundp 'message-user-fqdn) (stringp 
message-user-fqdn)
0001-gnu-Add-emacs-hyperbole.patch:156: space before tab in indent.
               (string-match "\\." message-user-fqdn)
warning: squelched 10 whitespace errors
warning: 15 lines add whitespace errors.

---

Could you take a look at that?

Otherwise LGTM.

(I linted it, inspected the output in the store with 'ls -lR' and opened 
the info file)

-- 
Cheers Swedebugia




Information forwarded to guix-patches@HIDDEN:
bug#36751; Package guix-patches. Full text available.

Message received at 36751 <at> debbugs.gnu.org:


Received: (at 36751) by debbugs.gnu.org; 3 Aug 2019 04:16:40 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sat Aug 03 00:16:40 2019
Received: from localhost ([127.0.0.1]:58149 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1htlTE-0007MA-2X
	for submit <at> debbugs.gnu.org; Sat, 03 Aug 2019 00:16:40 -0400
Received: from mx.kolabnow.com ([95.128.36.42]:24700)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <joseph@HIDDEN>) id 1htlTC-0007Lp-4k
 for 36751 <at> debbugs.gnu.org; Sat, 03 Aug 2019 00:16:39 -0400
Received: from localhost (unknown [127.0.0.1])
 by ext-mx-out002.mykolab.com (Postfix) with ESMTP id C2A0934C
 for <36751 <at> debbugs.gnu.org>; Sat,  3 Aug 2019 06:16:31 +0200 (CEST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=kolabnow.com; h=
 content-type:content-type:mime-version:message-id:date:date
 :in-reply-to:subject:subject:from:from:references:received
 :received:received; s=dkim20160331; t=1564805790; x=1566620191;
 bh=e4O7ij/JXIDSSRb9WhgCCSN6VW/zKHw/lb4GvTvD1oU=; b=iW4Hj6nwRkmm
 TbELG2fObO4uOAIGj3t2qTqzIMcBNI92/U8lu2c686piRGRyPiqCDnTAoR0oJcXj
 g75hkAMFZvCCVtktZlynNkil5dqR7pOhGwTSqfdS7HAdF9d4eO1FnsYqBMUKRpz4
 dtHVARcfDkZwvsqzvmJAnjEDSAKlk0R3CvO8JzofD4WrkOn2UkNfSyQcTp7dChkg
 HS1JxqQ8b633jJVPId7gNMiB3y7M4wS0ggkCT1ck9L83/CQ3qexYt91Pb0xLyeDh
 K6xNrVvuV66zPocE2DZK4/0zJWNu/EsvEGAy5m0xmIFKLMrPyjZuvlbj0Cwag7S9
 mMQaMNwFgiUzEaAfAqRBw6SBcYMhgWjOol3TkIKkj6Q7zQM1VKMTNY+k78HcPi4K
 22B58iZMSxCOqV+q2T3BTrpD945914gzXt8MpUf91wfYxlA5Xm1z3erln5IZjA5V
 RE1/UrYarx91aDzfTm8zJoxI6PCbvO8e7zBolbn5ZXNprmvq9ozijXMsC2AiRJhp
 mUbx5Oxy1qNevY0fZKTZo9iXXTE+jSLEMUj8wdTAOiCTsXTwHlovvUUpY+Hwpub+
 c+frev6WTv6D2k7Rxfvy75TxDI2WiuyFufB9knIBXcFHJcPlQ9X8Xo3v6WtqnIA8
 ysOtfiCImfvSKmVsNuqWeFFdm4n8fjM=
X-Virus-Scanned: amavisd-new at mykolab.com
X-Spam-Flag: NO
X-Spam-Score: -1.9
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 tagged_above=-10 required=5
 tests=[BAYES_00=-1.9] autolearn=ham autolearn_force=no
Received: from mx.kolabnow.com ([127.0.0.1])
 by localhost (ext-mx-out002.mykolab.com [127.0.0.1]) (amavisd-new, port 10024)
 with ESMTP id NKXS-7_YE5ew for <36751 <at> debbugs.gnu.org>;
 Sat,  3 Aug 2019 06:16:30 +0200 (CEST)
Received: from int-mx001.mykolab.com (unknown [10.9.13.1])
 by ext-mx-out002.mykolab.com (Postfix) with ESMTPS id A2E5C317
 for <36751 <at> debbugs.gnu.org>; Sat,  3 Aug 2019 06:16:30 +0200 (CEST)
Received: from ext-subm001.mykolab.com (unknown [10.9.6.1])
 by int-mx001.mykolab.com (Postfix) with ESMTPS id 10824E00
 for <36751 <at> debbugs.gnu.org>; Sat,  3 Aug 2019 06:16:30 +0200 (CEST)
References: <875znv89iw.fsf@HIDDEN>
 <87a7d55q0w.fsf@HIDDEN>
From: "LaFreniere\, Joseph" <joseph@HIDDEN>
To: 36751 <at> debbugs.gnu.org
Subject: Re: [bug#36751] [PATCH] gnu: Add emacs-hyperbole.
In-reply-to: <87a7d55q0w.fsf@HIDDEN>
Date: Fri, 02 Aug 2019 23:16:19 -0500
Message-ID: <877e7urii4.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
X-Spam-Score: 0.5 (/)
X-Debbugs-Envelope-To: 36751
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 0.5 (/)

--=-=-=
Content-Type: text/plain; format=flowed

I have squashed the fixup into the original commit and rebased on 
current master (82ebb785f178d8618d39b658932d23d9f859fc91).  The 
resulting commit is attached.


--
Joseph LaFreniere

--=-=-=
Content-Type: text/x-patch; charset=utf-8
Content-Disposition: attachment; filename=0001-gnu-Add-emacs-hyperbole.patch
Content-Transfer-Encoding: quoted-printable

From 7bddfbe5cc24c5493b640d385901fa705cf06fcb Mon Sep 17 00:00:00 2001
From: Joseph LaFreniere <joseph@HIDDEN>
Date: Wed, 5 Jun 2019 01:27:49 -0500
Subject: [PATCH] gnu: Add emacs-hyperbole.

* gnu/packages/emacs-xyz.scm (emacs-hyperbole): Add at 7.0.3
---
 gnu/packages/emacs-xyz.scm                    | 68 +++++++++++++++
 .../emacs-hyperbole-do-not-check-dir.patch    | 24 ++++++
 .../patches/emacs-hyperbole-domainname.patch  | 29 +++++++
 .../emacs-hyperbole-toggle-messaging.patch    | 86 +++++++++++++++++++
 4 files changed, 207 insertions(+)
 create mode 100644 gnu/packages/patches/emacs-hyperbole-do-not-check-dir.p=
atch
 create mode 100644 gnu/packages/patches/emacs-hyperbole-domainname.patch
 create mode 100644 gnu/packages/patches/emacs-hyperbole-toggle-messaging.p=
atch

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 600d810bea..73f64ff4c2 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -183,6 +183,74 @@ metadata.")
 (define-public geiser
   (deprecated-package "geiser" emacs-geiser))
=20
+(define-public emacs-hyperbole
+  (package
+    (name "emacs-hyperbole")
+    (version "7.0.3")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "http://ftpmirror.gnu.org/hyperbole/"
+                    "hyperbole-" version ".tar.gz"))
+              (sha256
+               (base32
+                "0znsjhm0lmzpmkgfni4qzx4l6dp604bmrzp3mwxxax2v96wpwmcx"))
+              (patches
+               (search-patches
+                "emacs-hyperbole-do-not-check-dir.patch"
+                "emacs-hyperbole-domainname.patch"
+                "emacs-hyperbole-toggle-messaging.patch"))))
+    (build-system emacs-build-system)
+    (arguments
+     `(#:include '("DEMO"
+                   "DEMO-ROLO.otl"
+                   "HY-ABOUT"
+                   "\\.el$"
+                   "\\.info$"
+                   "\\.kotl$")
+       #:phases
+       (modify-phases %standard-phases
+         (add-before 'install 'make-info
+           (lambda _
+             (invoke "make" "info"))))))
+    (propagated-inputs `(("inetutils" ,inetutils)))
+    (home-page "https://www.gnu.org/software/hyperbole/")
+    (synopsis "The Everyday Hypertextual Information Manager")
+    (description
+     "GNU Hyperbole, or just Hyperbole, is an easy-to-use, yet powerful and
+programmable hypertextual information management system implemented as a G=
NU
+Emacs package.  It offers rapid views and interlinking of all kinds of tex=
tual
+information, utilizing Emacs for editing.  It can dramatically increase yo=
ur
+productivity and greatly reduce the number of keyboard/mouse keys you'll n=
eed
+to work efficiently.  Hyperbole lets you:
+
+@itemize
+@item Quickly create hyperlink buttons either from the keyboard or by drag=
ging
+between a source and destination window with a mouse button depressed.  La=
ter,
+activate buttons by pressing/clicking on them or by giving the name of the
+button.
+@item Activate many kinds of \"implicit buttons\" recognized by context wi=
thin
+text buffers, e.g. URLs, grep output lines, and git commits.  A single key=
 or
+mouse button automatically does the right thing in dozens of contexts; just
+press and go.
+@item Build outlines with multi-level numbered outline nodes, e.g. 1.4.8.6,
+that all renumber automatically as any node or tree is moved in the outlin=
e.
+Each node also has a permanent hyperlink anchor that you can reference from
+any other node.
+@item Manage all your contacts quickly with hierarchical categories and em=
bed
+hyperlinks within each entry.  Or create an archive of documents with
+hierarchical entries and use the same search mechanism to quickly find any
+matching entry.
+@item Use single keys to easily manage your Emacs windows or frames and
+quickly retrieve saved window and frame configurations.
+@item Search for things in your current buffers, in a directory tree or ac=
ross
+major web search engines with the touch of a few keys.
+@end itemize
+
+The common thread in all these features is making retrieval, management and
+display of information fast and easy.  That is Hyperbole's purpose.")
+    (license license:gpl3+)))
+
 (define-public emacs-paredit
   (package
     (name "emacs-paredit")
diff --git a/gnu/packages/patches/emacs-hyperbole-do-not-check-dir.patch b/=
gnu/packages/patches/emacs-hyperbole-do-not-check-dir.patch
new file mode 100644
index 0000000000..66c7a0fb08
--- /dev/null
+++ b/gnu/packages/patches/emacs-hyperbole-do-not-check-dir.patch
@@ -0,0 +1,24 @@
+From 3016fbd61e47978be73bbbaf7a8c2709bec42066 Mon Sep 17 00:00:00 2001
+From: Joseph LaFreniere <joseph@HIDDEN>
+Date: Fri, 12 Jul 2019 13:12:40 -0500
+Subject: [PATCH] Do not run hyperb:check-dir-user during initialization
+
+---
+ hyperbole.el | 1 -
+ 1 file changed, 1 deletion(-)
+
+diff --git a/hyperbole.el b/hyperbole.el
+index 872dbaf..6edb2a7 100644
+--- a/hyperbole.el
++++ b/hyperbole.el
+@@ -653,7 +653,6 @@ If FLAG is nil then text is shown, while if FLAG is t =
the text is hidden."
+   (interactive)
+   (message "Initializing Hyperbole...")
+   (run-hooks 'hyperbole-init-hook)
+-  (hyperb:check-dir-user)
+   (or (stringp hyperb:user-email)
+       (setq hyperb:user-email
+ 	    (or (and (boundp 'user-mail-address)
+--=20
+2.22.0
+
diff --git a/gnu/packages/patches/emacs-hyperbole-domainname.patch b/gnu/pa=
ckages/patches/emacs-hyperbole-domainname.patch
new file mode 100644
index 0000000000..cf4b63b54b
--- /dev/null
+++ b/gnu/packages/patches/emacs-hyperbole-domainname.patch
@@ -0,0 +1,29 @@
+From 17c87ac58ce6d475fa1987347fcb868ef7f75e40 Mon Sep 17 00:00:00 2001
+From: Joseph LaFreniere <joseph@HIDDEN>
+Date: Sun, 2 Jun 2019 12:38:27 -0500
+Subject: [PATCH] Replace executable domainname with hostname
+
+Fixes build failure:
+> ice-9/boot-9.scm:752:25: In procedure dispatch-exception:
+> patch-el-files: unable to locate  "domainname"
+---
+ hypb.el | 3 +--
+ 1 file changed, 1 insertion(+), 2 deletions(-)
+
+diff --git a/hypb.el b/hypb.el
+index 6abc17a..0332946 100644
+--- a/hypb.el
++++ b/hypb.el
+@@ -183,8 +183,7 @@ Global keymap is used unless optional KEYMAP is given."
+=20
+ (defun hypb:domain-name ()
+   "Returns current Internet domain name with '@' prepended or nil if none=
."
+-  (let* ((dname-cmd (or (file-exists-p "/usr/bin/domainname")
+-			(file-exists-p "/bin/domainname")))
++  (let* ((dname-cmd (file-exists-p "/bin/hostname"))
+ 	 (dname (or (and (boundp 'message-user-fqdn) (stringp message-user-fqdn)
+ 			 (string-match "\\." message-user-fqdn)
+ 			 message-user-fqdn)
+--=20
+2.21.0
+
diff --git a/gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch b/=
gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch
new file mode 100644
index 0000000000..ab66e1b389
--- /dev/null
+++ b/gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch
@@ -0,0 +1,86 @@
+From 6d5c587ec719e3309077c7d637b03b13db65c047 Mon Sep 17 00:00:00 2001
+From: Joseph LaFreniere <joseph@HIDDEN>
+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))))
+=20
++;;;###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=E2=80=99 and ei=
ther
++adds hooks (nil value) or removes them (t value).
++
++With optional prefix ARG > 0, enables support.  If ARG <=3D 0,
++disables/inhibits support."
++  (interactive "P")
++  (setq inhibit-hyperbole-messaging (if (null arg)
++					(not inhibit-hyperbole-messaging)
++				      (<=3D (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 ne=
ws 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 a=
dded to `load-path' to fix.")))
+=20
+-;; 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=E2=80=99 and ei=
ther
+-adds hooks (nil value) or removes them (t value).
+-
+-With optional prefix ARG > 0, enables support.  If ARG <=3D 0,
+-disables/inhibits support."
+-  (interactive "P")
+-  (setq inhibit-hyperbole-messaging (if (null arg)
+-					(not inhibit-hyperbole-messaging)
+-				      (<=3D (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)
+--=20
+2.22.0
+
--=20
2.22.0


--=-=-=--




Information forwarded to guix-patches@HIDDEN:
bug#36751; Package guix-patches. Full text available.

Message received at 36751 <at> debbugs.gnu.org:


Received: (at 36751) by debbugs.gnu.org; 23 Jul 2019 04:33:19 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Tue Jul 23 00:33:19 2019
Received: from localhost ([127.0.0.1]:33870 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1hpmUI-0007jY-Vb
	for submit <at> debbugs.gnu.org; Tue, 23 Jul 2019 00:33:19 -0400
Received: from mx.kolabnow.com ([95.128.36.40]:4794)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <joseph@HIDDEN>) id 1hpmUG-0007jL-0x
 for 36751 <at> debbugs.gnu.org; Tue, 23 Jul 2019 00:33:16 -0400
Received: from localhost (unknown [127.0.0.1])
 by ext-mx-out003.mykolab.com (Postfix) with ESMTP id 7B717403B6
 for <36751 <at> debbugs.gnu.org>; Tue, 23 Jul 2019 06:33:09 +0200 (CEST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=kolabnow.com; h=
 content-type:content-type:mime-version:message-id:in-reply-to
 :date:date:references:subject:subject:from:from:received
 :received:received; s=dkim20160331; t=1563856389; x=1565670790;
 bh=mheoUFLAPkN5n1KKnc5XjFlISTTuYv0mfMd9S2QFcfg=; b=EXNBYVeXxMQ0
 FT9ycb7bFpWiP4Orj7RAInnz2kfQxZyvGZB+tfNtGgRmH/5S65tToXeqnt9dngqA
 w927diiKbzFk+w4/3mD09Ma06reYBFOuAFwRSGUy7g3oo7Vf4KozCJ7NH4uEdDvt
 DPAh8E4DB1tcZRXJWtyqEb3+ENQpNNWzIsMnxzoOdLbO6BSGVjA4uBwwc4NI7akv
 b8F0RxnZnmXKCme3seNMGeHX58mhLlBQ7VC3CfynO36rBPCHy71mudrrtBArpdYw
 2asJRndihamXquZTQZ9F8e2tvHu+R9SRyCpggee1xYRB7ex9HXON0cHnvCbbFFRO
 oJZbtNZ36OeJFtU7fp//Guw6J9IGqF0cjkEy3v6FEmU5lIMiy90OpRgLj9+68/Qz
 1gHFeMBrV1LjllVQO8yS3aMs7TdtRKD3QXhNvi+2LEHsZJrKXlyU+qefJtoGuOKr
 JQm3gTLWlXB0UgXwqTEDPySmYKenSOT0TbkxTcEvQtFtoD29cwLKoBcsXvrbF74o
 zsva5Zzr65bPuPYNbdyAGe+06TXHwprgjBJKV6yOjITdcAyIe/yLscW5z/fuMGSU
 wZnls5RZcYYKfsZPCkqDS87M0LdN7hw53AdSnR1NUfw0ySYGKugO9zQEUQT1zIXx
 VfpFBIsIwA6fFKdysmhrCwbyLu/JDFs=
X-Virus-Scanned: amavisd-new at mykolab.com
X-Spam-Flag: NO
X-Spam-Score: -1.9
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 tagged_above=-10 required=5
 tests=[BAYES_00=-1.9] autolearn=ham autolearn_force=no
Received: from mx.kolabnow.com ([127.0.0.1])
 by localhost (ext-mx-out003.mykolab.com [127.0.0.1]) (amavisd-new, port 10024)
 with ESMTP id V3RGRHDjLlW0 for <36751 <at> debbugs.gnu.org>;
 Tue, 23 Jul 2019 06:33:09 +0200 (CEST)
Received: from int-mx003.mykolab.com (unknown [10.9.13.3])
 by ext-mx-out003.mykolab.com (Postfix) with ESMTPS id D71B7403AA
 for <36751 <at> debbugs.gnu.org>; Tue, 23 Jul 2019 06:33:08 +0200 (CEST)
Received: from ext-subm001.mykolab.com (unknown [10.9.6.1])
 by int-mx003.mykolab.com (Postfix) with ESMTPS id 9370CB0F
 for <36751 <at> debbugs.gnu.org>; Tue, 23 Jul 2019 06:33:08 +0200 (CEST)
From: joseph@HIDDEN (LaFreniere, Joseph)
To: 36751 <at> debbugs.gnu.org
Subject: Re: [bug#36751] [PATCH] gnu: Add emacs-hyperbole.
References: <875znv89iw.fsf@HIDDEN>
Date: Mon, 22 Jul 2019 23:33:03 -0500
In-Reply-To: <875znv89iw.fsf@HIDDEN> (Joseph LaFreniere's
 message of "Sun, 21 Jul 2019 14:36:39 -0500")
Message-ID: <87a7d55q0w.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
X-Spam-Score: 0.5 (/)
X-Debbugs-Envelope-To: 36751
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: 0.5 (/)

--=-=-=
Content-Type: text/plain

Please find a fixup commit attached.  The original patch omitted
several sample files;  whie those files are not necessary for the
functioning of Hyperbole itself, they are referred to in its menu system
and are valuable resources for new users.

-- 
Joseph LaFreniere

--=-=-=
Content-Type: text/x-patch
Content-Disposition: attachment;
 filename=0001-fixup-gnu-Add-emacs-hyperbole.patch

From 4624f21921730162f64b3efd90969e64eb54a39a Mon Sep 17 00:00:00 2001
From: Joseph LaFreniere <joseph@HIDDEN>
Date: Mon, 22 Jul 2019 23:18:48 -0500
Subject: [PATCH] fixup! gnu: Add emacs-hyperbole.

---
 gnu/packages/emacs-xyz.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 7760b889aa..df01e1d931 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -201,7 +201,12 @@ metadata.")
                 "emacs-hyperbole-toggle-messaging.patch"))))
     (build-system emacs-build-system)
     (arguments
-     `(#:include '("\\.el$" "\\.info$")
+     `(#:include '("DEMO"
+                   "DEMO-ROLO.otl"
+                   "HY-ABOUT"
+                   "\\.el$"
+                   "\\.info$"
+                   "\\.kotl$")
        #:phases
        (modify-phases %standard-phases
          (add-before 'install 'make-info
-- 
2.22.0


--=-=-=--




Information forwarded to guix-patches@HIDDEN:
bug#36751; Package guix-patches. Full text available.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 21 Jul 2019 19:37:13 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun Jul 21 15:37:13 2019
Received: from localhost ([127.0.0.1]:59532 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1hpHdw-00012t-8M
	for submit <at> debbugs.gnu.org; Sun, 21 Jul 2019 15:37:12 -0400
Received: from lists.gnu.org ([209.51.188.17]:40459)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <joseph@HIDDEN>) id 1hpHdd-00012D-Mp
 for submit <at> debbugs.gnu.org; Sun, 21 Jul 2019 15:37:03 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:56851)
 by lists.gnu.org with esmtp (Exim 4.86_2)
 (envelope-from <joseph@HIDDEN>) id 1hpHdb-00041o-S4
 for guix-patches@HIDDEN; Sun, 21 Jul 2019 15:36:53 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,RCVD_IN_DNSWL_NONE,
 URIBL_BLOCKED autolearn=disabled version=3.3.2
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <joseph@HIDDEN>) id 1hpHdZ-00070a-T3
 for guix-patches@HIDDEN; Sun, 21 Jul 2019 15:36:51 -0400
Received: from mx.kolabnow.com ([95.128.36.40]:41548)
 by eggs.gnu.org with esmtp (Exim 4.71)
 (envelope-from <joseph@HIDDEN>) id 1hpHdZ-0006zY-FS
 for guix-patches@HIDDEN; Sun, 21 Jul 2019 15:36:49 -0400
Received: from localhost (unknown [127.0.0.1])
 by ext-mx-out003.mykolab.com (Postfix) with ESMTP id ECFF9404CF
 for <guix-patches@HIDDEN>; Sun, 21 Jul 2019 21:36:46 +0200 (CEST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=kolabnow.com; h=
 content-type:content-type:mime-version:message-id:date:date
 :subject:subject:from:from:received:received:received; s=
 dkim20160331; t=1563737804; x=1565552205; bh=1G8y/+qyn776qWe3lpA
 pmlkG1rUwmdajrK3ZrX3WidI=; b=5nr918Hnd/7+z+lO/7XFvejlgLIVqU5ca2g
 nAR+LBYrZTa+g3zF4MhGbRctgD4Zl/xQ6mmIYNQV/sOIWO1vpaIRPGx3eJitTm1N
 tpx0xdEsf5silMLU9WJa+NlSk27Rx0XoWs3Kf/pGOPzX6mmeAOHBmemyC8V7cFG2
 ZQ7DoDMxIGWPAF3scKAi02mMi+XmEl+WBLtAyJOd6Db2RTSkMESZkev3vo1dxMXY
 zBi+xQBb3VJJy5a6wS0Fo7g+J1Tq1yzXpp83pH1Ek6JQfbv5jCIVdiuPJ5xfV9vb
 fKeGrcdNoFdtGcIisdFIAOsZ5YRMI7ZLkTmhJmG/OzFLrmBR2NCwWRZIgUXqs4m+
 jB0U2u49aUAypDCWv2zZYFv9aNkfkuwqFgAFnv1k3LbHHGVwRvIS7pqKSWUpF4jt
 KezbtuMe6Jv9B1ioJ8Ligjx+3HRmhdUIvDBo6DSerbUw5MFpasp+/jwiGiIhNEWF
 riW244xysluuToSekAjYtj6+LWAUIpzBJQzks9rpOvI3kmOllIJOdYS0t+HaGr8/
 wwe0MjuEBi4NKIoQWhj97LW1EuNphx1DX2JYXLHJ0Dnc96H8fYPxLXsCkckPXOvQ
 0PwFFKxQCbEf36K3u/NGr7o8k4C67wvI9/xOcfcSiz0Kvp21TrRdMX1uUpClOf3z
 QBCC4arI=
X-Virus-Scanned: amavisd-new at mykolab.com
Received: from mx.kolabnow.com ([127.0.0.1])
 by localhost (ext-mx-out003.mykolab.com [127.0.0.1]) (amavisd-new, port 10024)
 with ESMTP id IR278qhgV2f2 for <guix-patches@HIDDEN>;
 Sun, 21 Jul 2019 21:36:44 +0200 (CEST)
Received: from int-mx002.mykolab.com (unknown [10.9.13.2])
 by ext-mx-out003.mykolab.com (Postfix) with ESMTPS id BDEFC403BB
 for <guix-patches@HIDDEN>; Sun, 21 Jul 2019 21:36:44 +0200 (CEST)
Received: from ext-subm002.mykolab.com (unknown [10.9.6.2])
 by int-mx002.mykolab.com (Postfix) with ESMTPS id 731042464
 for <guix-patches@HIDDEN>; Sun, 21 Jul 2019 21:36:44 +0200 (CEST)
From: "LaFreniere\, Joseph" <joseph@HIDDEN>
To: guix-patches@HIDDEN
Subject: [PATCH] gnu: Add emacs-hyperbole.
Date: Sun, 21 Jul 2019 14:36:39 -0500
Message-ID: <875znv89iw.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Received-From: 95.128.36.40
X-Spam-Score: -0.9 (/)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.9 (-)

--=-=-=
Content-Type: text/plain; format=flowed

Please see the attached patch.

--
Joseph LaFreniere

--=-=-=
Content-Type: text/x-patch; charset=utf-8
Content-Disposition: attachment; filename=0001-gnu-Add-emacs-hyperbole.patch
Content-Transfer-Encoding: quoted-printable

From f97a05a1abe561c31dee815a1f3623c85c025868 Mon Sep 17 00:00:00 2001
From: Joseph LaFreniere <joseph@HIDDEN>
Date: Wed, 5 Jun 2019 01:27:49 -0500
Subject: [PATCH] gnu: Add emacs-hyperbole.

* gnu/packages/emacs-xyz.scm (emacs-hyperbole): Add at 7.0.3
---
 gnu/packages/emacs-xyz.scm                    | 63 ++++++++++++++
 .../emacs-hyperbole-do-not-check-dir.patch    | 24 ++++++
 .../patches/emacs-hyperbole-domainname.patch  | 29 +++++++
 .../emacs-hyperbole-toggle-messaging.patch    | 86 +++++++++++++++++++
 4 files changed, 202 insertions(+)
 create mode 100644 gnu/packages/patches/emacs-hyperbole-do-not-check-dir.p=
atch
 create mode 100644 gnu/packages/patches/emacs-hyperbole-domainname.patch
 create mode 100644 gnu/packages/patches/emacs-hyperbole-toggle-messaging.p=
atch

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index a808749444..7760b889aa 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -182,6 +182,69 @@ metadata.")
 (define-public geiser
   (deprecated-package "geiser" emacs-geiser))
=20
+(define-public emacs-hyperbole
+  (package
+    (name "emacs-hyperbole")
+    (version "7.0.3")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "http://ftpmirror.gnu.org/hyperbole/"
+                    "hyperbole-" version ".tar.gz"))
+              (sha256
+               (base32
+                "0znsjhm0lmzpmkgfni4qzx4l6dp604bmrzp3mwxxax2v96wpwmcx"))
+              (patches
+               (search-patches
+                "emacs-hyperbole-do-not-check-dir.patch"
+                "emacs-hyperbole-domainname.patch"
+                "emacs-hyperbole-toggle-messaging.patch"))))
+    (build-system emacs-build-system)
+    (arguments
+     `(#:include '("\\.el$" "\\.info$")
+       #:phases
+       (modify-phases %standard-phases
+         (add-before 'install 'make-info
+           (lambda _
+             (invoke "make" "info"))))))
+    (propagated-inputs `(("inetutils" ,inetutils)))
+    (home-page "https://www.gnu.org/software/hyperbole/")
+    (synopsis "The Everyday Hypertextual Information Manager")
+    (description
+     "GNU Hyperbole, or just Hyperbole, is an easy-to-use, yet powerful and
+programmable hypertextual information management system implemented as a G=
NU
+Emacs package.  It offers rapid views and interlinking of all kinds of tex=
tual
+information, utilizing Emacs for editing.  It can dramatically increase yo=
ur
+productivity and greatly reduce the number of keyboard/mouse keys you'll n=
eed
+to work efficiently.  Hyperbole lets you:
+
+@itemize
+@item Quickly create hyperlink buttons either from the keyboard or by drag=
ging
+between a source and destination window with a mouse button depressed.  La=
ter,
+activate buttons by pressing/clicking on them or by giving the name of the
+button.
+@item Activate many kinds of \"implicit buttons\" recognized by context wi=
thin
+text buffers, e.g. URLs, grep output lines, and git commits.  A single key=
 or
+mouse button automatically does the right thing in dozens of contexts; just
+press and go.
+@item Build outlines with multi-level numbered outline nodes, e.g. 1.4.8.6,
+that all renumber automatically as any node or tree is moved in the outlin=
e.
+Each node also has a permanent hyperlink anchor that you can reference from
+any other node.
+@item Manage all your contacts quickly with hierarchical categories and em=
bed
+hyperlinks within each entry.  Or create an archive of documents with
+hierarchical entries and use the same search mechanism to quickly find any
+matching entry.
+@item Use single keys to easily manage your Emacs windows or frames and
+quickly retrieve saved window and frame configurations.
+@item Search for things in your current buffers, in a directory tree or ac=
ross
+major web search engines with the touch of a few keys.
+@end itemize
+
+The common thread in all these features is making retrieval, management and
+display of information fast and easy.  That is Hyperbole's purpose.")
+    (license license:gpl3+)))
+
 (define-public emacs-paredit
   (package
     (name "emacs-paredit")
diff --git a/gnu/packages/patches/emacs-hyperbole-do-not-check-dir.patch b/=
gnu/packages/patches/emacs-hyperbole-do-not-check-dir.patch
new file mode 100644
index 0000000000..66c7a0fb08
--- /dev/null
+++ b/gnu/packages/patches/emacs-hyperbole-do-not-check-dir.patch
@@ -0,0 +1,24 @@
+From 3016fbd61e47978be73bbbaf7a8c2709bec42066 Mon Sep 17 00:00:00 2001
+From: Joseph LaFreniere <joseph@HIDDEN>
+Date: Fri, 12 Jul 2019 13:12:40 -0500
+Subject: [PATCH] Do not run hyperb:check-dir-user during initialization
+
+---
+ hyperbole.el | 1 -
+ 1 file changed, 1 deletion(-)
+
+diff --git a/hyperbole.el b/hyperbole.el
+index 872dbaf..6edb2a7 100644
+--- a/hyperbole.el
++++ b/hyperbole.el
+@@ -653,7 +653,6 @@ If FLAG is nil then text is shown, while if FLAG is t =
the text is hidden."
+   (interactive)
+   (message "Initializing Hyperbole...")
+   (run-hooks 'hyperbole-init-hook)
+-  (hyperb:check-dir-user)
+   (or (stringp hyperb:user-email)
+       (setq hyperb:user-email
+ 	    (or (and (boundp 'user-mail-address)
+--=20
+2.22.0
+
diff --git a/gnu/packages/patches/emacs-hyperbole-domainname.patch b/gnu/pa=
ckages/patches/emacs-hyperbole-domainname.patch
new file mode 100644
index 0000000000..cf4b63b54b
--- /dev/null
+++ b/gnu/packages/patches/emacs-hyperbole-domainname.patch
@@ -0,0 +1,29 @@
+From 17c87ac58ce6d475fa1987347fcb868ef7f75e40 Mon Sep 17 00:00:00 2001
+From: Joseph LaFreniere <joseph@HIDDEN>
+Date: Sun, 2 Jun 2019 12:38:27 -0500
+Subject: [PATCH] Replace executable domainname with hostname
+
+Fixes build failure:
+> ice-9/boot-9.scm:752:25: In procedure dispatch-exception:
+> patch-el-files: unable to locate  "domainname"
+---
+ hypb.el | 3 +--
+ 1 file changed, 1 insertion(+), 2 deletions(-)
+
+diff --git a/hypb.el b/hypb.el
+index 6abc17a..0332946 100644
+--- a/hypb.el
++++ b/hypb.el
+@@ -183,8 +183,7 @@ Global keymap is used unless optional KEYMAP is given."
+=20
+ (defun hypb:domain-name ()
+   "Returns current Internet domain name with '@' prepended or nil if none=
."
+-  (let* ((dname-cmd (or (file-exists-p "/usr/bin/domainname")
+-			(file-exists-p "/bin/domainname")))
++  (let* ((dname-cmd (file-exists-p "/bin/hostname"))
+ 	 (dname (or (and (boundp 'message-user-fqdn) (stringp message-user-fqdn)
+ 			 (string-match "\\." message-user-fqdn)
+ 			 message-user-fqdn)
+--=20
+2.21.0
+
diff --git a/gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch b/=
gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch
new file mode 100644
index 0000000000..ab66e1b389
--- /dev/null
+++ b/gnu/packages/patches/emacs-hyperbole-toggle-messaging.patch
@@ -0,0 +1,86 @@
+From 6d5c587ec719e3309077c7d637b03b13db65c047 Mon Sep 17 00:00:00 2001
+From: Joseph LaFreniere <joseph@HIDDEN>
+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))))
+=20
++;;;###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=E2=80=99 and ei=
ther
++adds hooks (nil value) or removes them (t value).
++
++With optional prefix ARG > 0, enables support.  If ARG <=3D 0,
++disables/inhibits support."
++  (interactive "P")
++  (setq inhibit-hyperbole-messaging (if (null arg)
++					(not inhibit-hyperbole-messaging)
++				      (<=3D (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 ne=
ws 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 a=
dded to `load-path' to fix.")))
+=20
+-;; 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=E2=80=99 and ei=
ther
+-adds hooks (nil value) or removes them (t value).
+-
+-With optional prefix ARG > 0, enables support.  If ARG <=3D 0,
+-disables/inhibits support."
+-  (interactive "P")
+-  (setq inhibit-hyperbole-messaging (if (null arg)
+-					(not inhibit-hyperbole-messaging)
+-				      (<=3D (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)
+--=20
+2.22.0
+
--=20
2.22.0


--=-=-=--




Acknowledgement sent to "LaFreniere\, Joseph" <joseph@HIDDEN>:
New bug report received and forwarded. Copy sent to guix-patches@HIDDEN. Full text available.
Report forwarded to guix-patches@HIDDEN:
bug#36751; Package guix-patches. Full text available.
Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.
Last modified: Mon, 25 Nov 2019 12:00:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.