;;; Copyright © 2026 bdunahu <bdunahu@operationnull.com>
;;;
;;; SPDX-License-Identifier: GPL-3.0-or-later

(define-module (tanelorn packages emacs)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix gexp)
  #:use-module (guix git-download)
  #:use-module (guix download)
  #:use-module (tanelorn packages)
  #:use-module (guix packages)
  #:use-module (gnu packages emacs))

(define-public emacs-next-alpha-fix
  (let ((commit "509228fc6c026921c67459f21164e0325efc583b")
        (revision "2")
        (name "emacs-next-alpha-fix"))
    (emacs->emacs-next
     emacs
     name
     #:source
     (origin
       (inherit (package-source emacs-minimal))
       (method git-fetch)
       (uri (git-reference
              (url "https://git.savannah.gnu.org/git/emacs.git")
              (commit commit)))
       (file-name (git-file-name name
                                 (git-version "31.0.50" revision commit)))
       (sha256
        (base32 "04aalyrx5jysk5fhlka98fhfx23sy99zp8j16i0ils20sflyig6n"))
       (patches
        (tanelorn-patches "emacs-next-disable-jit-compilation.patch"
                          "emacs-next-exec-path.patch"
                          "emacs-fix-scheme-indent-function.patch"
                          "emacs-native-comp-driver-options.patch"
                          "emacs-next-native-comp-fix-filenames.patch"
                          "emacs-native-comp-pin-packages.patch"

                          ;; fixes an issue with alpha-transparency
                          "emacs-fix-transparency.patch"))))))