[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[Rostislav Svoboda]

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

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 2b96c60057..d037fa9075 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -36689,6 +36689,52 @@ (define-public emacs-tintin-mode
       (description "This major mode focuses on highlighting as many aspects of the TinTin++ scripting language as possible, organizing commands into functional categories and highlighting specific modes that many commands use to accomplish different tasks.")
       (license license:asl2.0))))
 
+(define-public emacs-copilot
+  (let ((commit "e11847ab0c3b183a1e53fbc1ac587de82912b9cf")
+        (revision "0"))
+    (package
+      (name "emacs-copilot")
+      (version (git-version "0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/zerolfx/copilot.el.git")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32
+           "0gsxb268vqyim65ag8d7dlgdqyxqrjcjirlnbfbfq0pdr1y2158q"))))
+      (build-system emacs-build-system)
+      (arguments
+       (list
+        #:include #~(cons "^dist/" %default-include)
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'substitute-copilot-node-executable
+              (lambda* (#:key inputs #:allow-other-keys)
+                (emacs-substitute-variables "copilot.el"
+                  ("copilot-node-executable"
+;;; Copilot requires Node 16+, however packaging v16 and/or v18 is not
+;;; trivial. See https://issues.guix.gnu.org/53414,
+;;; https://issues.guix.gnu.org/59188 .
+;;;
+;;; As a hack, download and compile recent Node version manually.
+                   (format #f "%s/node-v18.15.0/out/Release/node" (getenv "dev")) ; Remove this line when Node 16+ becomes available as a Guix package.
+                   ;; (search-input-file inputs "/bin/node")                      ; Activate this line when Node 16+ becomes available as a Guix package.
+                   )))))))
+      ;; (inputs (list node))                                                     ; Activate this line when Node 16+ becomes available as a Guix package.
+      (propagated-inputs
+       (list emacs-dash emacs-editorconfig emacs-s))
+      (home-page
+       "https://github.com/zerolfx/copilot.el.git")
+      (synopsis "An unofficial Copilot plugin for Emacs")
+      (description
+       "Copilot.el is an Emacs plugin for GitHub Copilot. This plugin is
+unofficial and based on binaries provided by copilot.vim. Note: You need
+access to GitHub Copilot to use this plugin.")
+      (license license:gpl3+))))
+
 ;;;
 ;;; Avoid adding new packages to the end of this file. To reduce the chances
 ;;; of a merge conflict, place them above by existing packages with similar
-- 
2.39.2

[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[Rostislav Svoboda]

As hinted in the commit message, this patch is Work-In-Progress,
waiting for Node v16+ to become available as a Guix package. I.e. this
patch is not ready for integration in the upstream, yet
However I assume some folks may benefit from it, anyway.

Cheers Bost

Le mar. 4 avr. 2023 à 16:31, Rostislav Svoboda
<rostislav.svoboda@gmail.com> a écrit :
>
> ---
>  gnu/packages/emacs-xyz.scm | 46 ++++++++++++++++++++++++++++++++++++++
>  1 file changed, 46 insertions(+)
>
> diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
> index 2b96c60057..d037fa9075 100644
> --- a/gnu/packages/emacs-xyz.scm
> +++ b/gnu/packages/emacs-xyz.scm
> @@ -36689,6 +36689,52 @@ (define-public emacs-tintin-mode
>        (description "This major mode focuses on highlighting as many aspects of the TinTin++ scripting language as possible, organizing commands into functional categories and highlighting specific modes that many commands use to accomplish different tasks.")
>        (license license:asl2.0))))
>
> +(define-public emacs-copilot
> +  (let ((commit "e11847ab0c3b183a1e53fbc1ac587de82912b9cf")
> +        (revision "0"))
> +    (package
> +      (name "emacs-copilot")
> +      (version (git-version "0" revision commit))
> +      (source
> +       (origin
> +         (method git-fetch)
> +         (uri (git-reference
> +               (url "https://github.com/zerolfx/copilot.el.git")
> +               (commit commit)))
> +         (file-name (git-file-name name version))
> +         (sha256
> +          (base32
> +           "0gsxb268vqyim65ag8d7dlgdqyxqrjcjirlnbfbfq0pdr1y2158q"))))
> +      (build-system emacs-build-system)
> +      (arguments
> +       (list
> +        #:include #~(cons "^dist/" %default-include)
> +        #:phases
> +        #~(modify-phases %standard-phases
> +            (add-after 'unpack 'substitute-copilot-node-executable
> +              (lambda* (#:key inputs #:allow-other-keys)
> +                (emacs-substitute-variables "copilot.el"
> +                  ("copilot-node-executable"
> +;;; Copilot requires Node 16+, however packaging v16 and/or v18 is not
> +;;; trivial. See https://issues.guix.gnu.org/53414,
> +;;; https://issues.guix.gnu.org/59188 .
> +;;;
> +;;; As a hack, download and compile recent Node version manually.
> +                   (format #f "%s/node-v18.15.0/out/Release/node" (getenv "dev")) ; Remove this line when Node 16+ becomes available as a Guix package.
> +                   ;; (search-input-file inputs "/bin/node")                      ; Activate this line when Node 16+ becomes available as a Guix package.
> +                   )))))))
> +      ;; (inputs (list node))                                                     ; Activate this line when Node 16+ becomes available as a Guix package.
> +      (propagated-inputs
> +       (list emacs-dash emacs-editorconfig emacs-s))
> +      (home-page
> +       "https://github.com/zerolfx/copilot.el.git")
> +      (synopsis "An unofficial Copilot plugin for Emacs")
> +      (description
> +       "Copilot.el is an Emacs plugin for GitHub Copilot. This plugin is
> +unofficial and based on binaries provided by copilot.vim. Note: You need
> +access to GitHub Copilot to use this plugin.")
> +      (license license:gpl3+))))
> +
>  ;;;
>  ;;; Avoid adding new packages to the end of this file. To reduce the chances
>  ;;; of a merge conflict, place them above by existing packages with similar
> --
> 2.39.2
>

[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[jgart via Guix-patches via]

Hi Rostislav,

Thanks for this patch. It builds fine for me. Linter complains about a few nitpicks regarding line lengths and article of synopsis.

I added your patch as a pre-release to Guix "R" Us:

https://git.sr.ht/~whereiseveryone/guixrus/commit/4fe9054f758c022ef757773b9870cbd548bde26d

I'll let you know if we run into any other issues when trying the package from Guix "R" Us.

all best,

jgart

https://whereis.みんな/
https://toys.whereis.みんな/

[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[Liliana Marie Prikler]

Am Dienstag, dem 04.04.2023 um 16:30 +0200 schrieb Rostislav Svoboda:
> +       "Copilot.el is an Emacs plugin for GitHub Copilot. This
> plugin is
> +unofficial and based on binaries provided by copilot.vim. Note: You
> need
> +access to GitHub Copilot to use this plugin.")
> +      (license license:gpl3+))))
Given that this package is based on binaries, and the fact that Github
Copilot has attracted a wide variety of concerns regarding licensing,
privacy and autocompleted vulnerabilities, I think we can do better
without it :)

Cheers

[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[Giovanni Biscuolo]

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

Liliana Marie Prikler <liliana.prikler@gmail.com> writes:

> Am Dienstag, dem 04.04.2023 um 16:30 +0200 schrieb Rostislav Svoboda:
>> +       "Copilot.el is an Emacs plugin for GitHub Copilot. This
>> plugin is
>> +unofficial and based on binaries provided by copilot.vim. Note: You
>> need
>> +access to GitHub Copilot to use this plugin.")
>> +      (license license:gpl3+))))
> Given that this package is based on binaries,

binaries are wasm files in "dist" folder:
https://github.com/zerolfx/copilot.el/tree/main/dist

--8<---------------cut here---------------start------------->8---
tree-sitter-go.wasm
tree-sitter-javascript.wasm
tree-sitter-python.wasm
tree-sitter-ruby.wasm
tree-sitter-typescript.wasm
tree-sitter.wasm
--8<---------------cut here---------------end--------------->8---

AFAIU taken by copilot.vim repo:
https://github.com/github/copilot.vim/tree/release/copilot/dits

> and the fact that Github
> Copilot has attracted a wide variety of concerns regarding licensing,
> privacy and autocompleted vulnerabilities, I think we can do better
> without it :)

For what it matters, I totally agree with Liliana

Thanks! Gio'

-- 
Giovanni Biscuolo

Xelera IT Infrastructures

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

[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[Brian Cully via Guix-patches via]

> Given that this package is based on binaries, and the fact that Github
> Copilot has attracted a wide variety of concerns regarding licensing,
> privacy and autocompleted vulnerabilities, I think we can do better
> without it :)

I came to this ticket to make this same comment.

[bug#62664]

[jgart via Guix-patches via]

Hi,

The author is making an effort to prepare copilot.el for submission to MELPA:

https://github.com/zerolfx/copilot.el/issues/120

This package is obviously not ready for GNU Guix at this moment given the vendored WASM, etc. but let's give the project maintainer a chance to see how they manage to prepare this Emacs package for inclusion in MELPA.

[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[jgart via Guix-patches via]

Hi Guixers,

Here's a revised patch for emacs-copilot. Please review and let me know
if I can merge it.

This package has been cleaned of all binaries and is now being prepared
for submission to MELPA:

https://github.com/melpa/melpa/pull/9217

I believe it now complies with all requirements for inclusion in GNU
Guix.

I've added Rostislav as a co-author.

WDYT
-- 
all the best,
jgart

[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[Nicolas Goaziou via Guix-patches via]

Hello,

jgart via Guix-patches via <guix-patches@gnu.org> writes:

> Here's a revised patch for emacs-copilot. Please review and let me know
> if I can merge it.

Did you forget to add the patch to your email?

Regards,
-- 
Nicolas Goaziou

[bug#62664] [PATCH] [WIP] gnu: Add emacs-copilot.

[jgart via Guix-patches via]

> Did you forget to add the patch to your email?

Yes, I did ;()

Attached in previous email to this thread.
-- 
all the best,
jgart

[bug#62664] [PATCH v2] gnu: Add emacs-copilot.

[jgart via Guix-patches via]

* gnu/packages/emacs-xyz.scm (emacs-copilot): New variable.
Co-authored-by: Rostislav Svoboda <rostislav.svoboda@gmail.com>

Change-Id: If2e32f5cc4df95ce99642b41a1df818a35b4343c
---
 gnu/packages/emacs-xyz.scm | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 488b4cb5d7..76c9ed9947 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -4422,6 +4422,43 @@ (define-public emacs-carp
 listing type errors via Flycheck, as well as REPL support for Carp.")
       (license license:asl2.0))))
 
+(define-public emacs-copilot
+  (let ((commit "b5878d6a8c741138b5efbf4fe1c594f3fd69dbdd")
+        (revision "0"))
+    (package
+      (name "emacs-copilot")
+      (version (git-version "1.27.0" revision commit))
+      (source
+       (origin
+         (uri (git-reference
+               (url "https://github.com/copilot-emacs/copilot.el")
+               (commit commit)))
+         (method git-fetch)
+         (sha256
+          (base32 "1dgi3g2n57dv1a8hjjzgccrbl1bdf4xqwn9bmr453fz4qfab0v6k"))
+         (file-name (git-file-name name version))))
+      (build-system emacs-build-system)
+      (arguments
+       (list
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'substitute-copilot-node-executable
+              (lambda* (#:key inputs #:allow-other-keys)
+                (emacs-substitute-variables "copilot.el"
+                  ("copilot-node-executable"
+                   (search-input-file inputs "/bin/node"))))))))
+      (inputs (list node-lts))
+      (propagated-inputs
+       (list emacs-dash
+             emacs-editorconfig
+             emacs-f
+             emacs-s))
+      (home-page "https://github.com/copilot-emacs/copilot.el")
+      (synopsis "Copilot plugin for Emacs")
+      (description
+       "This package provides an Emacs plugin for GitHub Copilot.")
+      (license license:expat))))
+
 (define-public emacs-coterm
   (package
     (name "emacs-coterm")

base-commit: 0d15c6e46c5c3a14ae776bb98c293527ba8ad319
-- 
2.46.0