steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

mason.disk: Fix usage of word

flac
Doug Coleman 2020-01-03 15:18:14 -06:00 committed by Steve Ayerhart
parent 0f0f5d6615
commit 64cde391fd
No known key found for this signature in database
GPG Key ID: 5BFD39C5359E967D
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
extra/mason/disk/disk.factor
View File

@ -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? [
@ -26,4 +25,4 @@ IN: mason.disk
"%0.2fGi used, %0.2fGi avail, %0.2fGi total, %0.2f%% free" sprintf ; "%0.2fGi used, %0.2fGi avail, %0.2fGi total, %0.2f%% free" sprintf ;
: disk-usage ( -- string ) : disk-usage ( -- string )
builds-dir get path>disk-usage ; builds-dir get path>disk-usage ;