From 196b75d094fdbb56866781e7c79acdc23c052b9d Mon Sep 17 00:00:00 2001
From: Linus Nordberg <linus@nordu.net>
Date: Fri, 26 Jun 2009 07:03:12 +0200
Subject: Tell that you start.

---
 src/bgpstore.lisp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/bgpstore.lisp b/src/bgpstore.lisp
index 2c3b8ed..aa25b87 100644
--- a/src/bgpstore.lisp
+++ b/src/bgpstore.lisp
@@ -5,6 +5,7 @@
 (defun start-bgpstore (host port)
   (with-connection *db-spec* 
     (let ((reader (new-reader host port)))
+      (format t "bgpstore started~%")
       (do ((e (next-xml-blurb reader "BGP_MESSAGE")
 	      (next-xml-blurb reader "BGP_MESSAGE")))
 	  ((null e))
-- 
cgit v1.1