From 31c26adf0e262e6e54ce4df151b651a1fc3a86ce Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Wed, 19 Feb 2014 01:02:21 +0100 Subject: [PATCH] Print a message on successful deletion --- hypo.hy | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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]