From eb252faef806b146908060f917d3effdb4eba245 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Tue, 22 Oct 2019 20:52:59 +0200 Subject: Adjust instructions for building development version. * README.org: Adjust build instructions. * guix/rekado/guile-studio.scm (guile-studio): Rename package to "guile-studio-devel". --- guix/rekado/guile-studio.scm | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-) (limited to 'guix/rekado') diff --git a/guix/rekado/guile-studio.scm b/guix/rekado/guile-studio.scm index 8e555bf..ca14a1e 100644 --- a/guix/rekado/guile-studio.scm +++ b/guix/rekado/guile-studio.scm @@ -10,17 +10,22 @@ (gnu packages emacs-xyz) (gnu packages gnome)) + +;;; XXX big bad hack... +(system* "tar" "-cf" "/tmp/guile-studio.tar" + "--exclude-vcs" "--exclude" "guix" + "-C" "/home/rekado/dev/" "guile-studio") + (define-public guile-studio (package - (name "guile-studio") + (name "guile-studio-devel") (version "0") - (source (local-file "../../guile-studio-configure.scm")) + (source "/tmp/guile-studio.tar") (build-system gnu-build-system) (arguments `(#:tests? #f ; there are none #:phases (modify-phases %standard-phases - (delete 'unpack) (delete 'configure) (replace 'build (lambda* (#:key source inputs outputs #:allow-other-keys) @@ -29,7 +34,8 @@ (share (string-append out "/share/"))) (mkdir-p share) (mkdir-p bin) - (apply invoke "guile" "-s" source + (apply invoke "guile" "-s" + "guile-studio-configure.scm" out (assoc-ref inputs "emacs") (assoc-ref inputs "guile-picture-language") -- cgit v1.2.3