Print a message on successful deletion

This commit is contained in:
Tom Willemse 2014-02-19 01:02:21 +01:00
parent 08fb2679bd
commit 31c26adf0e

View file

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