Task #1765 - A transaction for the 1.8.7.1 release. Correction about avoiding errorneous second attempt for loading the library 'text.lib.php'.

main/newscorm/resourcelinker.php

@@ -737,7 +737,7 @@ if ($from_learnpath != 'yes')
 // Agenda items -->
 if ($content == "Agenda")
 {
-	include api_get_path(LIBRARY_PATH).'text.lib.php';
+	include_once api_get_path(LIBRARY_PATH).'text.lib.php';
 	$TABLEAGENDA = Database::get_course_table(TABLE_AGENDA);
 	$TABLE_ITEM_PROPERTY = Database::get_course_table(TABLE_ITEM_PROPERTY);
 
@@ -815,7 +815,7 @@ if ($content == "Document" OR (empty($content) AND (is_allowed_to_edit() OR in_a
 */
 if ($content == "Ad_Valvas")
 {
-	include api_get_path(LIBRARY_PATH).'text.lib.php';
+	include_once api_get_path(LIBRARY_PATH).'text.lib.php';
 	$tbl_announcement = Database :: get_course_table(TABLE_ANNOUNCEMENT);
 	$sql = "SELECT * FROM ".$tbl_announcement." a, ".$item_property_table." i  WHERE i.tool = '".TOOL_ANNOUNCEMENT."' AND a.id=i.ref AND i.visibility='1' AND i.to_group_id = 0 AND i.to_user_id IS NULL ORDER BY a.display_order ASC";
 	//error_log($sql,0);