media-list: Make `as` module for listing media

1 files changed, 6 insertions, 4 deletions

diff --git a/README.md b/README.md
index 807e55e..2f4f0a7 100644
--- a/README.md
+++ b/README.md
@@ -21,18 +21,20 @@ The following script shows one way to do it:
 (define root (canonicalize-path (cadr (command-line))))
 
 (define atom-feed  (lambda () (atom:render (as 'atom root))))
-(define html-index (lambda () (html:render (as 'html root))))
-
 (atom-feed)   ;; writes your feed to current-output-port
+
+(define html-index (lambda () (html:render (as 'html root))))
 (html-index)  ;; writes your html to current-output-port
+
+(define media-list (as 'media-list root)) ;; list of media files in your site
 ```
 
 `(as 'atom root)` and `(as 'html root)` the scheme file in `root` and interpret
 it as atom and html respectively. From that, the result can be generated
 calling the `render` function of the modules as suggested in the example.
 
-There's also a `media-uploader` module that would upload all the independent
-media to the server, but it's still a WIP.
+`(as 'media-list root)` returns an association list with the car set to the
+path in the filesystem and the cdr to the uri of each media file.
 
 ## Format