@@ -51,11 +51,13 @@
 ;; These are called by the server on recipt of /api calls
 ;;    - keep it simple, only return the actual result of the call, i.e. no meta info here
 ;;
 (define (api:execute-requests dbstruct cmd params)
   (let ((res
-	 (case (string->symbol cmd)
+	 (case (if (symbol? cmd) 
+		   cmd
+		   (string->symbol cmd))
 	   ;; SERVERS
 	   ((start-server)                 (apply server:kind-run params))
 	   ((kill-server)                  (set! *server-run* #f))
 
 	   ;; KEYS