Removed imports.

[microbotany.git] / delete.scm

diff --git a/delete.scm b/delete.scm
index a259061..ca52708 100755 (executable)
--- a/delete.scm
+++ b/delete.scm
@@ -1,10 +1,6 @@
 ;; Delete account
 
 (lambda (uri)
-  (import (chicken file)
-          (chicken pathname)
-          (chicken string)
-          uri-common)
   (let ((query (uri-query uri)))
     (serve-document-header (ext->mime "gmi"))
     (if (null? query)
@@ -14,6 +10,6 @@
           (if (file-exists? account-file)
               (begin
                 (delete-file account-file)
-                (print "Account successfully deleted."))
-              (print "Attempted to delete non-existent account."))))
+                (print "Garden successfully deleted."))
+              (print "Attempted to delete non-existent garden."))))
     (print "\n=> /microbotany/ Return to μBotany")))