[LON-CAPA-cvs] cvs: loncom /publisher lonpubdir.pm

[raeburn]

raeburn		Fri Dec 19 03:54:19 2008 EDT

  Modified files:              
    /loncom/publisher	lonpubdir.pm 
  Log:
  - Regular Expressions for both http and https.
  
  
Index: loncom/publisher/lonpubdir.pm
diff -u loncom/publisher/lonpubdir.pm:1.117 loncom/publisher/lonpubdir.pm:1.118
--- loncom/publisher/lonpubdir.pm:1.117	Wed Dec 17 13:04:08 2008
+++ loncom/publisher/lonpubdir.pm	Fri Dec 19 03:54:19 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construction Space Directory Lister
 #
-# $Id: lonpubdir.pm,v 1.117 2008/12/17 13:04:08 harmsja Exp $
+# $Id: lonpubdir.pm,v 1.118 2008/12/19 03:54:19 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -159,7 +159,7 @@
 	#   Replace the ~username of the URL with /home/username/public_html
 	#   so that we don't have to worry about ~ expansion internally.
 	#
-	$fn=~s/^http\:\/\/[^\/]+\///;
+	$fn=~s/^https?\:\/\/[^\/]+\///;
         $fn=~s/^\///;
         $fn=~s{~($LONCAPA::username_re)}{/home/$1/public_html};