[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#48205] [PATCH] gnu: emacs-org: Don't use release tar
From: |
Morgan . J . Smith |
Subject: |
[bug#48205] [PATCH] gnu: emacs-org: Don't use release tar |
Date: |
Fri, 26 Nov 2021 00:12:25 -0500 |
From: Morgan Smith <Morgan.J.Smith@outlook.com>
* gnu/packages/emacs-xyz.scm (emacs-org):
[source]: Use git repository
[arguments]: Added phases to help with building
[native-inputs]: Added texinfo
---
So I still have no clue why the current emacs-org package is not reproducible,
but I made a package that is reproducible. It also is building from the
development source so people can use package transformations easier and it
actually runs the tests.
gnu/packages/emacs-xyz.scm | 46 +++++++++++++++++++++++++++-----------
1 file changed, 33 insertions(+), 13 deletions(-)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 0cc66b6787..ab7b6fcf6a 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -12439,24 +12439,44 @@ (define-public emacs-org
(version "9.5")
(source
(origin
- (method url-fetch)
- (uri (string-append "https://elpa.gnu.org/packages/org-" version
".tar"))
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://git.savannah.gnu.org/git/emacs/org-mode.git")
+ (commit (string-append "release_" version))))
+ (file-name (git-file-name name version))
(sha256
- (base32 "16cflg5nms5nb8w86nvwkg49zkl0rvdhigkf4xpvbs0v7zb5y3ky"))))
+ (base32
+ "1gnzx53gkg2c6ljam31bvbibkra66lfx0w04jqmsv2gk8613527r"))))
(build-system emacs-build-system)
(arguments
- `(#:phases
+ `(#:tests? #t
+ #:test-command '("make" "test-dirty")
+ #:phases
(modify-phases %standard-phases
- (add-after 'install 'install-documentation
+ (delete 'build)
+ (add-before 'check 'make
+ (lambda _
+ (invoke "make" (string-append "ORGVERSION=" ,version))))
+ (replace 'install
(lambda* (#:key outputs #:allow-other-keys)
- (let* ((share (string-append (assoc-ref outputs "out") "/share"))
- (info-dir (string-append share "/info"))
- (doc-dir (string-append share "/doc/" ,name "-" ,version)))
- (install-file "org.info" info-dir)
- (install-file "orgguide.info" info-dir)
- ;; XXX: "orgcard.pdf" is not built in Org 9.5.
- ;; (install-file "orgcard.pdf" doc-dir)
- ))))))
+ (substitute* "local.mk"
+ (("^prefix.*") (string-append "prefix = " (assoc-ref outputs
"out")))
+ (("^lispdir.*")
+ (string-append "lispdir = " (elpa-directory (assoc-ref outputs
"out")))))
+ (invoke "make" "install")))
+ (add-after 'unpack 'fix-tests
+ (lambda _
+ ;; These files are modified during testing
+ (make-file-writable "testing/examples/babel.org")
+ (make-file-writable "testing/examples/ob-awk-test.org")
+ (make-file-writable "testing/examples/ob-sed-test.org")
+ (make-file-writable "testing/examples/ob-shell-test.org")
+
+ ;; Specify where sh is
+ (substitute* "testing/examples/babel.org"
+ (("/bin/sh") (which "sh"))))))))
+ (native-inputs
+ `(("texinfo" ,texinfo)))
(home-page "https://orgmode.org/")
(synopsis "Outline-based notes management and organizer")
(description "Org is an Emacs mode for keeping notes, maintaining TODO
--
2.34.0
- [bug#48205] [PATCH] gnu: emacs-org: Don't use release tar,
Morgan . J . Smith <=