From 31c26adf0e262e6e54ce4df151b651a1fc3a86ce Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Wed, 19 Feb 2014 01:02:21 +0100
Subject: 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]
-- 
cgit v1.2.3-54-g00ecf