projects
/
elisp
/
album.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
0bf1036
)
(album-convert-directory): New function.
author
tomo
<tomo>
Sat, 16 Apr 2005 16:05:47 +0000
(16:05 +0000)
committer
tomo
<tomo>
Sat, 16 Apr 2005 16:05:47 +0000
(16:05 +0000)
album.el
patch
|
blob
|
history
diff --git
a/album.el
b/album.el
index
3120732
..
0d7ac01
100644
(file)
--- a/
album.el
+++ b/
album.el
@@
-210,6
+210,17
@@
(setq prev-file file
source-images (cdr source-images)))))
(setq prev-file file
source-images (cdr source-images)))))
+(defun album-convert-directory (dest-dir source-dir &rest patterns)
+ (let (files)
+ (if patterns
+ (dolist (pat patterns)
+ (setq files
+ (append files
+ (directory-files source-dir 'full pat))))
+ (setq files (directory-files source-dir 'full)))
+ (album-convert-images dest-dir files)))
+
+
(provide 'album)
;;; album.el ends here
(provide 'album)
;;; album.el ends here