bug#43145: closed ([PATCH] gnu: Add emacs-next.)

[GNU bug Tracking System]

Your message dated Wed, 02 Sep 2020 16:43:24 +0200
with message-id <87pn745jeb.fsf@gnu.org>
and subject line Re: [bug#43145] [PATCH] gnu: Add emacs-next.
has caused the debbugs.gnu.org bug report #43145,
regarding [PATCH] gnu: Add emacs-next.
to be marked as done.

(If you believe you have received this mail in error, please contact
help-debbugs@gnu.org.)


-- 
43145: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=43145
GNU Bug Tracking System
Contact help-debbugs@gnu.org with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> [PATCH] gnu: Add emacs-next.
>
>
>
>
> Date: 
>
> Mon, 31 Aug 2020 23:35:41 -0400
>
>
>
>
> From: Morgan Smith <Morgan.J.Smith@outlook.com>
>
> * gnu/packages/emacs.scm (emacs-next): New variable.
> ---
>  gnu/packages/emacs.scm | 37 +++++++++++++++++++++++++++++++++++++
>  1 file changed, 37 insertions(+)
>
> diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm
> index 0cd3e04381..7f510e9a6f 100644
> --- a/gnu/packages/emacs.scm
> +++ b/gnu/packages/emacs.scm
> @@ -21,6 +21,7 @@
>  ;;; Copyright © 2019 Leo Prikler <leo.prikler@student.tugraz.at>
>  ;;; Copyright © 2019 Amin Bandali <bandali@gnu.org>
>  ;;; Copyright © 2020 Jack Hill <jackhill@jackhill.us>
> +;;; Copyright © 2020 Morgan Smith <Morgan.J.Smith@outlook.com>
>  ;;;
>  ;;; This file is part of GNU Guix.
>  ;;;
> @@ -276,6 +277,42 @@ large Lisp programs.  It has full Unicode support for 
> nearly all human
>  languages.")
>      (license license:gpl3+)))
>  
> +(define-public emacs-next
> +  (let ((commit "2ea34662c20f71d35dd52a5ed996542c7386b9cb")
> +        (revision "0")
> +        (emacs-version "28.0.50.1"))
> +    (package/inherit emacs
> +      (name "emacs-next")
> +      (version (git-version emacs-version revision commit))
> +      (source
> +       (origin
> +         (inherit (package-source emacs))
> +         (method git-fetch)
> +         (uri (git-reference
> +               (url "https://git.savannah.gnu.org/git/emacs.git";)
> +               (commit commit)))
> +         (sha256
> +          (base32
> +           "0igjm9kwiswn2dpiy2k9xikbdfc7njs07ry48fqz70anljj8y7y3"))))
> +      (arguments
> +       (substitute-keyword-arguments (package-arguments emacs)
> +         ((#:phases phases)
> +          `(modify-phases ,phases
> +             (replace 'strip-double-wrap
> +               (lambda* (#:key outputs #:allow-other-keys)
> +                 ;; Directly copy emacs-X.Y to emacs, so that it is not wrapped
> +                 ;; twice.  This also fixes a minor issue, where WMs would not 
> be
> +                 ;; able to track emacs back to emacs.desktop.
> +                 (with-directory-excursion (assoc-ref outputs "out")
> +                   (copy-file (string-append
> +                               "bin/emacs-"
> +                               ,(version-major+minor+point (package-version 
> emacs-next)))
> +                              "bin/emacs")
> +                   #t)))))))
> +      (native-inputs
> +       `(("autoconf" ,autoconf)
> +         ,@(package-native-inputs emacs))))))
> +
>  (define-public emacs-minimal
>    ;; This is the version that you should use as an input to packages that just
>    ;; need to byte-compile .el files.
> -- 
> 2.28.0
>
>
>
>
> --- End Message ---
> --- Begin Message ---
>
>
>
> Subject: 
>
> Re: [bug#43145] [PATCH] gnu: Add emacs-next.
>
>
>
>
> Date: 
>
> Wed, 02 Sep 2020 16:43:24 +0200
>
>
>
>
> User-agent: 
>
> Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux)
>
>
>
>
> Hi,
>
> Morgan.J.Smith@outlook.com skribis:
>
> > From: Morgan Smith <Morgan.J.Smith@outlook.com>
> >
> > * gnu/packages/emacs.scm (emacs-next): New variable.
>
> Applied with the following change to appease ‘guix lint’.
>
> Thank you!
>
> Ludo’.
>
> diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm
> index 7f510e9a6f..03c28ee7a7 100644
> --- a/gnu/packages/emacs.scm
> +++ b/gnu/packages/emacs.scm
> @@ -289,8 +289,9 @@ languages.")
>           (inherit (package-source emacs))
>           (method git-fetch)
>           (uri (git-reference
> -               (url "https://git.savannah.gnu.org/git/emacs.git";)
> +               (url "https://git.savannah.gnu.org/git/emacs.git/";)
>                 (commit commit)))
> +         (file-name (git-file-name name version))
>           (sha256
>            (base32
>             "0igjm9kwiswn2dpiy2k9xikbdfc7njs07ry48fqz70anljj8y7y3"))))
>
> --- End Message ---