diff --git a/images/apple/PLEIADES-2.20.po b/images/apple/PLEIADES-2.20.po
index d169a89..0cf0271 100644
Binary files a/images/apple/PLEIADES-2.20.po and b/images/apple/PLEIADES-2.20.po differ
diff --git a/images/apple/UPDATE-2.21.po b/images/apple/UPDATE-2.21.po
index 1e91155..428206f 100755
Binary files a/images/apple/UPDATE-2.21.po and b/images/apple/UPDATE-2.21.po differ
diff --git a/src/utilsrc/apple/cat.pla b/src/utilsrc/apple/cat.pla
index 87d4d7d..6a319f9 100644
--- a/src/utilsrc/apple/cat.pla
+++ b/src/utilsrc/apple/cat.pla
@@ -10,7 +10,7 @@ predef catalog(pathstr)#0
 var arg, recurse, exit
 char[64] path, wildname
 res[t_fileinfo] fileinfo
-res[t_fileentry] fileentry
+word[2] blockcnt, usedcnt, freecnt
 //
 // Copy string with upper case conversion
 //
@@ -116,6 +116,16 @@ def catalog(pathstr)#0
         heaprelease(entrylist)
     fin
 end
+def trimpath(fullpathstr)#0
+    byte i
+
+    for i = 2 to ^fullpathstr
+        if fullpathstr->[i] == '/'
+            ^fullpathstr = i
+            return
+        fin
+    next
+end
 //
 // Install error exit
 //
@@ -149,6 +159,28 @@ if not except(exit)
     //
     if fileio:getfileinfo(@path, @fileinfo) == FILE_ERR_OK
         catalog(@path)
+        //
+        // Print block total, used. free
+        //
+        if path[1] <> '/' // Ensure full path with volume name
+            fileio:getpfx(@path)
+        fin
+        trimpath(@path)       
+        fileio:getfileinfo(@path, @fileinfo)
+        blockcnt[0] = fileinfo:aux_type
+        blockcnt[1] = 0
+        puts("Blocks: Total=")
+        puti32(@blockcnt)
+        usedcnt[0] = fileinfo:blocks_used
+        usedcnt[1] = 0
+        puts(" Used=")
+        puti32(@usedcnt)
+        load32(@blockcnt)
+        sub32(@usedcnt)
+        store32(@freecnt)
+        puts(" Free=")
+        puti32(@freecnt)
+        putln
     else
         puts("Unable to open: "); puts(@path); putln
     fin