[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm
raeburn
raeburn at source.lon-capa.org
Sat Jul 21 18:10:24 EDT 2012
raeburn Sat Jul 21 22:10:24 2012 EDT
Modified files:
/loncom/interface loncommon.pm
Log:
- Calls to LONCAPA::map::storemap() include additional (third) arg to cause
update to internal.contentchange in course's environment.db.
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.1086 loncom/interface/loncommon.pm:1.1087
--- loncom/interface/loncommon.pm:1.1086 Sat Jul 7 21:58:14 2012
+++ loncom/interface/loncommon.pm Sat Jul 21 22:10:23 2012
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.1086 2012/07/07 21:58:14 raeburn Exp $
+# $Id: loncommon.pm,v 1.1087 2012/07/21 22:10:23 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -11258,7 +11258,7 @@
my ($outtext,$errtext) =
&LONCAPA::map::storemap('/uploaded/'.$docudom.'/'.
$docuname.'/'.$folders{$outer}.
- '.'.$containers{$outer},1);
+ '.'.$containers{$outer},1,1);
$newseqid{$i} = $newidx;
unless ($errtext) {
$result .= '<li>'.&mt('Folder: [_1] added to course',$docstitle).'</li>'."\n";
@@ -11291,7 +11291,7 @@
my ($outtext,$errtext)=
&LONCAPA::map::storemap('/uploaded/'.$docudom.'/'.
$docuname.'/'.$folders{$outer}.
- '.'.$containers{$outer},1);
+ '.'.$containers{$outer},1,1);
unless ($errtext) {
if (-e "$prefix$dir/$docstype/$mapinner{$outer}/$newidx/$title") {
$result .= '<li>'.&mt('File: [_1] added to course',$docstitle).'</li>'."\n";
More information about the LON-CAPA-cvs
mailing list