diff options
| -rw-r--r-- | hydra.scm | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/hydra.scm b/hydra.scm index 8e3be16b08..65042cbe88 100644 --- a/hydra.scm +++ b/hydra.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2012 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2012, 2013 Ludovic Courtès <ludo@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -21,6 +21,15 @@ ;;; tool. ;;; +;; Attempt to use our very own Guix modules. +(eval-when (compile load eval) + (and=> (assoc-ref (current-source-location) 'filename) + (lambda (file) + (let ((dir (dirname file))) + (format (current-error-port) "prepending ~s to the load path~%" + dir) + (set! %load-path (cons dir %load-path)))))) + (use-modules (guix store) (guix packages) ((guix utils) #:select (%current-system)) |