[Split data root directory into individual components
clinton@unknownlamer.org**20090209042528
 Temporary hack for running on CCL; `*data-root*' should be a list or
 pathname instead of a string.
] hunk ./src/image-manager.lisp 15
-		    :directory `(:absolute ,beesknees.site-control::*bee-data-root*
-					   ,@upload-root)
+		    :directory `(:absolute
+				 ,@(split-sequence:split-sequence
+				    #\/ beesknees.site-control::*bee-data-root*)
+				 ,@upload-root)