diff options
| author | Scott Ostler <sostler@deathmachine.local> | 2010-03-11 08:10:10 -0500 |
|---|---|---|
| committer | Scott Ostler <sostler@deathmachine.local> | 2010-03-11 08:10:10 -0500 |
| commit | cc9a731ff8c3bd96453b70027665fd9e952ea015 (patch) | |
| tree | 468d39000382f5bc9efd0b2cd9ddb8478f9f2cea | |
| parent | 9a5aeb4c29b29b79dc289fabb8ed1145b84c391a (diff) | |
add dump.fm to image names
| -rwxr-xr-x | src/site.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/site.clj b/src/site.clj index f1eb8f3..30cbf45 100755 --- a/src/site.clj +++ b/src/site.clj @@ -684,7 +684,7 @@ (let [spaceless (.replace s \space \-) nick-clean (re-gsub #"[^A-Za-z0-9]" "" nick) subbed (re-gsub #"[^\w.-]" "" spaceless)] - (str-join "-" [(System/currentTimeMillis) nick-clean subbed]))) + (str-join "-" [(System/currentTimeMillis) "dumpfm" nick-clean subbed]))) (defn image-url-from-file [dir date file] (str-join "/" [*server-url* dir date (.getName file)])) |