mbakke

(use-modules (gnu)
             (srfi srfi-1)
             (srfi srfi-71)
             (git repository)
             (git reference)
             (git oid)
             (git commit)
             (git describe)
             (guix git)
             (guix packages)

mbakke

#!/usr/bin/env -S guile --no-auto-compile
;; Mode: -*- Scheme;-*-
!#

(use-modules (git repository)
             (git reference)
             (git oid)
             (git commit)
             (git describe)
             (guix git)

mbakke

;; This is a proof-of-concept and does not actually work (yet!).
;; The idea is that 'guix environment --ad-hoc -m vngl.scm -- glxgears' should
;; succeed even on unsupported graphics drivers, using the "foreign" libGL.

(use-modules (guix packages)
             (guix utils)
             (gnu packages gl))

(define vendor-neutral-mesa
  (package/inherit mesa

mbakke

(use-modules (gnu) (gnu system nss)
             (guix packages)
             (guix utils)
             (gnu services shepherd)
             (uio services monitoring))

(use-package-modules databases monitoring)
(use-service-modules databases monitoring networking web)

(define %zac-configuration-directory

mbakke

(use-modules (guix store)
             (guix monads)
             (guix packages)
             (guix graph)
             (guix scripts graph)
             (gnu packages)
             (ice-9 format))

(define (all-packages)
  (fold-packages (lambda (package result)

mbakke

# If GUIX_PROFILE is set while sourcing the profile, the variables will
# refer to that instead of just the latest generation of the profile.
GUIX_PROFILE="${HOME}/.guix-profile"
if [[ -L "${GUIX_PROFILE}" ]]; then
    . "${GUIX_PROFILE}/etc/profile"
fi

# Make sure the Guix from "guix pull" appears first in PATH.
export PATH="${HOME}/.config/guix/current/bin:${PATH}"
export INFOPATH="$HOME/.config/guix/current/share/info:$INFOPATH"

mbakke

(define-module (my packages)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (gnu packages linux)
  #:use-module (guix build-system trivial)
  #:use-module (gnu)
  #:use-module (guix download)
  #:use-module (guix git-download)
  #:use-module (guix packages))

(define (linux-nonfree-urls version)