[LON-CAPA-cvs] cvs: loncom /interface lonevaluate.pm

[raeburn]

raeburn		Wed Dec 24 07:56:50 2008 EDT

  Modified files:              
    /loncom/interface	lonevaluate.pm 
  Log:
  - Regular Expressions for both http and https.
  
  
Index: loncom/interface/lonevaluate.pm
diff -u loncom/interface/lonevaluate.pm:1.27 loncom/interface/lonevaluate.pm:1.28
--- loncom/interface/lonevaluate.pm:1.27	Wed Nov 26 10:51:36 2008
+++ loncom/interface/lonevaluate.pm	Wed Dec 24 07:56:50 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Evaluate
 #
-# $Id: lonevaluate.pm,v 1.27 2008/11/26 10:51:36 bisitz Exp $
+# $Id: lonevaluate.pm,v 1.28 2008/12/24 07:56:50 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -48,7 +48,7 @@
 
     &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['postdata']);
     my $feedurl=$env{'form.postdata'};
-    $feedurl=~s/^http\:\/\///;
+    $feedurl=~s/^https?\:\/\///;
     $feedurl=~s/^$ENV{'SERVER_NAME'}//;
     $feedurl=~s/^$ENV{'HTTP_HOST'}//;