5d40a832f5fd4720e3cac8b987e67723460dbd0f — Charles 4 months ago fd71526
Add guixrus-scripts
1 files changed, 49 insertions(+), 5 deletions(-)

M guixrus/packages/guix.scm
M guixrus/packages/guix.scm => guixrus/packages/guix.scm +49 -5
@@ 20,14 20,15 @@
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

(define-module (guixrus packages guix)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (gnu packages guile)
  #:use-module (gnu packages package-management)
  #:use-module (gnu packages)
  #:use-module (guix build-system guile)
  #:use-module (guix git-download)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)
  #:use-module (guix utils)
  #:use-module (gnu packages)
  #:use-module (gnu packages guile)
  #:use-module (gnu packages package-management))
  #:use-module (guix search-paths)
  #:use-module (guix utils))

(define-public guix-easy
  (let ((commit "8c3f052a7090612b72d697467f5b2847cf23ed09")

@@ 75,3 76,46 @@
      (description "@code{doug} provides utilities to serialize a Guix channel.")
      (license license:gpl3+))))

(define-public guixrus-scripts
    (name "guixrus-scripts")
    (version "0")
       (method git-fetch)
         (url "https://git.sr.ht/~whereiseveryone/guixrus-scripts")
         (commit (string-append "v" version))))
    (build-system guile-build-system)
       (modify-phases %standard-phases
         (add-after 'install 'move-to-extension-directory
           (lambda* (#:key outputs #:allow-other-keys)
             (let ((out (assoc-ref outputs "out"))
                   (extensions (list "rus-environment.scm"
               (map (lambda (extension)
                      (let ((target (string-append
                        (mkdir-p (dirname target))
                        (copy-file (car (find-files out extension))
    (native-inputs (list (lookup-package-input guix "guile") guix))
     (list (search-path-specification
            (variable "GUILE_LOAD_PATH")
            (files '("share/guile/site/3.0")))))
    (synopsis "Testing ground for guix command line extensions.")
    (description "Extensions for guix command line that should be upstreamed
once proven they are good.")
    (home-page "https://git.sr.ht/~whereiseveryone/guixrus-scripts")
    (license license:gpl3+)))