Index: openacs-4/packages/acs-tcl/tcl/admin-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/admin-procs.tcl,v
diff -u -r1.4.2.1 -r1.4.2.2
--- openacs-4/packages/acs-tcl/tcl/admin-procs.tcl	13 Mar 2002 18:48:58 -0000	1.4.2.1
+++ openacs-4/packages/acs-tcl/tcl/admin-procs.tcl	13 Mar 2002 18:51:27 -0000	1.4.2.2
@@ -35,6 +35,8 @@
     set ssl_port [ns_config -int "ns/server/[ns_info server]/module/nsssl" Port 443]
     } elseif { [ns_config ns/server/[ns_info server]/modules nsopenssl] != "" } {
 	set ssl_port [ns_config -int "ns/server/[ns_info server]/module/nsopenssl" ServerPort 443]
+    } elseif { [ns_config ns/server/[ns_info server]/modules nsssle] != "" } {
+    set ssl_port [ns_config -int "ns/server/[ns_info server]/module/nsssle" Port 443]
     }
     
     set host [ns_set iget [ad_conn headers] "host"]