ryuslash/hypo
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Print a message on successful deletion

Browse source
This commit is contained in:
Tom Willemse 2014-02-19 01:02:21 +01:00
parent 08fb2679bd
commit 31c26adf0e
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
hypo.hy
View file

@ -117,7 +117,8 @@ If no lexer is found fallback onto the text lexer."
(defun delete-dir [self name] (defun delete-dir [self name]
(let ((dirname (+ "files/" name))) (let ((dirname (+ "files/" name)))
(if (os.path.exists dirname) (if (os.path.exists dirname)
(shutil.rmtree dirname) (do (shutil.rmtree dirname)
(+ "Succesfully removed " name "\n"))
(no-such-file)))) (no-such-file))))
(defun upload-file [self name] (defun upload-file [self name]