[LON-CAPA-cvs] cvs: modules /gerd/harvesting londocs.pm

[www]

www		Sat Jul  7 16:09:18 2012 EDT

  Modified files:              
    /modules/gerd/harvesting	londocs.pm 
  Log:
  Transfer current content of folder to recommender
  
  
Index: modules/gerd/harvesting/londocs.pm
diff -u modules/gerd/harvesting/londocs.pm:1.2 modules/gerd/harvesting/londocs.pm:1.3
--- modules/gerd/harvesting/londocs.pm:1.2	Sat Jul  7 15:14:51 2012
+++ modules/gerd/harvesting/londocs.pm	Sat Jul  7 16:09:18 2012
@@ -4,7 +4,7 @@
 # 
 # Documents
 #
-# $Id: londocs.pm,v 1.2 2012/07/07 15:14:51 www Exp $
+# $Id: londocs.pm,v 1.3 2012/07/07 16:09:18 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -49,6 +49,11 @@
 use Cwd;
 use LONCAPA qw(:DEFAULT :match);
 
+# Need this to evaluate basket
+# 
+use Apache::lonindexer();
+#
+
 my $iconpath;
 
 my %hash;
@@ -2613,10 +2618,11 @@
 SEDFFORM
 #
 # Take out the search button.
-#
+# Insert basket contents
+        my $basket="1,2,3,4,5,6";
 #
 	my @simpleeditdefaultforma = ( 
-	{ '<img class="LC_noBorder LC_middle" src="/res/adm/pages/res.png" alt="'.$lt{impo}.'"  onclick="javascript:groupimport();"/>' => "<a class='LC_menubuttons_link' href='javascript:groupimport();'>$lt{'impo'}</a>$help{'Importing_LON-CAPA_Resource'}" },
+	{ '<img class="LC_noBorder LC_middle" src="/res/adm/pages/res.png" alt="'.$lt{impo}.'"  onclick="javascript:groupimport(\''.$basket.'\');"/>' => "<a class='LC_menubuttons_link' href='javascript:groupimport(\"$basket\");'>$lt{'impo'}</a>$help{'Importing_LON-CAPA_Resource'}" },
 	{ '<img class="LC_noBorder LC_middle" src="/res/adm/pages/wishlist.png" alt="'.$lt{lnks}.'" onclick="javascript:open_StoredLinks_Import();" />' => "<a class='LC_menubuttons_link' href='javascript:open_StoredLinks_Import();'>$lt{'lnks'}</a>" },
 	);
 	$simpleeditdefaultform .= &create_form_ul(&create_list_elements(@simpleeditdefaultforma));