From e4d88be3d42602ab32883201be6a9eda576356b7 Mon Sep 17 00:00:00 2001
From: Gerd Flaig <gefla@gefla-mac-zrh>
Date: Sat, 29 Nov 2008 23:34:24 +0100
Subject: [PATCH] convenience

---
 scratch.lisp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/scratch.lisp b/scratch.lisp
index 0b93a7e..136799d 100644
--- a/scratch.lisp
+++ b/scratch.lisp
@@ -1,4 +1,5 @@
-
+(setf *e* (empire::connect :user "1" :password "1"))
+(empire::quit *e*)
 
 ;; http://localhost:4242/eow/
 
-- 
2.43.0