43263c78ad44a4b1ab143ddde74e27b47e0e42d5
chinhli
  Thu Jul 18 23:19:53 2013 -0700
Feature #8922 Remove hard coded "http" string from hgLogin-related code in hgLogin and hgSession
diff --git src/lib/cheapcgi.c src/lib/cheapcgi.c
index c7c2734..07ebb4a 100644
--- src/lib/cheapcgi.c
+++ src/lib/cheapcgi.c
@@ -91,30 +91,39 @@
     return port;
 else
     return "80";
 }
 
 boolean cgiServerHttpsIsOn()
 /* Return true if HTTPS is on */
 {
 char *httpsIsOn = getenv("HTTPS");
 if (httpsIsOn)
     return sameString(httpsIsOn, "on");
 else
     return FALSE;
 }
 
+char *cgiAppendSForHttps()
+/* if running on https, add the letter s to the url protocol */
+{
+if (cgiServerHttpsIsOn())
+    return "s";
+return "";
+}
+
+
 char *cgiServerNamePort()
 /* Return name of server with port if different than 80 */
 {
 char *port = cgiServerPort();
 char *name = cgiServerName();
 struct dyString *result = newDyString(256);
 char *defaultPort = "80";
 if (cgiServerHttpsIsOn())
     defaultPort = "443";
 
 if (name)
     {
     dyStringPrintf(result,"%s",name);
     if (differentString(port, defaultPort))
 	dyStringPrintf(result,":%s",port);