diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2013-02-21 10:27:34 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2013-02-21 10:27:34 +0100 |
| commit | 525ca3e912507d45e1df29e7ab88b090f8d19dd4 (patch) | |
| tree | 5779060c74a435fce6151039674e36887b0304fe | |
| parent | f651b477b701d086402c18665eca68b26c3bec6b (diff) | |
guix: Make sure UPDATES-DIR is valid.
* scripts/guix.in: Make sure UPDATES-DIR is not #f.
| -rw-r--r-- | scripts/guix.in | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/guix.in b/scripts/guix.in index 1315789a9c9..4015560cd58 100644 --- a/scripts/guix.in +++ b/scripts/guix.in | |||
| @@ -51,7 +51,7 @@ | |||
| 51 | (and=> (getenv "HOME") | 51 | (and=> (getenv "HOME") |
| 52 | (cut string-append <> "/.config"))) | 52 | (cut string-append <> "/.config"))) |
| 53 | (cut string-append <> "/guix/latest")))) | 53 | (cut string-append <> "/guix/latest")))) |
| 54 | (when (file-exists? updates-dir) | 54 | (when (and updates-dir (file-exists? updates-dir)) |
| 55 | (push! updates-dir %load-path) | 55 | (push! updates-dir %load-path) |
| 56 | (push! updates-dir %load-compiled-path))))) | 56 | (push! updates-dir %load-compiled-path))))) |
| 57 | 57 | ||