From 2073753ba8279c7fac353ec2e6f3c593f629d1e8 Mon Sep 17 00:00:00 2001
From: Andrew Hodgkinson <ahodgkin@gitlab.riscosopen.org>
Date: Thu, 24 Jul 1997 16:03:33 +0000
Subject: [PATCH] First stage of customer work. Makefile compile time options
 additon -

CUSTOMER_SPECIAL. All code for customer to go under this. Redirections to
/login.html now go to /simple.html instead, and the Messages file has
additions to report errors if required for debugging regarding the
JavaScript encountered on the page.
---
 c/Fetch | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/c/Fetch b/c/Fetch
index f025f8e..ad35a1f 100644
--- a/c/Fetch
+++ b/c/Fetch
@@ -2647,6 +2647,19 @@ _kernel_oserror * html_get_next_token(browser_data * b, unsigned int handle, int
             flex_free(source);
             *source = NULL;
 
+            /* Customer specific */
+
+            #ifdef CUSTOMER_SPECIAL
+
+              if (!strcmp(redirect,"http://www.customer.net/login.cgi"))
+              {
+                // Send out cookie...
+
+                redirect = (char *) "http://www.customer.com/simple.html";
+              }
+
+            #endif
+
             /* Set the fetch's urlstat structure to say that */
             /* no data has been fetched                      */
 
-- 
GitLab