|
@@ -96,8 +96,6 @@ function install_guile {
|
96
|
96
|
}
|
97
|
97
|
|
98
|
98
|
function install_guix_get_architecture {
|
99
|
|
- read_config_param ARCHITECTURE
|
100
|
|
-
|
101
|
99
|
if [[ ${ARCHITECTURE} == *"386" || ${ARCHITECTURE} == *"686" ]]; then
|
102
|
100
|
CURR_ARCH='i686'
|
103
|
101
|
fi
|
|
@@ -137,6 +135,17 @@ function install_guix_user {
|
137
|
135
|
fi
|
138
|
136
|
}
|
139
|
137
|
|
|
138
|
+function image_install_guix {
|
|
139
|
+ install_guix_get_architecture
|
|
140
|
+ if [ ! -d $rootdir$INSTALL_DIR/guix ]; then
|
|
141
|
+ mkdir -p $INSTALL_DIR/guix
|
|
142
|
+ fi
|
|
143
|
+ cd $rootdir$INSTALL_DIR/guix
|
|
144
|
+ if [ ! -f guix-binary-${GUIX_VERSION}.${CURR_ARCH}-linux.tar.xz ]; then
|
|
145
|
+ wget $GUIX_DOWNLOAD_URL/guix-binary-${GUIX_VERSION}.${CURR_ARCH}-linux.tar.xz
|
|
146
|
+ fi
|
|
147
|
+}
|
|
148
|
+
|
140
|
149
|
function install_guix {
|
141
|
150
|
if [[ $(app_is_installed install_guix) == "1" ]]; then
|
142
|
151
|
return
|
|
@@ -145,6 +154,8 @@ function install_guix {
|
145
|
154
|
apt-get -qy install wget xz-utils
|
146
|
155
|
|
147
|
156
|
read_config_param MY_USERNAME
|
|
157
|
+ read_config_param ARCHITECTURE
|
|
158
|
+
|
148
|
159
|
install_guix_get_architecture
|
149
|
160
|
|
150
|
161
|
if [ ! -d $INSTALL_DIR/guix ]; then
|