update.
[elisp/album.git] / iphoto-util.el
index 74027f3..dcac895 100644 (file)
                                                 ":"))
                                    (split-string a-dir-n "_")
                                    "\e$B!A\e(B")))
-                    (cons 'files
-                          (directory-files dir nil nil nil t))
+                     ;; (cons 'files
+                     ;;       (directory-files dir nil nil nil t))
                     (cons 'exit (concat album-url-prefix album-name)))))
        (write-region (point-min)(point-max)
                      (expand-file-name "dir.desc" album-dir)))