[LON-CAPA-cvs] cvs: loncom /interface lonsupportreq.pm
raeburn
raeburn at source.lon-capa.org
Mon Jan 23 14:49:07 EST 2017
raeburn Mon Jan 23 19:49:07 2017 EDT
Modified files:
/loncom/interface lonsupportreq.pm
Log:
- Remove trailing white space. No code changes.
Index: loncom/interface/lonsupportreq.pm
diff -u loncom/interface/lonsupportreq.pm:1.88 loncom/interface/lonsupportreq.pm:1.89
--- loncom/interface/lonsupportreq.pm:1.88 Mon Jan 23 18:30:30 2017
+++ loncom/interface/lonsupportreq.pm Mon Jan 23 19:49:07 2017
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Helpdesk request form
#
-# $Id: lonsupportreq.pm,v 1.88 2017/01/23 18:30:30 raeburn Exp $
+# $Id: lonsupportreq.pm,v 1.89 2017/01/23 19:49:07 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -79,7 +79,7 @@
}
return OK;
}
-
+
sub print_request_form {
my ($r,$origurl,$function) = @_;
my ($os,$browser,$bversion,$uname,$udom,$uhome,$urole,$usec,$email,$cid,
@@ -105,7 +105,7 @@
}
}
}
- if (($env{'user.name'} =~ /^$match_username$/) &&
+ if (($env{'user.name'} =~ /^$match_username$/) &&
($env{'user.domain'} =~ /^$match_domain$/) && (!$public)) {
$knownuser = 1;
} else {
@@ -350,7 +350,7 @@
unless ($helpform{'username'} eq 'no') {
my ($reqd,$namefield,$fullname);
if ((defined($lastname) && $lastname ne '') && (defined($firstname) && $firstname ne '')) {
- $fullname = "$firstname $lastname";
+ $fullname = "$firstname $lastname";
$namefield = $fullname.'<input type="hidden" name="username" value="'.&HTML::Entities::encode($fullname,'"<>&').'" />'."\n";
} else {
if (defined($firstname) && $firstname ne '') {
@@ -378,7 +378,7 @@
&HTML::Entities::encode($email,'"<>&').'" />'."\n";
unless ($shownsubmit) {
$output .= $topsubmit;
- }
+ }
$output .= &Apache::lonhtmlcommon::row_closure();
$num ++;
$i = $num%2;
@@ -541,7 +541,7 @@
$output .= '</select></div>'."\n".
'<div id="LC_helpdesk_section" style="display:none">'.
'<input type="text" name="sectiontxt" size="10" /></div>'."\n";
- } else {
+ } else {
$output .= '<input type="text" name="section" size="10" />'."\n";
}
$output .= &Apache::lonhtmlcommon::row_closure();
@@ -569,7 +569,7 @@
my $max = 1048576;
my $showmax = 1.00;
if ($helpform{'maxsize'} =~ /^\d+\.\d*$/) {
- $max *= $helpform{'maxsize'};
+ $max *= $helpform{'maxsize'};
$showmax = $helpform{'maxsize'};
}
$showmax = ' ('.sprintf("%.2f",$showmax).' '.&mt('MB max.').')';
@@ -627,7 +627,7 @@
if (($env{'user.name'} eq 'public') && ($env{'user.domain'} eq 'public')) {
$public = 1;
}
- my $lonhost = $r->dir_config('lonHostID');
+ my $lonhost = $r->dir_config('lonHostID');
unless (($env{'user.name'} =~ /^$match_username$/) && (!$public)) {
my ($captcha_chk,$captcha_error) =
&Apache::loncommon::captcha_response('login',$lonhost);
@@ -833,7 +833,7 @@
}
if ($formvars{'course'}) {
$supportmsg .= "$lt{'crsi'}: $env{'form.crsi'}\n";
- }
+ }
$supportmsg .= "$lt{'subject'}: $env{'form.subject'}
$lt{'description'}: $env{'form.description'}
$lt{'sourceurl'}: $env{'form.sourceurl'}
@@ -962,7 +962,7 @@
my $attachmentpath = '';
my $showsize = '';
-
+
if ((defined($env{'user.name'})) && (!$public)) {
if ($homeserver && $env{'form.screenshot.filename'}) {
unless ($helpform{'screenshot'} eq 'no') {
@@ -973,7 +973,7 @@
$max *= $helpform{'maxsize'};
$showmax = $helpform{'maxsize'};
}
- $showmax = '('.sprintf("%.2f",$showmax).' MB)';
+ $showmax = '('.sprintf("%.2f",$showmax).' MB)';
$showsize = $attachmentsize/1048576;
$showsize = '('.sprintf("%.2f",$showsize).' MB)';
if ($attachmentsize > $max) {
@@ -1010,7 +1010,7 @@
$supportmsg .= "$var: $env{$var}\n";
}
}
-
+
my $cc_string;
if ($homeserver) {
if (@ok_ccs > 0) {
More information about the LON-CAPA-cvs
mailing list