Initial working command line

[eow] / scratch.lisp

diff --git a/scratch.lisp b/scratch.lisp
index 17a51b269abacbfa6343909fb61715dcf2840378..136799df5f2f22b443d6429fb6a35363c21c3915 100644 (file)
--- a/scratch.lisp
+++ b/scratch.lisp
@@ -1,8 +1,6 @@
+(setf *e* (empire::connect :user "1" :password "1"))
+(empire::quit *e*)

 
 

-(hunchentoot:start-server :port 4242)
-(setf hunchentoot:*show-lisp-backtraces-p* t)
-(setf hunchentoot:*show-lisp-errors-p* t)
-(empire-web:start)

 ;; http://localhost:4242/eow/
 
 ;(setf *r* (drakma:http-request "http://gdata.youtube.com/feeds/videos"))
 ;; http://localhost:4242/eow/
 
 ;(setf *r* (drakma:http-request "http://gdata.youtube.com/feeds/videos"))