[LON-CAPA-cvs] cvs: doc /loncapafiles updatequery.piml

raeburn raeburn at source.lon-capa.org
Mon Aug 17 18:02:39 EDT 2026


raeburn		Mon Aug 17 22:02:39 2026 EDT

  Modified files:              
    /doc/loncapafiles	updatequery.piml 
  Log:
  - Default email address to which to send CSRs is certificate at loncapa.org
  - Perform minimal format check for email address provided.
  
  
Index: doc/loncapafiles/updatequery.piml
diff -u doc/loncapafiles/updatequery.piml:1.102 doc/loncapafiles/updatequery.piml:1.103
--- doc/loncapafiles/updatequery.piml:1.102	Wed Jul  8 21:58:22 2026
+++ doc/loncapafiles/updatequery.piml	Mon Aug 17 22:02:39 2026
@@ -1,6 +1,6 @@
 <!-- updatequery.piml -->
 
-<!-- $Id: updatequery.piml,v 1.102 2026/07/08 21:58:22 raeburn Exp $ -->
+<!-- $Id: updatequery.piml,v 1.103 2026/08/17 22:02:39 raeburn Exp $ -->
 
 <!--
 
@@ -223,12 +223,15 @@
         while (!$flag) {
             print(<<END);
 
-ENTER EMAIL ADDRESS TO SEND CERTIFICATE SIGNING REQUESTS
+ENTER DESTINATION EMAIL ADDRESS FOR CERTIFICATE SIGNING REQUESTS [certificate\@loncapa.org]
 END
 
             my $choice=<>;
             chomp($choice);
-            if ($choice ne '') {
+            if ($choice eq '') {
+                $choice = 'certificate at loncapa.org';
+            }
+            if ($choice =~ /^[^\@]+\@[^\@]+$/) {
                 open(OUT,'>>/tmp/loncapa_updatequery.out');
                 print(OUT 'Certificate Authority Email Address'."\t".$choice."\n");
                 close(OUT);




More information about the LON-CAPA-cvs mailing list