Mercurial > rlm
comparison src/rlm/sanitize_file.clj @ 0:78a630e650d2
initial import
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Tue, 18 Oct 2011 00:57:08 -0700 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:78a630e650d2 |
---|---|
1 (ns rlm.sanitize-file | |
2 (:import java.io.File) | |
3 (:use clojure.contrib.str-utils)) | |
4 | |
5 | |
6 (defn sanitize-file-name | |
7 "given a file name, convert it into a valid file name. | |
8 currently only works for linux" | |
9 [#^String name] | |
10 ;; as far as I know, all that must be done is removal of the | |
11 ;; path separator. | |
12 | |
13 (re-gsub | |
14 (re-pattern (str File/separatorChar)) | |
15 " " ;; replace "/" with " " | |
16 name)) | |
17 | |
18 | |
19 |