mason.disk: Fix usage of word
parent
0f0f5d6615
commit
64cde391fd
|
@ -8,8 +8,7 @@ IN: mason.disk
|
||||||
|
|
||||||
: sufficient-disk-space? ( -- ? )
|
: sufficient-disk-space? ( -- ? )
|
||||||
current-directory get find-mount-point-info
|
current-directory get find-mount-point-info
|
||||||
file-system-info available-space>>
|
available-space>> 1 Gi > ;
|
||||||
1 Gi > ;
|
|
||||||
|
|
||||||
: check-disk-space ( -- )
|
: check-disk-space ( -- )
|
||||||
sufficient-disk-space? [
|
sufficient-disk-space? [
|
||||||
|
|
Loading…
Reference in New Issue