33e8b42be818d9721c4850b0471ed5077e2ef1c1
hiram
  Wed Mar 23 10:42:00 2011 -0700
a default of port 80 if it isn't defined
diff --git src/lib/cheapcgi.c src/lib/cheapcgi.c
index 21b668d..ff099e9 100644
--- src/lib/cheapcgi.c
+++ src/lib/cheapcgi.c
@@ -71,31 +71,35 @@
 char *cgiScriptName()
 /* Return name of script so libs can do context-sensitive stuff. */
 {
 return getenv("SCRIPT_NAME");
 }
 
 char *cgiServerName()
 /* Return name of server */
 {
 return getenv("SERVER_NAME");
 }
 
 char *cgiServerPort()
 /* Return port number of server */
 {
-return getenv("SERVER_PORT");
+char *port = getenv("SERVER_PORT");
+if (port)
+    return port;
+else
+    return "80";
 }
 
 char *cgiRemoteAddr()
 /* Return IP address of client (or "unknown"). */
 {
 static char *dunno = "unknown";
 char *remoteAddr = getenv("REMOTE_ADDR");
 if (remoteAddr == NULL)
     remoteAddr = dunno;
 return remoteAddr;
 }
 
 char *cgiUserAgent()
 /* Return remote user agent (HTTP_USER_AGENT) or NULL if remote user agent is not known */
 {