From b7f60ef57c4b4297fe85ecb7813ce3df0d1ad548 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Michal=20Mal=C3=BD?= <madcatxster@devoid-pointer.net>
Date: Tue, 16 Dec 2014 14:18:59 +0100
Subject: [PATCH] - Do not wait for Q key - Do not report that the server has
 been started

---
 src/nine_q.adb | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/src/nine_q.adb b/src/nine_q.adb
index 3063221..361c016 100644
--- a/src/nine_q.adb
+++ b/src/nine_q.adb
@@ -1,5 +1,3 @@
-with Ada.Text_IO;
-
 with AWS.Config;
 with AWS.Config.Set;
 with AWS.Server;
@@ -18,12 +16,11 @@ begin
   AWS.Config.Set.Session_Lifetime(1800.0);
   AWS.Config.Set.Session_Cleanup_Interval(3600.0);
 
-  Ada.Text_IO.Put_Line("Starting server...");
   AWS.Server.Start(Web_Server => Web_Server,
 		   Dispatcher => Handlers.Get_Dispatchers,
 		   Config => Server_Config);
 
-  AWS.Server.Wait(AWS.Server.Q_Key_Pressed);
+  AWS.Server.Wait(AWS.Server.Forever);
   AWS.Server.Shutdown(Web_Server);
 
 end Nine_Q;
-- 
2.43.5