Overview
Comment: | Merged the create run area change. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | v1.65 |
Files: | files | file ages | folders |
SHA1: |
83edad0b8e3b7d7932fa579d0dce19b0 |
User & Date: | mrwellan on 2018-07-16 13:23:02 |
Other Links: | branch diff | manifest | tags |
Context
2018-07-19
| ||
08:31 | Fixed issues with ! variables bleeding into environment and update to mtut check-in: b04e689404 user: jmoon18 tags: v1.65, v1.6513 | |
2018-07-16
| ||
13:23 | Merged the create run area change. check-in: 83edad0b8e user: mrwellan tags: v1.65 | |
2018-07-13
| ||
17:25 | Creates diectories if does not exist for the disks/paths provided Leaf check-in: 27a8f638a9 user: raghavki tags: create-disk | |
2018-07-12
| ||
11:41 | Added localhost as fallback when checking for cpu load check-in: 10d6c50ecd user: mrwellan tags: v1.65 | |
Changes
Modified launch.scm from [46cdbaf4d6] to [53c1bc7991].
︙ | |||
1123 1124 1125 1126 1127 1128 1129 | 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 | - - - + + + + + + + + + + + + + + | (minspace (let ((m (configf:lookup confdat "setup" "minspace"))) (string->number (or m "10000"))))) (if disks (let ((res (common:get-disk-with-most-free-space disks minspace))) ;; min size of 1000, seems tad dumb (if res (cdr res) (begin |
︙ |