[bug#36713] [PATCH 0/6] Add six Emacs packages.

[bug#36713] [PATCH 0/6] Add six Emacs packages.

[Jens Mølgaard]

[-- Attachment #1: Type: text/plain, Size: 186 bytes --]

Halløj Guix!

This patch series adds the following Emacs packages: emacs-bug-hunter,
emacs-gnus-alias, emacs-ox-epub, emacs-ox-pandoc, emacs-wc-mode,
emacs-mastodon.

--
Jens M

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

[bug#36713] [PATCH 1/6]

[Jens Mølgaard]

[-- Attachment #1.1: Type: text/plain, Size: 78 bytes --]

This adds emacs-bug-hunter, a tool to bisect the Emacs init file or
similar.


[-- Attachment #1.2: 0001-gnu-Add-emacs-bug-hunter.patch --]
[-- Type: text/x-patch, Size: 2128 bytes --]

From 9cb3ff48b9f6bdd280b97f4eea38def83dad5e57 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jens=20M=C3=B8lgaard?= <jens@zete.tk>
Date: Thu, 18 Jul 2019 19:43:04 +1200
Subject: [PATCH 1/6] gnu: Add emacs-bug-hunter.

* gnu/packages/emacs-xyz.scm (emacs-bug-hunter): New variable.
---
 gnu/packages/emacs-xyz.scm | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index d6f43ecfef..96f8039a72 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -49,6 +49,7 @@
 ;;; Copyright © 2019 LaFreniere, Joseph <joseph@lafreniere.xyz>
 ;;; Copyright © 2019 Amar Singh <nly@disroot.org>
 ;;; Copyright © 2019 Baptiste Strazzulla <bstrazzull@hotmail.fr>
+;;; Copyright © 2019 Jens Mølgaard <jens@zete.tk>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -947,6 +948,33 @@ regexp-like arguments to @code{skip-chars-forward} and
 @code{skip-chars-backward}.")
     (license license:gpl3+)))
 
+(define-public emacs-bug-hunter
+  (let ((commit "b88d981afa9154b236c5a3a83b50d5889d46c6a7")
+        (revision "1"))
+    (package
+      (name "emacs-bug-hunter")
+      (version (git-version "1.3.1" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/Malabarba/elisp-bug-hunter.git")
+               (commit commit)))
+         (file-name (git-file-name name commit))
+         (sha256
+          (base32
+           "134fj493sdn93pyyac8rpz1fzahzmayvphsrmqp3wvgysmfqm38l"))))
+      (build-system emacs-build-system)
+      (propagated-inputs
+       `(("emacs-seq" ,emacs-seq)))
+      (home-page "https://github.com/Malabarba/elisp-bug-hunter.git")
+      (synopsis "Hunt down errors by bisecting elisp files")
+      (description
+       "The Bug Hunter is an Emacs library that finds the source of an error
+or unexpected behavior inside an elisp configuration file (typically init.el
+or .emacs).")
+      (license license:gpl3+))))
+
 \f
 ;;;
 ;;; Web browsing.
-- 
2.22.0


[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

[bug#36713] [PATCH 2/6] Add emacs-gnus-alias.

[Jens Mølgaard]

[-- Attachment #1.1: Type: text/plain, Size: 91 bytes --]

This adds emacs-gnus-alias, for handling email identities for MUAs that
use message-mode.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1.2: 0002-gnu-Add-emacs-gnus-alias.patch --]
[-- Type: text/x-patch, Size: 2063 bytes --]

From 4864aabc6c480e78df1c1dfd57f3ef85f9063587 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jens=20M=C3=B8lgaard?= <jens@zete.tk>
Date: Thu, 18 Jul 2019 19:49:55 +1200
Subject: [PATCH 2/6] gnu: Add emacs-gnus-alias.

* gnu/packages/emacs-xyz.scm (emacs-gnus-alias): New variable.
---
 gnu/packages/emacs-xyz.scm | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 96f8039a72..b44b729793 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -16614,3 +16614,31 @@ directories, direct visualisation of image files, jumping directly to links by
 name (with autocompletion), a simple bookmark management system and
 connections using TLS encryption.")
     (license license:gpl3+)))
+
+(define-public emacs-gnus-alias
+  (package
+    (name "emacs-gnus-alias")
+    (version "20150316")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/hexmode/gnus-alias.git")
+                    (commit "9447d3ccb4c0e75d0468899cccff7aa249657bac")))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "1i278npayv3kfxxd1ypi9n83q5l402sbc1zkm11pf8g006ifqsp4"))))
+    (build-system emacs-build-system)
+    (home-page "https://melpa.org/#/gnus-alias")
+    (synopsis "Alternative to gnus-posting-styles")
+    (description "Provides a simple mechanism to switch Identities when using
+a message-mode or a message-mode derived mode. Identities can include From and
+Organisation headers, extra headers, body and signature. Other features:
+
+@itemize
+@item Switch Identities in a message buffer.
+@item Access original message to help determine Identity of the followup/reply
+message.
+@item Act on a forwarded message as if it were a message being replied to.
+@item Start a new message with a given Identity pre-selected.")
+    (license license:gpl2+)))
-- 
2.22.0


[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

[bug#36713] [PATCH 3/6] Add emacs-ox-epub.

[Jens Mølgaard]

[-- Attachment #1.1: Type: text/plain, Size: 76 bytes --]

This adds emacs-ox-epub. An exporter for org-mode for creating epub
files.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1.2: 0003-gnu-Add-emacs-ox-epub.patch --]
[-- Type: text/x-patch, Size: 1807 bytes --]

From 0a9d6536e4ce413d656d4c925abeeb80491a23a2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jens=20M=C3=B8lgaard?= <jens@zete.tk>
Date: Thu, 18 Jul 2019 19:52:11 +1200
Subject: [PATCH 3/6] gnu: Add emacs-ox-epub.

* gnu/packages/emacs-xyz.scm (emacs-ox-epub): New variable.
---
 gnu/packages/emacs-xyz.scm | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index b44b729793..3fb4a68417 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -16642,3 +16642,26 @@ message.
 @item Act on a forwarded message as if it were a message being replied to.
 @item Start a new message with a given Identity pre-selected.")
     (license license:gpl2+)))
+
+(define-public emacs-ox-epub
+  (package
+    (name "emacs-ox-epub")
+    (version "0.3")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/ofosos/ox-epub.git")
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "057sqmvm8hwkhcg3yd4i8zz2xlqsqrpyiklyiw750s3i5mxdn0k7"))))
+    (build-system emacs-build-system)
+    (home-page "https://github.com/ofosos/ox-epub")
+    (synopsis "Export org mode projects to EPUB")
+    (description "@code{ox-epub} extends the (X)HTML exporter to generate
+@code{.epub} files directly from OrgMode.  This will export EPUB version 2,
+which should give broad compatibility.  It should also be relatiely easy to
+convert the resulting @code{.epub} to a @code{.mobi} file.  Needs a working
+zip utility (default is @code{zip}).")
+    (license license:gpl3+)))
-- 
2.22.0


[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

[bug#36713] [PATCH 4/6] Add emacs-ox-pandoc.

[Jens Mølgaard]

[-- Attachment #1.1: Type: text/plain, Size: 102 bytes --]

This adds emacs-ox-pandoc, an org-mode exporter for various formats
using pandoc as an intermediary.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1.2: 0004-gnu-Add-emacs-ox-pandoc.patch --]
[-- Type: text/x-patch, Size: 1795 bytes --]

From 59527c4ff1d4b16056d87b4463f313236fce08cf Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jens=20M=C3=B8lgaard?= <jens@zete.tk>
Date: Thu, 18 Jul 2019 19:54:38 +1200
Subject: [PATCH 4/6] gnu: Add emacs-ox-pandoc.

* gnu/packages/emacs-xyz.scm (emacs-ox-pandoc): New variable.
---
 gnu/packages/emacs-xyz.scm | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 3fb4a68417..674b0d6748 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -16665,3 +16665,28 @@ which should give broad compatibility.  It should also be relatiely easy to
 convert the resulting @code{.epub} to a @code{.mobi} file.  Needs a working
 zip utility (default is @code{zip}).")
     (license license:gpl3+)))
+
+(define-public emacs-ox-pandoc
+  (package
+    (name "emacs-ox-pandoc")
+    (version "20180510")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/kawabata/ox-pandoc.git")
+                    (commit "aa37dc7e94213d4ebedb85c384c1ba35007da18e")))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "0iibxplgdp34bpq1yll2gmqjd8d8lnqn4mqjvx6cdf0y438yr4jz"))))
+    (build-system emacs-build-system)
+    (inputs
+     `(("pandoc" ,ghc-pandoc)))
+    (propagated-inputs
+     `(("emacs-dash" ,emacs-dash)
+       ("emacs-ht" ,emacs-ht)))
+    (home-page "https://github.com/kawabata/ox-pandoc")
+    (synopsis "Org exporter for Pandoc")
+    (description "@code{ox-pandoc} is an exporter for converting Org-mode
+files to numerous other formats via Pandoc.")
+    (license license:gpl3+)))
-- 
2.22.0


[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

[bug#36713] [PATCH 5/6] Add emacs-wc-mode.

[Jens Mølgaard]

[-- Attachment #1.1: Type: text/plain, Size: 65 bytes --]

This adds emacs-wc-mode, a word-count tracker for the modeline.


[-- Attachment #1.2: 0005-gnu-Add-emacs-wc-mode.patch --]
[-- Type: text/x-patch, Size: 1890 bytes --]

From 45cba602196f45c99efc983926ac931f225a0f39 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jens=20M=C3=B8lgaard?= <jens@zete.tk>
Date: Thu, 18 Jul 2019 19:55:46 +1200
Subject: [PATCH 5/6] gnu: Add emacs-wc-mode.

* gnu/packages/emacs-xyz.scm (emacs-wc-mode): New variable.
---
 gnu/packages/emacs-xyz.scm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 674b0d6748..cbec471a9d 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -16690,3 +16690,27 @@ zip utility (default is @code{zip}).")
     (description "@code{ox-pandoc} is an exporter for converting Org-mode
 files to numerous other formats via Pandoc.")
     (license license:gpl3+)))
+
+(define-public emacs-wc-mode
+  (package
+    (name "emacs-wc-mode")
+    (version "1.3")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/bnbeckwith/wc-mode.git")
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "0pjlxv46zzqdq6q131jb306vqlg4sfqls1x8vag7mmfw462hafqp"))))
+    (build-system emacs-build-system)
+    (home-page "https://github.com/bnbeckwith/wc-mode")
+    (synopsis "Running word count with goals (minor mode)")
+    (description "@code{wc-mode} is a minor mode, providing a ‘wc’ function
+for Emacs buffers as well as a modeline addition with live word, line and
+character counts.  Additionally, a user can set specific goals for adding or
+deleting words.  These goals were partly inspired by 750words.com where the
+goal of the site is to encourage writing by setting a goal of 750 words at a
+time.")
+    (license license:gpl3+)))
-- 
2.22.0


[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

[bug#36713] [PATCH 6/6] Add emacs-mastodon.

[Jens Mølgaard]

[-- Attachment #1.1: Type: text/plain, Size: 56 bytes --]

This adds emacs-mastodon, a mastodon client for emacs.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1.2: 0006-gnu-Add-emacs-mastodon.patch --]
[-- Type: text/x-patch, Size: 2066 bytes --]

From 7d26310aad9bcfff9f6962f80d2cea6980509677 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jens=20M=C3=B8lgaard?= <jens@zete.tk>
Date: Thu, 18 Jul 2019 20:00:40 +1200
Subject: [PATCH 6/6] gnu: Add emacs-mastodon.

* gnu/packages/emacs-xyz.scm (emacs-mastodon): New variable.
---
 gnu/packages/emacs-xyz.scm | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index cbec471a9d..6c63a3c479 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -16714,3 +16714,35 @@ deleting words.  These goals were partly inspired by 750words.com where the
 goal of the site is to encourage writing by setting a goal of 750 words at a
 time.")
     (license license:gpl3+)))
+
+(define-public emacs-mastodon
+  (package
+    (name "emacs-mastodon")
+    (version "0.9.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/jdenen/mastodon.el.git")
+                    (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "0hwax6y9dghqwsbnb6f1bnc7gh8xsh5cvcnayk2sn49x8b0zi5h1"))))
+    (build-system emacs-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         ;; Move the source files to the top level, which is included in
+         ;; the EMACSLOADPATH.
+         (add-after 'unpack 'move-source-files
+           (lambda _
+             (let ((el-files (find-files "./lisp" ".*\\.el$")))
+               (for-each (lambda (f)
+                           (rename-file f (basename f)))
+                         el-files))
+             #t)))))
+    (home-page "https://github.com/jdenen/mastodon.el")
+    (synopsis "Emacs client for Mastodon")
+    (description "@code{mastodon.el} is an Emacs client for Mastodon, the
+federated microblogging social network.")
+    (license license:gpl3+)))
-- 
2.22.0


[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

[bug#36713] [PATCH 6/6] Add emacs-mastodon.

[Brett Gilio]

Jens Mølgaard writes:

> This adds emacs-mastodon, a mastodon client for emacs.
>
> From 7d26310aad9bcfff9f6962f80d2cea6980509677 Mon Sep 17 00:00:00 2001
> From: =?UTF-8?q?Jens=20M=C3=B8lgaard?= <jens@zete.tk>
> Date: Thu, 18 Jul 2019 20:00:40 +1200
> Subject: [PATCH 6/6] gnu: Add emacs-mastodon.
>
> * gnu/packages/emacs-xyz.scm (emacs-mastodon): New variable.
> ---
>  gnu/packages/emacs-xyz.scm | 32 ++++++++++++++++++++++++++++++++
>  1 file changed, 32 insertions(+)
>
> diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
> index cbec471a9d..6c63a3c479 100644
> --- a/gnu/packages/emacs-xyz.scm
> +++ b/gnu/packages/emacs-xyz.scm
> @@ -16714,3 +16714,35 @@ deleting words.  These goals were partly inspired by 750words.com where the
>  goal of the site is to encourage writing by setting a goal of 750 words at a
>  time.")
>      (license license:gpl3+)))
> +
> +(define-public emacs-mastodon
> +  (package
> +    (name "emacs-mastodon")
> +    (version "0.9.0")
> +    (source (origin
> +              (method git-fetch)
> +              (uri (git-reference
> +                    (url "https://github.com/jdenen/mastodon.el.git")
> +                    (commit version)))
> +              (file-name (git-file-name name version))
> +              (sha256
> +               (base32
> +                "0hwax6y9dghqwsbnb6f1bnc7gh8xsh5cvcnayk2sn49x8b0zi5h1"))))
> +    (build-system emacs-build-system)
> +    (arguments
> +     `(#:phases
> +       (modify-phases %standard-phases
> +         ;; Move the source files to the top level, which is included in
> +         ;; the EMACSLOADPATH.
> +         (add-after 'unpack 'move-source-files
> +           (lambda _
> +             (let ((el-files (find-files "./lisp" ".*\\.el$")))
> +               (for-each (lambda (f)
> +                           (rename-file f (basename f)))
> +                         el-files))
> +             #t)))))
> +    (home-page "https://github.com/jdenen/mastodon.el")
> +    (synopsis "Emacs client for Mastodon")
> +    (description "@code{mastodon.el} is an Emacs client for Mastodon, the
> +federated microblogging social network.")
> +    (license license:gpl3+)))

Hi Jens,

Thank you for pushing this package to our repository. I am trying to use
it, but I am getting an issue that I can not replicate with other means
of acquiring the package. When
I try to use M-x mastodon, it gives me an usual error. Directly Git
cloning and loading it allows for it to work just fine.

Here is the issue.

https://github.com/jdenen/mastodon.el/issues/141

Because it is a known bug I dont know if it is something we can change
in our configuration. I am really interested in seeing if other people
can replicate the error using the Guix package

Thanks,
Brett Gilio

bug#36713: [PATCH 0/6] Add six Emacs packages.

[Ludovic Courtès]

Halløj!

I’ve applied all six patches, with minor tweaks to the description of
‘emacs-gnus-alias’.

Thank you!

Ludo’.