;;; tojo-tokyo-guix-config --- Guix Channel for git.tojo.tokyo's package
;;; Copyright © 2022 Masaya Tojo <masaya@tojo.tokyo>
;;;
;;; This file is part of tojo-tokyo-guix-config.
;;;
;;; tojo-tokyo-guix-config is free software; you can redistribute
;;; it and/or modify it under the terms of the GNU General Public
;;; License as published by the Free Software Foundation; either
;;; version 3 of the License, or (at your option) any later version.
;;;
;;; tojo-tokyo-guix-config is distributed in the hope that it will
;;; be useful, but WITHOUT ANY WARRANTY; without even the implied
;;; warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
;;; See the GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with extract-green-color.  If not, see
;;; <http://www.gnu.org/licenses/>.

(define-module (tojo-tokyo packages emacs-xyz)
  #:use-module (guix packages)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix git-download)
  #:use-module (guix build-system emacs)
  #:use-module (gnu packages)
  #:use-module (gnu packages base)
  #:use-module (gnu packages emacs-xyz))

(define-public emacs-ellama-0.13
  (package
   (inherit emacs-ellama)
   (name "emacs-ellama")
   (version "0.13.0")
   (source (origin
            (method git-fetch)
            (uri (git-reference
                  (url "https://github.com/s-kostyaev/ellama")
                  (commit version)))
            (file-name (git-file-name name version))
            (sha256 (base32
                     "1abjp70q9ms6kdd1rs4zcrqzz0hfy7a5bizgl0ddrx7r0sfk9r06"))))))

(define-public emacs-ob-acl2
  (package
   (name "emacs-ob-acl2")
   (version "v0.1.0")
   (source
    (origin
     (method git-fetch)
     (uri (git-reference
           (url "https://git.tojo.tokyo/ob-acl2.git")
           (commit version)))
     (file-name (git-file-name name version))
     (sha256
      (base32 "125ihxgwha6jfd4qv5rlgbbrykjmjl8h3qvazqxps25ymyw2zm5s"))))
   (build-system emacs-build-system)
   (home-page "https://git.tojo.tokyo/ob-acl2.git/about/")
   (synopsis "Org-babel functions for ACL2")
   (description
    "This is implemented by pouring expressions into a *shell* buffer,
which is a standard ACL2 execution environment.
Must run acl2 with *shell* before using it.")
   (license license:gpl3+)))

(define-public emacs-cfrs
  (let ((commit "f3a21f237b2a54e6b9f8a420a9da42b4f0a63121")
        (revision "0"))
    (package
      (name "emacs-cfrs")
      (version (git-version "1.6.0" revision commit))
      (source
       (origin
         (method git-fetch)
         (uri (git-reference
               (url "https://github.com/Alexander-Miller/cfrs.git")
               (commit commit)))
         (file-name (git-file-name name version))
         (sha256
          (base32 "1vf5zm82sx3m1yvq73km8ajapv6rnz41b1jrsif7kh0ijh9vk3qi"))))
      (build-system emacs-build-system)
      (propagated-inputs (list emacs-s emacs-dash emacs-posframe))
      (home-page "https://github.com/Alexander-Miller/cfrs")
      (synopsis "Cild Frame Read String")
      (description
       "cfrs.el is a simple alternative to read-string that allows reading input via a small child-frame spawned at the position of the cursor.")
      (license license:gpl3+))))