aboutsummaryrefslogtreecommitdiffstats
path: root/hypo.hy
diff options
context:
space:
mode:
Diffstat (limited to 'hypo.hy')
-rwxr-xr-xhypo.hy3
1 files changed, 2 insertions, 1 deletions
diff --git a/hypo.hy b/hypo.hy
index a8e27b9..435a128 100755
--- a/hypo.hy
+++ b/hypo.hy
@@ -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]