Index: appfsd.tcl
==================================================================
--- appfsd.tcl
+++ appfsd.tcl
@@ -621,14 +621,19 @@
 						set work [split $pathinfo(file) "/"]
 						set directory [join [lrange $work 0 end-1] "/"]
 						set file [lindex $work end]
 
 						if {$directory == "" && $file == ""} {
-							array set retval [list type directory childcount [llength [getchildren $path]]]
+							array set retval [list type directory]
 						}
 
 						::appfs::db eval {SELECT type, time, source, size, perms FROM files WHERE package_sha1 = $pathinfo(package_sha1) AND file_directory = $directory AND file_name = $file;} retval {}
+
+						if {$retval(type) == "directory"} {
+							set retval(childcount) [llength [getchildren $path]]
+						}
+
 						unset -nocomplain retval(*)
 					}
 				}
 
 			}