[LON-CAPA-cvs] cvs: loncom /interface lonfeedback.pm
raeburn
raeburn at source.lon-capa.org
Mon Dec 18 17:36:52 EST 2017
raeburn Mon Dec 18 22:36:52 2017 EDT
Modified files:
/loncom/interface lonfeedback.pm
Log:
- Remove trailing white space.
Index: loncom/interface/lonfeedback.pm
diff -u loncom/interface/lonfeedback.pm:1.376 loncom/interface/lonfeedback.pm:1.377
--- loncom/interface/lonfeedback.pm:1.376 Sun Nov 12 17:41:32 2017
+++ loncom/interface/lonfeedback.pm Mon Dec 18 22:36:52 2017
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Feedback
#
-# $Id: lonfeedback.pm,v 1.376 2017/11/12 17:41:32 raeburn Exp $
+# $Id: lonfeedback.pm,v 1.377 2017/12/18 22:36:52 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -674,7 +674,7 @@
$newpostsflag,$group,
$prevread,$markondisp,$seehidden);
$discussion .= "</table></form>\n";
- }
+ }
if ($outputtarget eq 'export') {
if ($manifestok) {
while ($currdepth > 0) {
@@ -698,14 +698,14 @@
if (($env{'user.name'} =~ /^$match_username$/)
&& ($env{'user.domain'} =~ /^$match_domain$/)) {
- my $now = time();
+ my $now = time();
my $imszipfile = '/prtspool/'.
join('_',$env{'user.name'},$env{'user.domain'},$now).
'_'.rand(1000000000).'.zip';
my $zip = Archive::Zip->new();
$zip->addTree($tempexport);
my $imszip = '/home/httpd/'.$imszipfile;
- if ($zip->writeToFileNamed($imszip) == AZ_OK) {
+ if ($zip->writeToFileNamed($imszip) == AZ_OK) {
$discussion .= &mt('Download the zip file from [_1]Discussion Posting Archive[_2]',
'<a href="'.$imszipfile.'">','</a>').'<br />';
} else {
More information about the LON-CAPA-cvs
mailing list