Index: mutils/mutils.scm
==================================================================
--- mutils/mutils.scm
+++ mutils/mutils.scm
@@ -293,12 +293,16 @@
 	    ((dname path)
 	     (print "Disk " dname " at " path " writeable: "
 		    (if (check-write-create path) "yes" "NO")))
 	    (else (print "bad entry: " entry))))
 	 (hash-table-ref/default cdat "disks" '()))))
-	
+
+  (print "Have link tree and it is writable: "
+	 (if (and (file-exists? "lt")
+		  (check-write-create "lt"))
+	     "yes"
+	     "NO"))
   ;;    check load on homehost
-  ;;    each run disk read/write
   ;;    link tree writeable
   )
   
 )