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

(define-public emacs-inkplate
  (let ((commit "0897721a7b3d84aa3f200ae85fddd5fdd370fc42")
        (revision "0"))
    (package
     (name "emacs-inkplate")
     (version (git-version "0.0.1" revision commit))
     (source
      (origin
       (uri (git-reference
             (url "https://git.sr.ht/~ryuslash/inkplatel")
             (commit commit)))
       (method git-fetch)
       (sha256
        (base32 "0mqnpf4vrzn3013pcwcr9150k4jy4klrdg0pd3amhg2y25054w4s"))
       (file-name (git-file-name name version))))
     (build-system emacs-build-system)
     (synopsis "Interface for my Inkplate")
     (description
      "This package provides a way to communicate with Inkplate in peripheral mode.")
     (license license:gpl3+)
     (home-page "https://sr.ht/~ryuslash/inkplate/"))))

(define-public emacs-circe-serenity
  (let ((commit "6dbc0944755b198c923689c33e7287e444f6a310")
        (revision "0"))
    (package
     (name "emacs-circe-serenity")
     (version (git-version "0.0.1" revision commit))
     (source
      (origin
       (uri (git-reference
             (url "https://github.com/ryuslash/circe-serenity.git")
             (commit commit)))
       (method git-fetch)
       (sha256
        (base32 "05fpbvqx6ii8kypv880j3mdc8kql7k16dcs42vpaaabjwn3kv4kn"))
       (file-name (git-file-name name version))))
     (build-system emacs-build-system)
     (propagated-inputs
      `(("emacs-circe" ,emacs-circe)))
     (synopsis "Someone's idea of a more serene Circe configuration")
     (description "A configuration for Circe")
     (license license:gpl3)
     (home-page "https://github.com/ryuslash/circe-serenity"))))

(define-public emacs-embrace
  (package
   (name "emacs-embrace")
   (version "0.1.4")
   (source
    (origin
      (uri (git-reference
            (url "https://github.com/cute-jumper/embrace.el")
            (commit version)))
      (method git-fetch)
      (file-name (git-file-name name version))
      (sha256
       (base32 "1m0qyipkp5ydgcav8d0m58fbj1gilipbj7g8mg40iajr8wfqcjdc"))))
   (build-system emacs-build-system)
   (propagated-inputs
    `(("emacs-expand-region" ,emacs-expand-region)))
   (home-page "https://github.com/cute-jumper/embrace.el")
   (synopsis "Add/Change/Delete pairs based on `expand-region', similar to `evil-surround'")
   (description "This package is heavily inspired by evil-surround (which is a port of the vim
plugin surround.vim). But instead of using evil and its text objects, this
package relies on another excellent package expand-region.

For Emacs users who don’t like evil and thus don’t use evil-surround, embrace
provides similar commands that can be found in evil-surround. Evil is absolutely
not required. For evil-surround users, embrace can make your evil-surround
commands even better! (Have you noticed that evil-surround doesn’t work on many
custom pairs?)")
   (license license:gpl3+)))

(define-public emacs-insert-char-preview
  (let ((commit "0e4a62b5407fb1bed8920a4c13cf9a91065e15ad")
        (revision "0"))
   (package
     (name "emacs-insert-char-preview")
     (version (git-version "0.0.0" revision commit))
     (source
      (origin
        (uri (git-reference
              (url "https://gitlab.com/matsievskiysv/insert-char-preview")
              (commit commit)))
        (method git-fetch)
        (file-name (git-file-name name version))
        (sha256
         (base32 "0cqc23y9n63a7kl2p1zrfcsxnclfxcszfmbh2hmbrs6q05ys0kzg"))))
     (build-system emacs-build-system)
     (home-page "https://gitlab.com/matsievskiysv/insert-char-preview")
     (synopsis "Insert Unicode char")
     (description "Insert Unicode char via insert-char-preview similar to insert-char command, but
with character preview in completion prompt.")
     (license license:gpl3+))))

(define-public emacs-bats
  (let ((commit "d519f7c89f5ae17dfc33400596df4564b478315f")
        (revision "0"))
    (package
     (name "emacs-bats")
     (version (git-version "0.0.0" revision commit))
     (source
      (origin
       (uri (git-reference
             (url "https://github.com/dougm/bats-mode")
             (commit commit)))
       (method git-fetch)
       (file-name (git-file-name name version))
       (sha256
        (base32 "1ikb4rb20ng1yq95g3ydwpk37axmiw38rjzn1av9m4cs81qby4jv"))))
     (build-system emacs-build-system)
     (home-page "https://github.com/dougm/bats-mode")
     (synopsis "Emacs mode for editing and running Bats tests")
     (description "bats-mode is an Emacs mode for editing and running Bats tests.

bats-mode derives from the bash flavor of sh-mode, adding font-lock for bats
keywords.")
     (license license:gpl2+))))

(define-public emacs-flycheck-posframe
  (let ((commit "8f60c9bf124ab9597d681504a73fdf116a0bde12")
        (revision "0"))
    (package
     (name "emacs-flycheck-posframe")
     (version (git-version "0.0.0" revision commit))
     (source
      (origin
       (uri (git-reference
             (url "https://github.com/alexmurray/flycheck-posframe")
             (commit commit)))
       (method git-fetch)
       (file-name (git-file-name name version))
       (sha256
        (base32 "0qh9hzvs95jvfrspglzkwhfq6a5pinab94bbh5vzkg8jc2fq6drf"))))
     (build-system emacs-build-system)
     (propagated-inputs
      `(("emacs-flycheck" ,emacs-flycheck)
        ("emacs-posframe" ,emacs-posframe)))
     (home-page "https://github.com/alexmurray/flycheck-posframe")
     (synopsis "Show flycheck errors via posframe.el")
     (description "Show flycheck errors via posframe.el")
     (license license:gpl3+))))

(define-public emacs-flycheck-cask
  (package
   (name "emacs-flycheck-cask")
   (version "0.4")
   (source
    (origin
     (uri (git-reference
           (url "https://github.com/flycheck/flycheck-cask")
           (commit version)))
     (method git-fetch)
     (file-name (git-file-name name version))
     (sha256
      (base32 "1wm5saf29gw0gp0qq5glf9qq3iras99npc2rip7bsnn0czr2mscy"))))
   (build-system emacs-build-system)
   (propagated-inputs
    `(("emacs-flycheck" ,emacs-flycheck)
      ("emacs-dash" ,emacs-dash)))
   (home-page "https://github.com/flycheck/flycheck-cask")
   (synopsis "Cask support for Flycheck")
   (description "Make Flycheck use Cask packages in Cask projects.")
   (license license:gpl3+)))

(define-public emacs-nroam
  (package
   (name "emacs-nroam")
   (version "20210325.2015")
   (source
    (origin
     (method url-fetch)
     (uri (string-append
           "https://melpa.org/packages/nroam-"
           version
           ".tar"))
     (sha256
      (base32
       "1aybc2k8kyf2dlpbq39p3k1nsvzrhw58xarbwwq0qgz91r49m4xq"))))
   (build-system emacs-build-system)
   (propagated-inputs
    `(("emacs-org-roam" ,emacs-org-roam)
      ("emacs-org" ,emacs-org)))
   (home-page
    "https://github.com/NicolasPetton/nroam")
   (synopsis
    "Org-roam backlinks within org-mode buffers")
   (description
    "nroam is a supplementary package for org-roam that replaces the backlink side
buffer of Org-roam.  Instead, it displays org-roam backlinks at the end of
org-roam buffers.

To setup nroam for all org-roam buffers, evaluate the following:
(add-hook 'org-mode-hook #'nroam-setup-maybe)
")
   (license license:gpl3+)))

(define-public emacs-eldoc-cmake
  (package
   (name "emacs-eldoc-cmake")
   (version "20190419.2244")
   (source
    (origin
     (method url-fetch)
     (uri (string-append
           "https://melpa.org/packages/eldoc-cmake-"
           version
           ".el"))
     (sha256
      (base32
       "08qa4lp22pracwskjq1kqv6kjwfbgyjsjsxb8kv820ndz5ccwaik"))))
   (build-system emacs-build-system)
   (home-page
    "https://github.com/ikirill/eldoc-cmake")
   (synopsis "Eldoc support for CMake")
   (description
    "
CMake eldoc support, using a pre-generated set of docstrings from
CMake's documentation source.

See function `eldoc-cmake-enable'.
")
   (license license:gpl3)))