From 877b8876b078c8ab2632c17ab09e0ac0c2789c8a Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeff@approximatrix.com>
Date: Tue, 4 May 2021 16:44:20 -0400
Subject: Initial work on the CGI interface for web access.

---
 captain/captian.f90 | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'captain/captian.f90')

diff --git a/captain/captian.f90 b/captain/captian.f90
index c5443e2..4ee637e 100644
--- a/captain/captian.f90
+++ b/captain/captian.f90
@@ -25,6 +25,7 @@ use captain_db
 use config
 use logging, only: initialize_log => initialize, shutdown_log => shutdown
 use gemini, only: handle_gemini => handle_request 
+use web, only: handle_web => handle_request 
 implicit none
 
     integer::mode
@@ -42,6 +43,8 @@ implicit none
     select case(mode)
         case(MODE_GEMINI)
             call handle_gemini()
+        case(MODE_CGI_HTML)
+            call handle_web()
     end select
     
     call shutdown_db()
-- 
cgit v1.2.3